XL 2010 Combo multi col

[herve62]

Bonjour
J'ai un fichier à réparer , je ne maîtrise pas les combo multi colonnes même si j'ai vu les exo de notre JB
il y a un pb d'index de combo ?
Ici j'essaye de contourner le after_update peut être une solution mais il faut "enter" !!! pas terrible
Auriez vous une autre solution ?

 

[Jacky67]

Bonjour
J'ai un fichier à réparer , je ne maîtrise pas les combo multi colonnes même si j'ai vu les exo de notre JB
il y a un pb d'index de combo ?
Ici j'essaye de contourner le after_update peut être une solution mais il faut "enter" !!! pas terrible
Auriez vous une autre solution ?

Bonjour,
Une piste

Private Sub ComboBox1_change()
If Me.ComboBox1.ListIndex = -1 Then Exit Sub
   With Label1
      .Caption = Me.ComboBox1.Column(1)
      .TextAlign = fmTextAlignCenter
      .WordWrap = True
   End With
End Sub

 

[herve62]

Salut Jacky
oui merci , cela à l'air de fonctionner
simple mais il fallait y penser .. je connaissais avec Listbox mais pas combo !