paersonnalise Xcel

[delepine]

bonjour,

j'ai mis ces daux lignes dans 'thisworbook' pour personnalise ma feuille excel

Application.Caption = 'PARTNERS'
ActiveWindow.Caption = 'OFFICE'

Mais comment remettre les titres d'origines a la fermerture de la feuille?


Merci de votre aide

 

[GusGus]

voilà les commandes pour rétablir la situation d'origine (à placer dans ThisWorkbook):

Private Sub workbook_beforeclose(Cancel As Boolean)

ActiveWindow.Caption = ActiveWorkbook.Name
Application.Caption = Empty

End Sub

remarque : si tu renomme ta feuille avec tes parametres persos à l'ouverture de celle-ci (avec une macro workbook_open() par exemple) il me parait inutile de lui restituer son nom par défaut - nom de sauvegarde du fichier - en fermant celle-ci, puisque l'action est instantannée est invisible...

voilà, j'éspère avoir répondu à ta question 🙂