Vous pouvez utiliser la fonction InputBox dans Excel VBA pour demander à l’utilisateur d’entrer une valeur. Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivant:

  1. Tout d’abord, déclarer la maValeur variable de type Variant.

Dim myValue As Variant

Note: nous utilisons ici une variable de type Variant, car une variable Variant peut contenir tout type de valeur. De cette façon, l’utilisateur peut saisir du texte, des numéros, etc.

  1. Ajoutez la ligne de code ci-dessous pour afficher la zone de saisie.

myValue = InputBox("Give me some input")

InputBox Function in Excel VBA

  1. Ecrire la valeur de maValeur à la cellule A1.

Range("A1").Value = myValue

Résultat lorsque l’utilisateur entre la valeur 5 et clique sur le bouton OK.

InputBox Function Result

  1. La fonction InputBox a des arguments optionnels. La ligne du code ci-dessous montre une boîte d’entrée avec un titre affiché dans la barre de titre et a une valeur par défaut. La valeur par défaut est utilisée si aucune autre entrée est fournie.

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

InputBox Function in Excel VBA

Résultat lorsque l’utilisateur clique uniquement sur le bouton OK.

InputBox Function Result

Remarque: Placez votre curseur sur InputBox dans Visual Basic Editor et cliquez sur F1 pour l’aide sur les autres arguments optionnels.