Puede utilizar la función InputBox en Excel VBA para pedir al usuario que introduzca un valor. Coloque un botón de comando en la hoja de trabajo y añadir las líneas de código siguientes:

  1. En primer lugar, declarar la variable myValue de tipo Variant.

Dim myValue As Variant

Nota: utilizamos una variable de tipo Variant aquí porque una variable Variant puede contener cualquier tipo de valor. De esta manera el usuario puede introducir texto, números, etc.

  1. Añadir la siguiente línea de código para mostrar el cuadro de entrada.

myValue = InputBox("Give me some input")

InputBox Function in Excel VBA

  1. Escribir el valor de myValue a la celda A1.

Range("A1").Value = myValue

Resultar cuando el usuario introduce el valor 5 y hace clic en el botón OK.

InputBox Function Result

  1. La función InputBox tiene más argumentos opcionales. La línea siguiente muestra el código un cuadro de entrada con un título que aparece en la barra de título y tiene un valor predeterminado. El valor por defecto se utilizará si no se proporciona ninguna otra entrada.

myValue = InputBox("Give me some input", "Hi", 1)

InputBox Function in Excel VBA

Resultar cuando el usuario sólo hace clic en el botón OK.

InputBox Function Result

Nota: Coloca el cursor sobre InputBox en el Editor de Visual Basic y haga clic en F1 para obtener ayuda sobre los otros argumentos opcionales.