1
Abrir Excel.
2 Haga clic en " Herramientas " de Microsoft "Macro " y luego en "Visual Basic " . Esto abre el editor de VBA.
3
Haga clic en " Insertar" y " módulos". Ahora debe tener un módulo de código en blanco
4
Escriba o copie y pegue el siguiente código en el módulo de código : .
Public Sub TestInputBoxFunction ()
Dim strFirstName As String
strLastName dévil como secuencia
'Obtener el nombre y apellido del usuario
strFirstName = InputBox ( Prompt : . = . " Escriba su nombre" , _
Title: = " nombre completo demo" )
strLastName = InputBox ( Prompt : = " Introduzca su nombre de pila. ", _
Title: = "Name Full Demo " )
' muestra el nombre completo si las dos casillas de entrada tienen texto en ellos
Si strFirstName = ". " O strLastName =" "Then MsgBox
Prompt : = " Usted no ha ingresado toda la información requerida . "
demás
MsgBox Prompt : . = "Ha escrito " & strFirstName & "" & _
strLastName & "" , Title: = " Nombre completo demo"
End If End Sub