En VBA (Visual Basic for Applications), la función InputBox permite mostrar una ventana de diálogo simple en la que el usuario puede introducir un texto. Esta función es útil para obtener datos del usuario de forma rápida y sencilla.

Sintaxis básica

InputBox(prompt[, title][, default][, xpos][, ypos][, helpfile, context])

• prompt: Es el mensaje que se muestra al usuario, generalmente es una descripción de la información que se está solicitando.
• title (opcional): El título de la ventana de diálogo. Si se omite, se muestra el nombre de la aplicación.
• default (opcional): El valor predeterminado que aparecerá en el cuadro de texto cuando aparezca la ventana de diálogo.
• xpos y ypos (opcionales): Las coordenadas X y Y que determinan la posición de la ventana de diálogo en la pantalla. Si se omiten, la ventana se centra en la pantalla.
• helpfile y context (opcionales): Se utilizan para proporcionar la ruta de un archivo de ayuda y el contexto de la ayuda respectivamente, pero no se usan comúnmente.

Ejemplo

Sub GetUserName()
    Dim UserName As String

    UserName = InputBox("Por favor, introduce tu nombre:", "Nombre de Usuario")

    ' Verifica si el usuario presionó Cancelar o dejó el campo vacío
    If UserName <> "" Then
        MsgBox "Hola " & UserName & "!"
    Else
        MsgBox "No se ha proporcionado ningún nombre."
    End If
End Sub

Este código creará un cuadro de diálogo que pide al usuario que ingrese su nombre. Luego utiliza un MsgBox para saludar al usuario con el nombre proporcionado o para informarle que no ingresó un nombre.

Recuerda que si el usuario presiona el botón Cancelar o cierra el cuadro de diálogo, la función InputBox devolverá una cadena vacía («»). Es importante incluir una comprobación para este caso, como en el ejemplo proporcionado.

Ten en cuenta que InputBox se puede utilizar en cualquier aplicación que admita VBA, como Excel, Word y Access. El contexto puede cambiar un poco dependiendo del tipo de datos que necesites recopilar y el ambiente de la aplicación en la que estés trabajando.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto