Macros sur excel

Résolu
amine69500 -  
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

  1. amine69500 Auteur
    merci de votre aide

    c'est bien ca

    cordialement
    0
    1. Mike-31
      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