Discussion :

[minoslha]

Quelqu'un peut il m'aider ?
L'ouverture du fichier Test1.xls doit se faire en lecture seule.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly

Seul le nom compte de la session "Perso" doit pouvoir enregistrer ce document.
Une fois enregistré, il faut retrouver le statut lecture seule. Si le doc doit être fermé seul le possesseur du compte "Perso" peut ou non sauvegarder celui ci. Bien sure, tout ceci doit se passer sans que des messages d'erreurs ou d'alertes viennent polluer l'écran de l'utilisateur. voici le fichier en question : Test1.xls
L'ouverture en lecture seule, c'est Ok
L'enregistrement pour le compte "Perso" semble Ok hormis les messages d'alertes (très perturbants), mais impossible de remettre ce doc en lecture seule quand l'enregistrement est terminé. Il faudrait un évènement "AfterSave"...
Je bloque, mais peut être que vous, vous avez la solution ?
Merci d'avance

[wilfried_42]

Bonjour,

Je n'ai pas tout compris, pour les messages intempestifs : regarde du coté de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.displayAlerts

Pour ce qui est de l'evennement AfterSave qui n'esiste Pas, regarde plutôt du Coté BeforeClose car l'application Ferme toujours ses classeurs avant que quitter (Et rien ne t'empeche alors de refaire une sauvegarde).