Macros sur excel

Résolu/Fermé
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 - 1 oct. 2010 à 15:09
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 - 1 oct. 2010 à 16:57
Bonjour,



je souhaiterais savoir comment dire que le caption ( le nom) de mon bouton se trouve dans la feuil2 range A

dans userform activate

commandbutton1.caption = Feuil2 cellule A1

merci de votre aide

cordialement
A voir également:

2 réponses

Mike-31 Messages postés 18346 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 13 novembre 2024 5 104
1 oct. 2010 à 16:01
Salut,

voila le code

CommandButton1.Caption = Sheets(2).[A1]

mais s'il doit changer de nom en fonction d'une valeur, tu peux poser des conditionnelles
ex. si en A1 valeur 5 caption = Titi, valeur 10 caption = Toto, valeur 20 caption = Tutu

If Sheets(2).[A1] = 5 Then
CommandButton1.Caption = "Titi"
ElseIf Sheets(2).[A1] = 10 Then
CommandButton1.Caption = "Toto"
ElseIf Sheets(2).[A1] = 20 Then
CommandButton1.Caption = "Tutu"
End If

et pour que la caption s'initialise à l'affichage de l'Userform mettre le code dans

Private Sub UserForm_Initialize()
If Sheets(2).[A1] = 5 Then
CommandButton1.Caption = "Titi"
ElseIf Sheets(2).[A1] = 10 Then
CommandButton1.Caption = "Toto"
ElseIf Sheets(2).[A1] = 20 Then
CommandButton1.Caption = "Tutu"
End If
End Sub
0
amine69500 Messages postés 422 Date d'inscription lundi 8 juin 2009 Statut Membre Dernière intervention 25 août 2013 12
1 oct. 2010 à 16:57
merci de votre aide

c'est bien ca

cordialement
0