La fonction `MsgBox` en VBA (Visual Basic for Applications) est utilisée pour afficher une boîte de message à l’utilisateur. Voici comment vous pouvez l’utiliser :
Syntaxe de base de la fonction MsgBox
MsgBox(prompt, [buttons], [title], [helpfile], [context])
- prompt : C’est le texte que vous voulez afficher dans la boîte de message.
- buttons (facultatif) : Définit les boutons et l’icône à afficher. Il s’agit d’une valeur numérique ou d’une constante VBA qui spécifie le type de boutons à afficher.
- title (facultatif) : Le texte à afficher dans la barre de titre de la boîte de message.
- helpfile et context (facultatifs) : Ces paramètres sont généralement utilisés pour spécifier un fichier d’aide et un contexte d’aide, mais ils sont rarement utilisés.
Exemple simple
Voici un exemple simple qui affiche une boîte de message avec un message personnalisé :
Sub ExempleMsgBox()
MsgBox "Bonjour, voici un message simple !"
End Sub
Utilisation de l’argument `buttons`
Si vous souhaitez personnaliser les boutons affichés dans la boîte de message, vous pouvez utiliser l’argument `buttons`. Voici un exemple avec des boutons Oui et Non :
Sub ExempleMsgBoxBoutons()
Dim reponse As Integer
reponse = MsgBox("Voulez-vous continuer ?", vbYesNo + vbQuestion, "Confirmation")
If reponse = vbYes Then
MsgBox "Vous avez choisi Oui !"
Else
MsgBox "Vous avez choisi Non !"
End If
End Sub
- vbYesNo : Affiche les boutons Oui et Non.
- vbQuestion : Affiche une icône avec un point d’interrogation.
Valeurs de retour de MsgBox
La fonction `MsgBox` renvoie une valeur en fonction du bouton cliqué par l’utilisateur. Voici les valeurs de retour possibles :
- `vbOK` : L’utilisateur a cliqué sur OK.
- `vbCancel` : L’utilisateur a cliqué sur Annuler.
- `vbYes` : L’utilisateur a cliqué sur Oui.
- `vbNo` : L’utilisateur a cliqué sur Non.
- `vbAbort` : L’utilisateur a cliqué sur Abandonner.
- `vbRetry` : L’utilisateur a cliqué sur Réessayer.
- `vbIgnore` : L’utilisateur a cliqué sur Ignorer.
Vous pouvez utiliser ces constantes pour déterminer l’action à effectuer après que l’utilisateur a répondu à la boîte de message.
Exemple avec titre personnalisé
Sub ExempleMsgBoxTitre()
MsgBox "Ceci est un message important.", vbExclamation, "Attention !"
End Sub
Cela affiche une boîte de message avec une icône d’exclamation et un titre personnalisé “Attention !”.
En utilisant ces éléments, vous pouvez personnaliser et gérer les interactions avec l’utilisateur dans vos applications VBA.
Unlock Your Potential
Excel
Access
Power BI
