Interdire l'enregistrement d'un fichier

[gangsterus]

Hello!

Est-il possible dans le code d'interdire l'enregistrement des modifications à la fermeture du fichier?

Merci!

[Heureux-oli]

Oui, on peut interdire les enregistrements, le plus simple est de protéger le fichier par mot de passe.

On peut utiliser ce code :

Code :

1
2
3
4
Private Sub Document_Close()
ActiveDocument.Saved = True
 
End Sub

Mais un peu plus de renseignement nous aiderait.

[gangsterus]

Hello!

Merci pour cette réponse!

Ce sujet est un peu lié à celui que j'ai déjà ouver plus haut au sujet de l'insertion de données avec un formulaire.
Vu qu'il est difficilement possible de supprimer du texte de façon ciblée, j'ai pensé qu'il serait mieux que l'utilisateur insère des données via le formulaire mais qu'il ne puisse pas enregistrer ses modifications. Ainsi, quand il l'ouvre, il a toujours le même modèle.
J'ai essayé cette solution, qui m'a déjà permis de bien avancer.
En revanche, l'utilisateur a toujours la possibilité de cliquer sur le bouton enregistrer ou d'aller le chercher dans le menu avant de quitter.

Est-il donc possible de désactiver la fonction enregistrer?

Merci d'avance

[Sepia]

Salut,

Oui et non. Super comme réponse.

Il n'est pas possible de supprimer une fonction de base comme "Enregistrer" mais la bonne nouvelle est que tu peux la remplacer par une macro qui ne fait... rien. Mais il faut aussi le faire pour les raccourcis clavier, les commandes parallèles comme "Enregistrer Sous...". Mais Attention, il faut que ton utilisateur n'est pas interdit l'exécution des macros (niveau de sécurité fort)

Mais je pense que pour ton cas, tu devrais suivre les conseils de Heureux-Oli (qui sont quasiment toujours bons) et faire un formulaire Word avec une protection de certaines zones à l'écriture, ainsi ton utilisateur ne peut pas modifier ou supprimer ses zones protégées (et ça marche toujours même si il a interdit l'exécution des macros). Je suis presque sûr que tu auras ce que tu veux (des zones accessibles et des zones protégées contre les modifications).

[elparagouayo]

Hello m'sieur Sepia.

Je serais assez intéressé par la solution de remplacer "enregistrer sous..." par une macro qui ne fait rien.
Tu pourrais m'en dire un peu plus ?

Merci.

[Sepia]

Salut elparagouayo,

Tu fais une macro qui ne fait rien, du style

Code :

1
2
3
4
 
Sub NeRienFaire
   '// Ben voilà, on est ici pour ne rien faire ==> on ne fait rien
End Sub

Il te suffit alors d'aller dans 'Outils-Personnaliser-Barre d'outils et de menu" puis de remplacer la commande "Enregistrer sous..." par "NeRienFaire", sans oublier les raccourcis clavier....

A+