changer le caption d'1 bouton

[gillet]

Bonjour,

j'ai un morceau de code rattaché à un commandbutton qui change le caption de celui-ci.

Mais je voudrai l'enregistrer pour que lorsque je réouvrirai le classeur, le caption soit le même qu'aprés la modification précédente.

Voici le code que j'utilise qui change bien le caption mais aprés réouverture du classeur, le caption reprend sa valeur initiale(rentrée cdans les propriétés)


Public Sub CommandButton1_Click()
Dim instant1 As Date
Dim nom As String

instant1 = Date
nom = "commandbutton1" & instant1

CommandButton1.Caption = nom
ThisWorkbook.Save

End Sub




merci d'avance pour toute aide


Christophe

 

[arnaud]

Salut 🙂,

a mon avis, le nom initiale se remettra tjs quelque soit ce que tu fasse ( enfin je me trompe peut être.....).
Peut être que en créant entièrement ton bouton dynamiquement ( j'ai jamais tester ce que ça donnai en vba ).
sinon il faut que tu sauvegarde le nom de ton bouton quelque part etr que ds l'évènement workbookopen de ton classeur tu change le nom.