Necesito crear macro que mediante ventana ingrese 3 valores y los inserte en la hoja

Hola a todos, necesito crear una macro que mediante una ventana el usuario ingrese 3 valores(Nombre, Fecha, Grupo), en 3 campos distintos(si es posible) y luego los inserte en determinada celda de otra hoja, Gracias.

1 Respuesta

Respuesta
1

Te mando este ejemplo:

Sub datos()
nombre = InputBox("inserte nombre")
If nombre = "" Then Exit Sub
fecha = InputBox("inserte fecha dd/mm/yyyy")
If Not IsDate(fecha) Or fecha = "" Then Exit Sub
grupo = InputBox("inserte grupo")
If grupo = "" Then Exit Sub
Sheets("hoja2").Range("a1").Value = nombre
Sheets("hoja2").Range("a2").Value = CDate(fecha)
Sheets("hoja2").Range("a3").Value = grupo
End Sub

recuerda finalizar y puntuar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas