MsgBox dans Excel

pattt -  
Je souhaite faire apparaître une MsgBox à l'ouverture d'un fichier dans Excel en, afin d'indiquer une instruction aux personnes qui vont ouvrir mon fichier.

Quel code dois-je marquer dans VBA ?

Merci !
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. gbinforme Contributeur
    bonjour

    il suffit d'insérer dans thisWorkbook cette macro : 

    Private Sub Workbook_Open()
MsgBox "1ére instruction" & chr(13) &  "2éme instruction" 
End Sub


    & chr(13) te permet de changer de ligne

    1. fredoalex
      bonjour,
      est ce possible de mettre un message box que les Lundi à l ouverture du fichier?
      1. gbinforme Contributeur
        bonjour,

        Comme ceci tu devrais avoir la fonctionnalité : 

        If Application.WorksheetFunction.Weekday(Date, 2) = 1 Then
    MsgBox "C'est lundi !"
End If