BOTÓN GUARDAR EN EXCEL
registro Sheets("datos").Select ult = Cells(Rows.Count, 1).End(xlUp).Row Cells(ult + 1, 1) = TextBox1.Text Cells(ult + 1, 2) = TextBox2.Text Cells(ult + 1, 3) = TextBox3.Text Cells(ult + 1, 4) = TextBox4.Text Cells(ult + 1, 5) = TextBox5.Text Cells(ult + 1, 6) = TextBox6.Text _____________________________________________ ESTO PERMITE INGRESAR LOS DATOS A NUESTRA HOJA DATOS

Comentarios
Publicar un comentario