
29/01/2011, 21:21
|
 | | | Fecha de Ingreso: marzo-2007 Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 10 meses Puntos: 88 | |
Mover rangos que cambian a diferentes puntos de la hoja Hola! Bazzi.
El siguiente código puede ayudarte:
Código vb:
Ver originalSub Macro774() Dim C As Range For Each C In [d1:f1] C.Resize(15).Cut Cells(15 * C.Column, "B") Next C End Sub
Saludos, Cacho. |