Le Fonction MsgBox dans Excel VBA peut renvoyer un résultat alors qu'un simple MsgBox ne le peut pas.
Situation:
Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivantes :
1. Tout d'abord, nous déclarons une variable appelée réponse de type Integer.
Réponse faible en tant qu'entier
2. Nous utilisons la fonction MsgBox pour initialiser la réponse variable avec l'entrée de l'utilisateur.
La fonction MsgBox, lorsqu'elle utilise des parenthèses, a trois arguments. La première partie est utilisée pour le message dans la boîte de message. Utilisez la deuxième partie pour spécifier les boutons et icônes que vous souhaitez voir apparaître dans la boîte de message. La troisième partie est affichée dans la barre de titre de la boîte de message.
answer = MsgBox("Êtes-vous sûr de vouloir vider la feuille ?", vbYesNo + vbQuestion, "Vider la feuille")
Remarque : placez votre curseur sur vbYesNo dans Visual Basic Editor et cliquez sur F1 pour voir quels autres boutons et icônes vous pouvez utiliser. Au lieu des constantes vbYesNo et vbQuestion, vous pouvez également utiliser les valeurs correspondantes 4 et 32.
3. Si l'utilisateur clique sur le bouton Oui, Excel VBA vide la feuille. Si l'utilisateur clique sur le bouton Non, rien ne se passe. Ajoutez les lignes de code suivantes pour y parvenir.
Si réponse = vbOui Alors
Cells.ClearContents
Autre
'ne fais rien
Fin si
4. Cliquez sur le bouton de commande sur la feuille.
5. Cliquez sur Oui.
Résultat:
