Page 1 sur 1

Partage de fichier

Posté : 10 juin 2013, 12:42
par Rusttyc
Bonjour à tous,

J'ai un problème lors du partage d'un fichier,

Ma procédure d'ouverture du fichier est la suivante :
Private Sub Workbook_Open()

ActiveWorkbook.Protect Structure:=False, password:="editmode"
  
'lock sheets : "Durations and phases"
Sheets("Durations").Protect password:="editmode"
Sheets("phases").Protect password:="editmode"

'Hide sheets "control", "event_track", "Terminated projects"
Sheets("Control").Visible = xlVeryHidden
Sheets("Event_track").Visible = xlVeryHidden
Sheets("Terminated projects").Visible = xlVeryHidden
Sheets("Instructions").Visible = xlVeryHidden

'Lock structure (impossible to add sheets, change their names etc...)
ActiveWorkbook.Protect Structure:=True, password:="editmode"

'Activate the Event_tracker
Sheets("control").Range("B14").Value = "true"

End Sub
J'ai envoyé le fichier à un collègue par mail et quand il l'a ouvert il a eu le message suivant :
Image

Et en cliquant sur "Enable Editing", la procédure d'ouverture n'a pas dû s'exécuter et aucune feuille n'a été protégée/cachée.

Comment s'assurer que le workbook sera protégé à l'ouverture?

Je précise que je n'ai jamais eu ce message sur mon ordinateur.


Merci d'avance.

Re: Partage de fichier

Posté : 12 juin 2013, 13:26
par Rusttyc
Bonjour,

Le problème arrive dès que j'envoie le fichier par mail, téléchargé depuis le web le fichier s'ouvre en lecture seule et la macro de lancement n'est pas effectuée.

Vraiment personne ne sait comment le contraindre à la faire ?


Merci.