vba MsgBox :
les boîtes de dialogues

Les boîtes de messages, ou boîtes de dialogue, permettent non seulement d'afficher de l'information à l'écran, mais aussi de susciter une réaction chez l'utilisateur du programme.

La procédure en cours est stoppée tant que l'utilisateur n'a pas cliqué sur un des boutons de la boîte.

Syntaxe :

Variable = MsgBox("Message" [, Type] [, "Titre de la fenêtre"])

variable : variable de type entier (integer) retournée par le type bouton cliqué.

Message : chaîne de caractères qui sera affichée dans la boîte de dialogue.

Type : constante qui définit les boutons et icônes à afficher.

Titre : chaîne de caractères qui sera affichée dans la barre de titre de la boîte de dialogue.

Constantes

constantes icône
Type	valeur	icône	utilisation
vbCritical	16		Erreur fatale
vbQuestion	32		Question
vbInformation	48		Information
vbExclamation	64		Remarque

Exemples

Message simple :

Public Sub test()
	MsgBox "hello world"
End Sub

<input type="button" value="Tester le script" name="BtnHW" /> 
<script language="VBScript">
<!--
	Sub BtnHW_OnClick
		MsgBox "hello world"
	End Sub
-->
</script>

Message avec icône de remarque et titre :

Public Sub test()
	MsgBox "hello world", vbExclamation, "infobrol"
End Sub

<input type="button" value="Tester le script" name="BtnHello" /> 
<script language="VBScript">
<!--
	Sub BtnHello_OnClick
		MsgBox "hello world", vbExclamation, "infobrol"
	End Sub
-->
</script>

Private Sub Button_Supprime_Click ( )
	Dim Sup
	Sup = MsgBox("Veuillez confirmer",vbYesNo + 256 + vbCritical, "Confirmation")
	If Sup = vbYes Then
		MsgBox "Action confirmée"
	else
		MsgBox "Action annulée"
	End If
End Sub

<input type="button" value="Tester le script" name="BtnConfirm" /> 
<script language="VBScript">
<!--
	Sub BtnConfirm_OnClick
		Dim Sup
		Sup = MsgBox("Veuillez confirmer",vbYesNo + 256 + vbCritical, "Confirmation")
		If Sup = vbYes Then
			MsgBox "Action confirmée"
		else
			MsgBox "Action annulée"
		End If
	End Sub
-->
</script>

Remarque :

Comme vous cette page est affichée depuis un navigateur inconnu, avec le système d'exploitation inconnu, les boutons de tests des scripts VBA n'apparaissent pas. Pour tester les codes, vous pouvez visiter le site à l'aide d'Internet Explorer

Structure du document