Fonction MsgBoxMsgBox function

Affiche un message dans une boîte de dialogue, attend que l’utilisateur clique sur un bouton et renvoie un Entier indiquant sur quel bouton l’utilisateur a cliqué.Displays a message in a dialog box, waits for the user to click a button, and returns an Integer indicating which button the user clicked.

SyntaxeSyntax

MsgBox (prompt, [ buttons, ] [ title, ] [ helpfile, context ])MsgBox (prompt, [ buttons, ] [ title, ] [ helpfile, context ])


La syntaxe de la fonction MsgBox comprend les arguments nommés suivants :The MsgBox function syntax has these named arguments:

ÉlémentPart DescriptionDescription
promptprompt Obligatoire.Required. Expression de chaîne affichée en tant que message dans la boîte de dialogue.String expression displayed as the message in the dialog box. La longueur maximale de prompt est d’environ 1 024 caractères, en fonction de la largeur des caractères utilisés.The maximum length of prompt is approximately 1024 characters, depending on the width of the characters used. Si prompt est constitué de plus d’une ligne, vous pouvez séparer les lignes en utilisant un caractère retour chariot (Chr(13)), un caractère de saut de ligne (Chr(10)), ou une combinaison de caractères retour chariot et saut de ligne ((Chr(13) & (Chr(10)) entre chaque ligne.If prompt consists of more than one line, you can separate the lines by using a carriage return character (Chr(13)), a linefeed character (Chr(10)), or carriage return - linefeed character combination (Chr(13) & Chr(10)) between each line.
buttonsbuttons Facultatif.Optional. Expression numérique qui est la somme des valeurs qui spécifient le nombre et le type des boutons à afficher, le style d’icône à utiliser, l’identité du bouton par défaut et la modalité de la zone de message.Numeric expression that is the sum of values specifying the number and type of buttons to display, the icon style to use, the identity of the default button, and the modality of the message box. Si cet argument est omis, la valeur par défaut pour_buttons_ est 0.If omitted, the default value for buttons is 0.
titletitle Facultatif.Optional. Expression de chaîne affichée dans la barre de titre de la boîte de dialogue.String expression displayed in the title bar of the dialog box. Si vous omettez title, le nom de l’application est placé dans la barre de titre.If you omit title, the application name is placed in the title bar.
helpfilehelpfile Facultatif.Optional. Expression de chaîne indiquant le fichier d’Aide à utiliser pour fournir une aide contextuelle pour la boîte de dialogue. String expression that identifies the Help file to use to provide context-sensitive Help for the dialog box. Si helpfile est fourni, context doit également être indiqué.If helpfile is provided, context must also be provided.
contextcontext Facultatif.Optional. Expression numérique indiquant le numéro de contexte d’Aide attribué par l’auteur de l’Aide à la rubrique appropriée. Numeric expression that is the Help context number assigned to the appropriate Help topic by the Help author. Si context est fourni, helpfile doit également être indiqué.If context is provided, helpfile must also be provided.

ParamètresSettings

Les paramètres de l’argumentbuttons sont :The buttons argument settings are:

ConstanteConstant ValeurValue DescriptionDescription
vbOKOnlyvbOKOnly 00 Affiche le boutonOK uniquement.Display OK button only.
vbOKCancelvbOKCancel 11 Affiche les boutons OK et Annuler.Display OK and Cancel buttons.
vbAbortRetryIgnorevbAbortRetryIgnore 22 Affiche les boutonsAbandonner, Réessayer, et Ignorer.Display Abort, Retry, and Ignore buttons.
vbYesNoCancelvbYesNoCancel 33 Affiche les boutons Oui, Non et Annuler.Display Yes, No, and Cancel buttons.
vbYesNovbYesNo 44 Affiche les boutons Oui et Non.Display Yes and No buttons.
vbRetryCancelvbRetryCancel 55 Affiche les boutons Réessayer et Annuler.Display Retry and Cancel buttons.
vbCriticalvbCritical 1616 Affiche l’icôneMessage critique.Display Critical Message icon.
vbQuestionvbQuestion 3232 Affiche l’icôneRequête d’avertissement.Display Warning Query icon.
vbExclamationvbExclamation 4848 Affiche l’icôneMessage d’avertissement.Display Warning Message icon.
vbInformationvbInformation 6464 Affiche l’icôneMessage d’information.Display Information Message icon.
vbDefaultButton1vbDefaultButton1 00 Le premier bouton est le bouton par défaut.First button is default.
vbDefaultButton2vbDefaultButton2 256256 Le deuxième bouton est le bouton par défaut.Second button is default.
vbDefaultButton3vbDefaultButton3 512512 Le troisième bouton est le bouton par défaut.Third button is default.
vbDefaultButton4vbDefaultButton4 768768 Le quatrième bouton est le bouton par défaut.Fourth button is default.
vbApplicationModalvbApplicationModal 00 Boîte de dialogue modale. L'utilisateur doit répondre au message affiché dans la zone de message avant de pouvoir continuer de travailler dans l'application actuelle.Application modal; the user must respond to the message box before continuing work in the current application.
vbSystemModalvbSystemModal 4 0964096 Modal système. Toutes les applications sont interrompues jusqu'à ce que l'utilisateur réponde au message affiché dans la zone de message.System modal; all applications are suspended until the user responds to the message box.
vbMsgBoxHelpButtonvbMsgBoxHelpButton 1638416384 Ajoute le boutonAide à la zone de message.Adds Help button to the message box.
vbMsgBoxSetForegroundvbMsgBoxSetForeground 6553665536 Indique la fenêtre de zone de message comme fenêtre de premier plan.Specifies the message box window as the foreground window.
vbMsgBoxRightvbMsgBoxRight 524288524288 Le texte est aligné à droite.Text is right-aligned.
vbMsgBoxRtlReadingvbMsgBoxRtlReading 10485761048576 Spécifie que le texte doit apparaître pour être lu de droite à gauche dans les systèmes en Arabe et en Hébreu.Specifies text should appear as right-to-left reading on Hebrew and Arabic systems.

Le premier groupe de valeurs (0-5) décrit le numéro et le type de boutons affichés dans la boîte de dialogue ; le deuxième groupe (16, 32, 48, 64) décrit le style d’icône ; le troisième groupe (0, 256, 512) détermine quel bouton est celui par défaut ; et le quatrième groupe (0, 4096) détermine la modalité de la zone de message.The first group of values (0-5) describes the number and type of buttons displayed in the dialog box; the second group (16, 32, 48, 64) describes the icon style; the third group (0, 256, 512) determines which button is the default; and the fourth group (0, 4096) determines the modality of the message box. Lorsque vous ajoutez des numéros pour créer une valeur finale pour l’argument buttons, utilisez un seul numéro de chaque groupe.When adding numbers to create a final value for the buttons argument, use only one number from each group.

Notes

Ces constantes sont spécifiées par Visual Basic pour Applications.These constants are specified by Visual Basic for Applications. Par conséquent, elles peuvent être utilisées n’importe où dans votre code à la place de valeurs réelles.As a result, the names can be used anywhere in your code in place of the actual values.

Valeurs de retourReturn values

ConstanteConstant ValeurValue DescriptionDescription
vbOKvbOK 11 OKOK
vbCancelvbCancel 22 CancelCancel
vbAbortvbAbort 33 AbandonnerAbort
vbRetryvbRetry 44 RéessayerRetry
vbIgnorevbIgnore 55 IgnoreIgnore
vbYesvbYes 66 OuiYes
vbNovbNo 77 NonNo

RemarquesRemarks

Lorsque helpfile et context sont fournis tous les deux, l’utilisateur peut appuyer sur F1 (Windows) ou AIDE (Macintosh) pour afficher la rubrique d’Aide correspondant à context.When both helpfile and context are provided, the user can press F1 (Windows) or HELP (Macintosh) to view the Help topic corresponding to the context. Certainesapplications hôtes, par exemple, Microsoft Excel, ajoutent automatiquement un bouton Aide à la boîte de dialogue.Some host applications, for example, Microsoft Excel, also automatically add a Help button to the dialog box.

Si la boîte de dialogue affiche un bouton Annuler, appuyer sur la touche ÉCHAP a le même effet que de cliquer sur Annuler.If the dialog box displays a Cancel button, pressing the ESC key has the same effect as clicking Cancel. Si la boîte de dialogue contient un boutonAide, une aide contextuelle est fournie pour la boîte de dialogue.If the dialog box contains a Help button, context-sensitive Help is provided for the dialog box. Toutefois, aucune valeur n’est renvoyée jusqu'à ce que l’utilisateur clique sur un des autres boutons.However, no value is returned until one of the other buttons is clicked.

Notes

Pour spécifier plus que premier argument nommé, vous devez utiliser MsgBox dans une expression.To specify more than the first named argument, you must use MsgBox in an expression. Pour omettre certains arguments de position, vous devez inclure le séparateur de virgule correspondant.To omit some positional arguments, you must include the corresponding comma delimiter.

ExempleExample

Cet exemple utilise la fonctionMsgBox pour afficher un message d’erreur critique dans une boîte de dialogue avec les boutonsOui et Non.This example uses the MsgBox function to display a critical-error message in a dialog box with Yes and No buttons. Le boutonNon est spécifié en tant que réponse par défaut.The No button is specified as the default response. La valeur renvoyée par la fonctionMsgBox dépend du bouton choisi par l’utilisateur.The value returned by the MsgBox function depends on the button chosen by the user. Cet exemple part du principe que DEMO.HLP est un fichier d’Aide qui contient un sujet avec un numéro de contexte Aide égal à 1000.This example assumes that DEMO.HLP is a Help file that contains a topic with a Help context number equal to 1000.

Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue ?"    ' Define message.
Style = vbYesNo + vbCritical + vbDefaultButton2    ' Define buttons.
Title = "MsgBox Demonstration"    ' Define title.
Help = "DEMO.HLP"    ' Define Help file.
Ctxt = 1000    ' Define topic context. 
        ' Display message.
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"    ' Perform some action.
Else    ' User chose No.
    MyString = "No"    ' Perform some action.
End If

Voir aussiSee also

Assistance et commentairesSupport and feedback

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ?Have questions or feedback about Office VBA or this documentation? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.