¡Primero, ayuda de expertos de VBA! Quiero escribir un programa en Excel que copie un rango específico en esta hoja de trabajo y luego abra otra hoja de trabajo.
Si ActiveSheet.Cells(i, 3).Value = "" Entonces ''La condición previa ya es <>""¿Cómo realizar este paso internamente?
'Cambiar a esto:
Public Sub OpenExcell()
Dim var As Integer
Dim i As Integer
Rango("F2").Seleccione
Selección.
var = Rango("F2")
Libros de trabajo.Abra "C:\Skid .xls"
i = 2
Hacer mientras ActiveSheet.Cells(i, 3).Value <> ""
i = i + 1 p>
Bucle
Celdas(i, 3).Value = var
Application.CutCopyMode = False
Libros de trabajo("Skid.xls") .Cerrar (Verdadero)
Fin Sub