Macros sur excel

Résolu/Fermé

amine69500 Messages postés 418 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 418 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:

Macros sur excel
Liste déroulante excel - Guide
Formule excel - Guide
Si et excel - Guide
Aller à la ligne sur excel - Guide
Mise en forme conditionnelle excel - Guide

2 réponses

Réponse 1 / 2

Mike-31 Messages postés 18310 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 29 mars 2024 5 073
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

Réponse 2 / 2

amine69500 Messages postés 418 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

Newsletters