Cómo usar una macro en Excel para copiar datos de a3 a b2, y luego realizar un bucle infinito hasta que los datos de la columna a estén vacíos, ¡y luego detener el bucle!
Presione Alt F11 para abrir el editor vb, luego seleccione "Insertar" - "Módulo", pegue el siguiente código y presione F5 para ejecutar.
Sub?CopyRng()
¿Dim?OriRng?As?Range
Dim?DesRng?As?Range
¿Establecer OriRng? =?Rango("A3")
Establecer?DesRng?=?Rango("B2")
Establecer?DesRng?=?Rango("B3")
¿Establecer?DesRng?
¿Hacer?Hasta?Está vacío(OriRng)
OriRng.Copy?DesRng
Establecer?OriRng?=?OriRng.Offset ("2,?0"
Establecer?DesRng?=?DesRng. 2,?0)
Bucle
Fin?