Aneudys Martinez

Segun lo que lei y entendi el dato de XFD1 pasarlo a A1 y que cuando vallas hacer la y el dato da a1 pase a a2 y el de a a2 a a3 .... para inserta una nueva fila yo uso esta sentencia Hoja1.Range("XFD1").Copy Destination:=Hoja1.Range("b1")...

Lo puede hace de la siguiente manera en una hoja2 usa el procedimiento worksheet_activate yo lo uso así El hipervínculo lo hice que llame la hoja2 cuando se activa la hoja2 lo que hace es que me regresa a mi hoja1 iniciándome el userform Private Sub...

Para el reguistro esta es la macro En el boton del userform ira este codigo Private Sub CommandButton1_Click() ActiveSheet.Cells(8, 1).Select Selection.EntireRow.Insert ActiveSheet.Cells(2, 1) = TextBox1 ActiveSheet.Cells(2, 2) = TextBox2...

En mi caso uso el nombre de la celda A1 y que se guardarde en la misma calpeta donde se abra el libro Sub archivo_excel() nbre = Range("a1") & " " & Format(Now, "hh mm ss") ruta = ThisWorkbook.Path If MsgBox("¿desea guardar el archivo?", vbQuestion +...

Marcos delao, Solo tiene usar esta fórmula en la cedas a10 =a1+1 a20 =a1+2 Y asi sucesibamente Mediante un textbox Private Sub CommandButton1_Click() Worksheets("hoja1").Cells(1, 1).Value = UserForm1.TextBox1.Value End Sub En tu caso seria el formato...

Yo en particular la tengo así mi USERFORM inserta uma línea nueva y luego compia los datos empezando en la fila 10 `Prueba con esta a ver y nos deja saber Private Sub CommandButton1_Click() Application.ScreenUpdating = False...