Discussion :

[vanhoa]

Bonjour,

J'ai cree une macro liee a une combobox activeX (cette comboxbox contient une liste d'annee).

Elle marche tres bien, mais le seul probleme est que l'annee que je selectionne dans ma combobox, elle ne s'affiche pas, elle reste invisible.

Pour etre plus precis, l'annee que je selectionne modifie les plages de donnees d'un graph.

Quand je prends 2013 par exemple, parfait, ca marche, mon graph se modifie, mais la ou j'ai selectionne mon annee, il n'y a rien de marque. c'est vide.
J'aimerais que l'annee 2013 reste apres avoir ete selectionnee, comme toute combobox.

J'ai cherche dans les parametres, mais je ne trouve rien... Je trouve ca tres etrange que ca n'apparaisse pas. Car la valeur est effectivement la, puisque le graphe change. Et d'ailleurs si je mets une msgbox pour me dire la valeur de ma combobox apres avoir selectionner mon annee, ca me repond bien 2013 si j'ai choisi 2013.


Si quelqu'un a deja eu ce probleme...

Merci de votre aide!!

vanhoa

[parmi]

Bonjour,

C'est possiblement lors du traitement qu'il se passe quelque chose.
Au départ de ta macro, si tu mets Stop, la macro va arrêter et tu pourrais voir si le texte est bien apparent ou non...

[vanhoa]

Bonjour Parmi,

Oui, j'avais deja remarque ca, en fait si je mets une MsgBox ComboBox.value dans mon code, ca "stop" la macro et je vois effectivement l'annee que j'ai selectionnee est surlignee en bleu dans ma ComboBox.
Et ma MsgBox affiche bien la valeur de mon annee selectionnee (mais je n'avais pas de doute sur le fait que la valeur soit bien enregistree puisque de toute facon mon graphique se modifiait bien, c'etait juste l'annee selectionnee que je voulais voir apparaitre dans ma CheckBox)

J'ai resolu le probleme en changeant le code qui se situait dans ComboBox1_DropButtonClick(), car il faut que la liste de la combobox puisse se mettre a jour si on rajoute des elements.
Au debut j'utilisais la fonction .Clear pour supprimer les donnees de la liste et recreer a nouveau la liste avec la fonction .AddItem
Apparemment ca devait venir de .Clear car en changeant mon code de la maniere suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Private Sub ComboBox1_DropButtonClick()
 
 
Dim year As Integer
 
    year = WorksheetFunction.CountA(sh_data.Range("C:C"))
 
    If ComboBox1.ListCount <> year Then
            For i = 1 To year
                ComboBox1.AddItem (sh_Data.Cells(i, 3))
            Next
        Else
    End If
 
End Sub

Ca marche!

Mais je ne comprends toujours pas pourquoi le .Clear ne marche pas puisque je le mettais en debut de code et ensuite je recreais a nouveau ma liste!

vanhoa

[parmi]

Je n'ai jamais utilisé DropButtonClick...

Si j'étais toi j'opterais pour charger le combobox à l'ouverture du classeur ou encore à l'activation de la feuille où il est.

Petit extrait de l'aide concernant DropButtonClick:
Survient chaque fois qu'une liste déroulante modifiable apparaît et disparaît.
C'est donc dire que lorsque tu cliques le combobox, ta macro charge la liste et lorsque tu choisis un item, elle recharge une autre fois... Ce n'est pas vraiment ce que tu veux, je pense...

Attention aussi à l'utilisation de mots qui pourraient être réservés par l'application comme Year...