Macros sur excel

Résolu
amine69500 Messages postés 422 Date d'inscription   Statut Membre Dernière intervention   -  
amine69500 Messages postés 422 Date d'inscription   Statut Membre Dernière intervention   -
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

2 réponses

Réponse 1 / 2
Mike-31 Messages postés 18406 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
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
Réponse 2 / 2
amine69500 Messages postés 422 Date d'inscription   Statut Membre Dernière intervention   12
 
merci de votre aide

c'est bien ca

cordialement
0