Modèles de MSG

Bonjour à tous,

je vous dépose trois msg avec une syntaxe différente

Sub Messag_Continu()                  'Msg continu sur une seule ligne
    MsgBox Prompt:="Bonjour ," & _        
    "Comment allez-vous ?"        
End Sub        

Sub Messag_Continu2()                        ' le même msg sur deux lignes
    MsgBox Prompt:="Bonjour ," & Chr(13) & _            
    "comment allez-vous ?"            
End Sub            

Sub Ouverture()                    '     un msg sur plusieurs lignes avec une ligne vide intercalée.
     MsgBox Prompt:="La Feuille ' Macros ' contenant les modèles" & Chr(13) & _                    
    "est protégée par un mot de passe" & Chr(13) & _                    
    "Vous pouvez les visualiser mais pas les modifier" & Chr(13) & _                    
    " " & Chr(13) & _                    
    "Le code ' Visual Basic ' est également protégé." & Chr(13) & _                    
    "Vous ne pouvez y avoir accès sans le mot de passe."                    

End Sub

Je vous joins un fichier avec les macros

Bonne journées à tous.

Papy Pierrot

20modele-msg.xlsm (20.15 Ko)

Bonjour Papy Pierrot,

Sympa ton exemple, pour ceux qui ne connaissaient pas la syntaxe. Mais pourquoi protéger ton code puisque tu le détailles dans ton message et dans ta feuille ?

Pour info, je préfère remplacer Chr(13) par vbCr que je trouve plus commode et plus rapide à entrer au clavier.

Cordialement.

Bonsoir Papou net,

Mes macros sont protégées par un mot de passe car elles sont tirées d'un fichier rempli d'exemples de macros.

Sinon, mot de passe :Cp1360Pz.

merci de ton petit mot.

Amicalement, Papy Pierrot

Rechercher des sujets similaires à "modeles msg"