enregistrement uniquement par macro

Re : enregistrement uniquement par macro

Re bonjour

Trouvé

récupérer le nom d'utilisateur dans auto_open()
Range("f1").Value = ActiveWorkbook.UserStatus
le chercher dans une table

si oui
If Range("e1") = 1 Then
With Application.CommandBars("Standard")
.Controls("Enre&gistrer").Enabled = True
End With
With Application.CommandBars("Worksheet Menu Bar")
.Controls("Fichier").Enabled = True
End With
End If


si non

... false

dans auto_close
faire ... true pour autoriser les enregistrements des autres fichiers Excel


Donc les macros comportant "enregistrer" doivent avoir la commande ci dessus avec .... true avant et avec ...... false après pour toujours interdire l'enregistrement


Autre solution dans auto_close()
"remettre les fichier en état de marche " malgré les enregistrements intempestifs. Dans mon cas effacer des zones ... selon le cas

A+ je vais au boulot