caption d'un command bouton variable

[pascal21]

bonjour
dans un usf j'ai des commandbutton qui pointent sur des onglets
le nom des onglets est variable
est-il possible que le 'caption' du bouton change en fonction du nom des onglets
ex si le bouton pointe sur un feuille appelée 'pascal'
le caption de ce bouton doit automatiquement avoir le même nom
merci

 

[Pierrot93]

Re : caption d'un command bouton variable

bonjour Pascal

regarde le code ci dessous, à l'initialisation de l'USF, renvoie dans le "caption" du "CommandButton1" le nom de l'onglet dont le codename est "Feuil1", généralement le codename de la feuille n'est pas modifié par l'utilisateur :

Option Explicit
Private Sub UserForm_Initialize()
CommandButton1.Caption = Feuil1.Name
End Sub

bon après midi
@+

 

[excalibur]

Re : caption d'un command bouton variable

bonjour pascal pierrot le forum une autre approche??

Option Explicit
Private Sub UserForm_Initialize()
CommandButton1.Caption = ActiveSheet.Name
End Sub