XL 2016 Question sur les propriétés d'un fichier Excel

Nadine2021 · 28 Mai 2021

Bonjour,

J'ai crée sur Excel un outil solide pour la gestion des rdvs et je l'ai partagé avec d'autres directions, j'ai remarqué qu'ils ont pu changer l'auteur.

Sur un autre fichier Excel que j'ai crée avec des macros et un Userform, j'ai pu écrire mon nom et mon adresse courriel et mettre un code pour les macro, donc la modification est impossible., mais le fichier en question contient beaucoup de formules sans macro ou Userform.

Y'a t'il un moyen de conserver l'auteur du fichier,

Merci beaucoup pour votre aide

Phil69970 · 28 Mai 2021

Bonjour Nadine

Tu peux le faire par macro sur la fermeture et/ou l'ouverture du fichier

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

Private Sub Workbook_Open()
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

@Phil69970

Nadine2021 · 28 Mai 2021

Bonjour,

Merci beaucoup pour cette solution,

Mais quand j'ai essayé, il faut sauvegarder le fichier pour faire apparaitre le nom, et activer le contenu, on peut sauvegarder sans activer le contenu et dans ce cas la macro ne s'exécute pas.

Merci d'avance pour votre aide

Phil69970 · 28 Mai 2021

Re

Soit tu le mets à l'ouverture du fichier

VB:

Private Sub Workbook_Open()
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

Soit tu le le mets à la fermeture du fichier

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

Soit tu fais les 2 à l'ouverture ET à la fermeture du fichier

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

Private Sub Workbook_Open()
ThisWorkbook.BuiltinDocumentProperties("Author").Value = "toto"
End Sub

Dans tous les cas il faudra bien enregistrer le fichier à un moment ou à un autre et si tu ouvres le fichier sans activer les macros alors si tu as des macros dans ton fichier elle ne fonctionnera pas et le fichier sera pas beaucoup fonctionnel.

@Phil69970

Nadine2021 · 28 Mai 2021

C'est parfait,

Un grand merci

XL 2016 Question sur les propriétés d'un fichier Excel

Nadine2021

XLDnaute Nouveau

Phil69970

XLDnaute Barbatruc

Pièces jointes

Nadine2021

XLDnaute Nouveau

Phil69970

XLDnaute Barbatruc

Nadine2021

XLDnaute Nouveau

Discussions similaires