Excel - Insertar !!!

 
Vista:

Insertar !!!

Publicado por Carlos Aviles (17 intervenciones) el 23/02/2007 23:30:18
Hola a todos en el foro !! buenas tardes mexico !! tengo una pregunta el dia de hoy y pue sla vdd no kreo ke sea posible jeje quien sabe.. pero peus ahi les va !!!

tengo este codigo :

Private Sub CommandButton3_Click()
Sheets("Nuevo").Select
Range("A11").Select
Selection.EntireRow.Insert
Range("C11").Value = TextBox5
Range("A11").Value = TextBox2
Range("B11").Value = TextBox3
Range("D11").Value = TextBox4
End Sub

y me funciona correctamente, pero lo que yo quisiera que hiciera es que NO me inserte una nueva fila en la A11 sino que me fuera poniendo los datos hacia abajo, osea en la fila 12 y despues en la fila 13 y asi sucesivamente cada vez que presione el boton !! no se si sea posible y ojala me haya explicado

beuno gracias y ojala tenga suerte !! byeeee
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Insertar !!!

Publicado por haver (149 intervenciones) el 23/02/2007 23:44:05
Este codigo te busca la primer fila vacia de A1 hacia abajo y pega los datos en la primer fila vacia...Eso querias???

Private Sub CommandButton3_Click()
dim fila as long

Sheets("Nuevo").Select

fila = 1
Do while Range("A" & fila).value <> ""
fila = fila + 1
end sub

Range("A" & fila).Value = TextBox2
Range("B" & fila).Value = TextBox3
Range("C" & fila).Value = TextBox5
Range("D" & fila).Value = TextBox4
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar