saisie inputbox vers msgboxRésolu

Question

Bonjour tout le monde!

J'ai réalisé une saisie d'information avec inputbox, la réponse de la saisie apparaitra dans le msgbox.

Voicie le code ci-dessous.

Dim Prenom

Prenom = InputBox("Entree votre Prénom", "Démarage ", "")
If Prenom = "" Then

MsgBox "Domage"

Else

MsgBox "Bienvenue ", vbExclamation & Prenom

End If

Je souhaiterais savoir comment faire apparaitre le point d'exclamation dans le msgbox, j'ai réalisé ce code mais il marque erreur de compilation.

Mercie de votre aide.

A bientôt

cs_ITALIA · Accepted Answer

coches reponses acceptées ...MERCI

It@li@

MoiOlivier · Answer

Salut,

...
else
MsgBox "bienvenue " & Prenom, vbExclamation
end if

@+

RicoNuch · Answer

Hello...

Essaye ça :

(...)
If Prenom = "" Then

MsgBox "Dommage ! "

Else

MsgBox "Bienvenue, " & Prenom & " !", vbExclamation

End If

RicoNuch

cs_ITALIA · Answer

Dommage prend 2 "m"

vbCritical   ou 16 .............Affiche l'icône Message critique. 
vbQuestion   ou 32......... Affiche l'icône Demande d'avertissement. 
vbExclamation  ou...........  48 Affiche l'icône Message d'avertissement. 
vbInformation  ou  64 ........Affiche l'icône Message d'information. 

Dim Prenom

Prenom = InputBox("Entree votre Prénom", "Démarage ", "")
If Prenom = "" Then
    Reponse = MsgBox("Dommage", , "Message")
Else
    Reponse = MsgBox("Bienvenue " & Prenom, vbExclamation, "Message")
End If

It@li@

cs_rene38 · Answer

pendant qu'on y est :
Prenom = InputBox("Entrez votre Prénom", "Démarrage ", "")

developvbdebut · Answer

Bonsoir

Ca fonctionne.

Mercie de votre aide.

A bientôt

Saisie inputbox vers msgbox

6 réponses

Discussions similaires