Nuevo registro en vba
Publicado por Rodrigo (5 intervenciones) el 27/11/2020 14:49:10
¡¡Hola buenas tardes a todos!! Ante todo gracias por permirtime escribir un post en este foro. Soy nuevo aquí. Tengo un gran consulta y necesitaba la ayuda de alguien. Tengo un inventario en excel y la cuestión es que tengo una macros preparada, pero el fallo viene cuando necesito introducir los datos y que estos pasen a una nueva hoja de excel y que cada vez que se pulse el botón registrar, guarde los nuevos datos consecutivamente en una nueva fila. No hace absolutamente nada, ni me lanza error. Lo he probado de diversas formas pero ninguna ha funcionado.
PD: La hoja donde está el inventario se llama data y en la que quiero que se guarde se llama Expediciones.
Código
Eternas gracias de antemano.
¡Un saludo!
PD: La hoja donde está el inventario se llama data y en la que quiero que se guarde se llama Expediciones.
Código
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub CommandButton3_Click()
Dim codigo As Double
Dim cliente As String
Dim fecha As Date
Dim serie As String
Dim ultimafila As Double
codigo = TextBox1.Value
cliente = TextBox3.Value
fecha = TextBox2.Value
serie = TextBox4.Value
ultimafila = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
ultimafila = Sheets("Expediciones").Range("A" & Rows.Count).End(xlUp).Row
Sheets("Expediciones").Cells(ultimafila + 1, 1) = codigo
Sheets("Expediciones").Cells(ultimafila + 1, 2) = cliente
Sheets("Expediciones").Cells(ultimafila + 1, 3) = fechas
Sheets("Expediciones").Cells(ultimafila + 1, 4) = serie
End Sub
Eternas gracias de antemano.
¡Un saludo!
Valora esta pregunta
0
