Probleme sous excel avec VB

Résolu
mkos -  
 mkos -
Bonjour,

Je travaille sous word2003, jai un probleme avec une des maccros:

Private Sub ComboBox5_DropButtonClick()
If ComboBox5.ListCount = 0 Then
With ComboBox5
.AddItem "YES"
.AddItem "NO"
End With
End If

If ComboBox4.Value = "NO" Then
Worksheets("Sheet1").Range(Rows(154), Rows(166)).Hidden = True

End If
End Sub

J'ai deux valeurs dans ma combobox, je voudrais que si on coche YES, cela fasse apparaitre les lignes 154 a 166 et que si on coche non elle disparaisse... mais ca ne marche pas commme j'ai fait...

Quelqu'un a une idee svp?

Merci d'avance

Pierre :)
Configuration: Windows XP Internet Explorer 6.0

3 réponses

  1.
    tompols Messages postés 1273 Date d'inscription   Statut Contributeur Dernière intervention   460
     
    Bonjour,
    1-Tu devrais mettre ton code ds l'évenement Change de ton combobox (sauf l'initialisation des valeurs)
    2-Attention tu changes de combobox en route ? (With ComboBox5 .AddItem "YES" .AddItem "NO"......ComboBox4.Value = "NO")
    1
  2. mkos
     
    Dans l'evenement de change, c'est a dire ?
    Merci pour 2. en effete c'etait pas volontaire ce changement de box !
    0