Una duda sobre esta macro
Lo qui ero que realiza des pues de que termine esto es que me agregue una fila completa como puedo realizar esto?
Worksheets("BaseDatos").Activate
Range("B6").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Activate
Loop
ActiveCell.Offset(0, 0) = Label8.Caption
ActiveCell.Offset(0, 1) = Label9
ActiveCell.Offset(0, 2) = Label10
ActiveCell.Offset(0, 3) = Label11
ActiveCell.Offset(0, 4) = Label13
ActiveCell.Offset(0, 5) = Label15
ActiveCell.Offset(0, 6) = Label17
ActiveCell.Offset(0, 7) = Label19
ActiveCell.Offset(0, 8) = Label21
ActiveCell.Offset(0, 9) = Label23
1 respuesta
Respuesta de Dante Amor
1