MSGBOX différent si fichier en lecture seule

Bonjour à tous,

Est-il possible d'associer à un bouton différentes macro, selon que le fichier est en lecture seule ou non ?

En fait, grace à ma macro, je mets à jour mensuellement un fichier que je partage, en lecture seule, sur le serveur au bureau.

Et à mon bouton 'UPDATE', je voudrais associer :

  • ma macro, si le fichier est ouvert, avec mon mot de passe
  • une MSGBOX, si le fichier a été ouvert en lecture seule (genre "fichier mis à jour en début de mois, contacter zadig si questions")

J'imagine que ça doit être possible et qu'il doit y avoir un SI fichier en lecture seule, alors MSGBOX, sinon ma macro

Mais ça dépasse de loin mes connaissances ...

Merci pour votre aide

J'ai fini par trouver la solution, je la mets ici, ça peut servir à quelqu'un:

Sub

If ActiveWorkbook.ReadOnly Then

MsgBox "Ce que vous voulez marquer"

Else

toute votre macro

End If

End Sub

Bonjour,

If ThisWorkbook.ReadOnly Then
    MsgBox "lecture seule"
Else
    ' c'est moi
End If

eric

Rechercher des sujets similaires à "msgbox different fichier lecture seule"