Una duda en una macro
Tengo esto lo que necesito es agregar una fila asi abajo siempre que sejecute esta macro como lo puedo lograr y despues que otraves comiense donde puso esta fila otraves asi sucesibamente
Private Sub CommandButton2_Click()
'validar cuadro 3
Worksheets("Clientes").Activate
Range("A6").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(1, 0).Activate
Loop
ActiveCell.Offset(0, 0) = Label12.Caption
ActiveCell.Offset(0, 1) = Label13
ActiveCell.Offset(0, 2) = Label14
ActiveCell.Offset(0, 3) = Label15
ActiveCell.Offset(0, 4) = Label16
ActiveCell.Offset(0, 5) = Label17
ActiveCell.Offset(0, 6) = Label18
ActiveCell.Offset(0, 7) = Label19
ActiveCell.Offset(0, 8) = Label20
ActiveCell.Offset(0, 9) = Label21
Selection.Insert Shift:="3"
Unload UserForm3
Load UserForm2
UserForm2.Show
End
1 Respuesta
LA LINEA Selection.Insert Shift:="3" La boy a borrar no sirve
En tu macro reemplaza esta línea
Range("A6").Select
Por estas
ufila = Range("A" & Rows.Count).End(xlUp).Row + 1
Range("A" & ufila).Select
Saludos. Dam
Si es lo que necesitas.
para lo que necesito no funciono lo que realiza es como un salto de fila no inserta fila
Puedes poner un ejemplo de cómo están los datos en tu hoja y cómo es que quieres que queden después de ejecutar la macro, de otra forma no entiendo qué es lo que necesitas.
Saludos. Dam
La cuestión es que es mucho lo que quiero tendía que explicarte mejor pero el texto de esto no me alcanza me faltaría podría ser por otro medio o correo
Mándame tu archivo con el que estás trabajando y en el mismo archivo o en otro, toda la explicación de lo que necesitas.
Escribe en el asunto del correo, tu nombre de usuario y la pregunta de todoexpertos
Saludos. Dam
