Necesito de vuestra ayuda para realizar una macro que permita ingresar la edad de una persona a
través de un inputbox y escriba en la celda A1 de una hora si es mayor de edad o no.
Considerar que en este caso sería Select case edad>=18 y los casos serian true y fase.

Soy novato en programar con VB.

No adjunte un archivo, ya que no se como empezar el codigo en VB

Ojala me puedan ayudar 

saludos

meggido

Hola meggido

Te dejo el una prpuesta de como seria el codigó, haces pruebas y lo adaptas a tus necesidades

Saludos!!!

 

Sub Edades()

Edad = Application.InputBox(prompt:="Indique su edad:", Type:=2)

If Edad >= 18 Then
Range("A1").Value = "Mayor de Edad"

Else
Range("A1").Value = "Menor de Edad"

End If

End Sub

Prueba el adjunto

Saludos.

Edad.xlsm