Bâtisseur de boîtes à messages
Le générateur de boîtes de messages génère du code pour les boîtes de messages et les boîtes de saisie. Il se trouve dans le menu UI de l’éditeur VBA :
Et dans le ruban Excel :
Boîte à messages
Les boîtes de message sont utilisées pour inviter les utilisateurs. La MessageBox par défaut (vbOKOnly) communique des informations et demande simplement à l’utilisateur de cliquer sur « ok ».
msgbox "Complete" (Terminé)
D’autres types de MessageBox demandent aux utilisateurs de faire un choix (par exemple, OK / Annuler, Réessayer / Annuler) :
La zone de prévisualisation affiche la MessageBox actuellement configurée. Il suffit de modifier les options pour que la zone de prévisualisation affiche immédiatement la MessageBox mise à jour et que la zone Code généré affiche le code généré :
Quelques points à noter :
Vous pouvez définir un bouton par défaut en cliquant sur le bouton spécifique dans la section « Boutons et bouton par défaut ». Il s’agit du bouton qui sera activé si l’utilisateur clique sur Entrée lorsque la boîte de message est affichée. Dans les deux images précédentes, l’option « Non » a été sélectionnée comme bouton par défaut.
La MessageBox affiche une valeur correspondant au bouton sur lequel l’utilisateur a cliqué. Dans la boîte du code généré, vous pouvez voir qu’une instruction Select Case est utilisée pour gérer les différentes options :
Sélectionner la réponse du cas
Cas vbYes
Cas vbNo
Case vbCancel
Fin de la sélection
La procédure doit exécuter des actions différentes selon que l’on sélectionne Oui, Non ou Annuler. Pour ce faire, saisissez les actions souhaitées dans l’instruction Select Case :
Sélectionner le cas réponse
Cas vbYes
range("a1").value = "yes"
Cas vbNo
range("a1").value = "no"
Case vbCancel
Goto EndMacro
Fin de la sélection
Remarque : il n’est pas nécessaire de définir des actions avec une MessageBox de type OKOnly, car une seule option est disponible.
Constructeur de boîte de saisie
Les InputBox demandent aux utilisateurs de saisir une valeur. Cette valeur est affectée à une variable :
Dim answer As Double
answer = Application.InputBox("Interest Rate", "Enter Interest Rate", Type:=1)
La partie InputBox du Builder fonctionne de manière très similaire à la partie MessageBox. Cependant, il y a deux options que nous voulons mettre en évidence.
Type d’entrée
Le type d’entrée indique à VBA le type d’entrée qu’il attend de l’utilisateur. Cela permet à VBA de déterminer si la valeur saisie est valide.
Remarque : pour éviter les erreurs, lorsque vous travaillez avec le type d’entrée Référence de cellule, Application.ScreenUpdating doit être réglé sur True : Application.ScreenUpdating = True
Valeur par défaut L’option de valeur par défaut permet de pré-remplir la zone de saisie.
Commencez à automatiser Excel
