Je me réponds à moi-même.

Et dans la mesure ou ça peut intéresser quelqu'un, voici comment doit se terminer la ligne de code.

J'affiche cet exemple :

Msgbox "voici comment terminer la ligne de code", _
                vbInformation + vbOKOnly, "Boucherie"

- Copier et coller, ou bien écrivez, depuis la virgule (incluse) jusqu'au signe (") qui suit "Boucherie"

J'espère avoir été clair. Si ce n'est pas le cas, les pros me corrigeront

Je clos le sujet

Bonjour

En m'aidant de l'aide "msgbox", j'ai réussi à entrer un ptit message. Ca fonctionne.

Ce que je désirerais par contre, c'est modifier l'interface du message "msgbox". Sur la ptite barre en haut du message est écrit : "microsoft excel". Je souhaiterais remplacer ce libellé par "Boucherie" par exemple.

Comment modifier le petit code de la msgbox pour cela?

Merci

http://www.cjoint.com/c/FDhgPslQVY7

Bjr Guy.

Apprendre dis tu. Ben, ces codes je les copies, je suis un ignare en matière de VBA. De simples msgbox pour agrémenter un ptit programme (non VBA) que je me suis fait.

Merci pour la solution.

Bonne journée

Bonjour.

Voilà, j'ai copié ce code, et j'ai inséré des phrases à moi. Ca fonctionne parfaitement.

-------------

Sub Infos()
Dim Msg As String
Dim Reponse As Integer

    Reponse = MsgBox("Pour enregistrer, cliquer n'importe où sur le graphique", vbExclamation + vbOKOnly, "Infos")
    If Reponse = vbOK Then
    
        Reponse = MsgBox("Pour quitter, cliquer sur l'image (lac & montagne)", vbExclamation + vbOKOnly, "Infos")
        If Reponse = vbOK Then
               
            Reponse = MsgBox("Bien le bonjour chez vous", vbExclamation + vbOKOnly, "Infos")
        End If
    End If
End Sub

------------

Hors, lorsque je le modifie en insérant (au milieu) une phrase supplémentaire, ma macro ne fonctionne plus. Comme celle qui suit par exemple

--------------

Sub Infos()
Dim Msg As String
Dim Reponse As Integer

    Reponse = MsgBox("Pour enregistrer, cliquer n'importe où sur le graphique", vbExclamation + vbOKOnly, "Infos")
    If Reponse = vbOK Then
    
        Reponse = MsgBox("Pour quitter, cliquer sur l'image (lac & montagne)", vbExclamation + vbOKOnly, "Infos")
        If Reponse = vbOK Then

               Reponse = MsgBox("Avec cette phrase, ça ne fonctionne plus)", vbExclamation + vbOKOnly, "Infos")
        If Reponse = vbOK Then
               
            Reponse = MsgBox("Bien le bonjour chez vous", vbExclamation + vbOKOnly, "Infos")
        End If
    End If
End Sub

Si quelqu'un(e) peut me dire où est l'erreur?

Merci

200 mots. C'est déjà quelque chose .

Version d'Excel "2010".

Assez simple dis tu. Oui, faut y mettre bcp de "sien" qd même.

Ca fait longtemps que j'aimerais m'y mettre, mais ces mots anglais me rebutent.

Et puis il n'y a pas que ça bien sûr. Toute la structure d'une phrase doit être écrite précisément, un point c'est un point, tout comme une virgule.

Je tire mon chapeau à vous tous qui savez vs "balader" dans cet univers, si difficile pour moi.

Et il n'y a pas d'astuce bien sûr.

Je ne sais si je dois en faire part ici, cependant j'ai découvert il y a peu "softwarezator". Apparemment il est aisé d'apprendre avec ce logiciel. Je ne sais si tu connais.

Mon Wind 10 ne l'accepte pas, "incompatible", grrrrr.

Merci

Bonjour

Question bête ptet.

Le langage VBA est bien difficile à apprendre.

Y a t'il une astuce pour le comprendre sans connaitre la langue anglaise?

Merci