Message contextuel

Bonjour,

Je souhaiterais afficher un message contextuel à l'ouverture d'un fichier.

Là où je bloque, c'est que je voudrais que la personne qui a eu le fichier puisse le désactiver si elle le souhaite.

(P.S.) Ce fichier est partagé avec une centaine de personne.

Merci,

Bonjour,

Exemple de macro avec message à coller dans le module "ThisWorkbook"

Private Sub Workbook_Open()
    MsgBox "Bonjour" & Chr(10) & "Après avoir lu ce message, cliquez sur OK pour le fermer"
End Sub

Cdlt

Bonjour,

autre proposition avec un plus.
Si tu changes le message mis en Const, le choix de l'utilisateur est outrepassé et l'affichage se fait à nouveau.
Des noms cachés sont créés. Evidemment, le fichier doit être enregistré pour mémoriser le choix de l'utilisateur.

Private Sub Workbook_Open()
    ' Affiche un message à l'ouverture
    ' l'utilisateur peut choisir de ne plus le réafficher
    ' Un nouveau message force l'affichage
    Const msg As String = "blablabla"

    On Error Resume Next
    If [msgOuv] <> msg Or [b_msgOuv] Then
        On Error GoTo 0
        ActiveWorkbook.Names.Add Name:="msgOuv", RefersTo:=msg
        ActiveWorkbook.Names.Add Name:="b_msgOuv", RefersTo:=True
        ActiveWorkbook.Names("msgOuv").Visible = False: ActiveWorkbook.Names("b_msgOuv").Visible = False
    End If
    If [b_msgOuv] Then
        If MsgBox(msg & vbLf & vbLf & "Réafficher ce message ?", vbInformation + vbYesNo, "Information") = vbNo Then
            ActiveWorkbook.Names.Add Name:="b_msgOuv", RefersTo:=False
            ActiveWorkbook.Names("b_msgOuv").Visible = False
        End If
    End If
End Sub

eric

Bonjour Arturo83, Eriiic,

Je vous remercie.

C'est parfait.

Par contre est il possible de n'avoir pas le message à l'ouverture du fichier "Ce classeur contient des macros. Voulez-vous désactiver les macros avant d’ouvrir le fichier ? Les macros peuvent contenir des virus susceptibles d’endommager votre ordinateur. Si le fichier provient d’une source fiable, cliquez sur Activer les macros. Si la source n’est pas entièrement fiable, cliquez sur Désactiver les macros."

Un grand merci,

Bonjour,

non, ça dépend des réglages de l'utilisateur et c'est la seule protection contre les macros indésirables.
Il est conseillé de le conserver comme ça.
De toute façon ce message n'apparait qu'une fois si c'est accepté.
eric

Merci Eric,

C'est fort apprécié.

Au plaisir,

Bonne soirée.