Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

VBA workbook.saved

  • Initiateur de la discussion Initiateur de la discussion pascal_bidouille
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

pascal_bidouille

Guest
Bonjour,

J'ai un petit problème entre la propriété saved et la modification de boutons.

J'ai la macro suivante hors de mon fichier "modele base 6.xlsm" (dans un add-in) :
Code:
Sub modifier()
    Dim wndf As Workbook
    Set wndf = Workbooks("modele base 6.xlsm")
   
              wndf.Sheets(fndf).Envoi.Caption = "Validation"
              wndf.Sheets(fndf).check.Caption = "Rejeter"
   
    wndf.Saved = True
End Sub
(note : Envoi et check sont les noms de 2 boutons sur ma feuille excel "modele base 6.xlsm")

Si après l'exécution de cette macro j’exécute ceci (dans le fichier "modele base 6.xlsm) :
HTML:
Sub test_saved()
    MsgBox (ThisWorkbook.Saved)
End Sub

J'ai bien le résultat "vrai"

Par contre si je tente de fermer le fichier "modele base 6.xlsm" je vois dans la macro suivante que ThisWorkbook.Saved est faux !
HTML:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim check As Boolean
    check = ThisWorkbook.Saved
end sub

Note : j'ai fait le test : si je modifie une cellule et non pas les captions des bouton, je n'ai pas de pb.

Des idées ?

Merci
 
Re : VBA workbook.saved

Salut,

J'avais essayé mais cela ne fonctionnait pas.
Si quelqu'un connait la sol je suis toujours intéressé. En attendant j'ai du m'arranger pour ne pas avoir à modifier les "caption" des boutons ...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
1 K
Réponses
4
Affichages
488
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
432
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…