Función InputBox y Método InputBox en Excel vba

InputBox (Función)

Cuando requerimos que el usuario ingrese un valor que le pedimos una manera sencilla de solicitarle dicho valor es utilizando la función InputBox.

En el siguiente ejemplo le pedimos al usuario ingresar su nombre, lo asignamos a la variable Nombre para posteriormente mostrarlo con la función MsgBox.

Los valores asignados a las variables podrán utilizarse en cualquier situación referente a captura de datos.

Sub InputBox_Nombre()
Mensaje = InputBox(“Escribe un nombre.”, “EXCELeINFO”)
MsgBox Mensaje, vbInformation, “EXCELeINFO”
End Sub

image

InputBox (Método)

Al igual que la función InputBox, también el método nos da la oportunidad de solicitarte al usuario que ingrese un valor. El siguiente ejemplo pide ingresar el nombre y también lo muestra con la función MsgBox.

Sub InputBox_Metodo()
Nombre = Application.InputBox(Prompt:=”Escribe tu nombre”, Type:=2)
MsgBox Nombre
End Sub

image

La ventaja es que el método InputBox tiene más variantes para pedirle datos al usuario. Por ejemplo si deseamos aplicar acciones a un rango de celdas, le pediremos al usuario que seleccione el rango a tratar.

Si utilizamos el Type 8 para seleccionar un rango, debemos usar Set para asignar el valor a un rango.

Este ejemplo es muy útil cuando queremos manipular rangos de celdas.

Sub InputBox_Rango()
‘Pedimos al usuario que elija un rango.
Set Rango = Application.InputBox(Prompt:=”Elige un rango”, Type:=8)
‘Damos color al rango elegido.
Rango.Interior.ColorIndex = 43
End Sub

image

[nrelate-related]

You may also like...