Discussion :

[mattgui]

Bonjour à tous,

Je dispose d'un userform dans lequel j'ai deux ComboBoxs. J'aimerai faire en sorte que la liste de la Combobox2 dépende de la sélection de la Combobox1.
Pour cela, j'ai fait en sorte qu'en sélectionnant un item dans la première box, une requête s'effectue actualisant les données de la Rowsource de la Combobox2.
Or, cette requête prend un peu de temps puisqu'elle communique avec une base de données Access. de ce fait, j'ai trouvé la solution idéale : désactiver la sélection dans la Combobox2 le temps de la requête puis la réactiver.

Mon code se présente de cette façon :

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub ComboBox1_AfterUpdate()
    Sheets("Paramètres").Range("A2").Value = ComboBox1.Value
    ComboBox3.Enabled = False
    ActiveWorkbook.Connections("Requête*-*Dimensions").Refresh
    X = Application.CountA(Sheets("Listes").Columns("D"))
    ComboBox3.RowSource = "Listes!D2:D" & X
End Sub
Private Sub ComboBox3_AfterUpdate()
    ComboBox3.Enabled = True
End Sub

A priori, la propriété AfterUpdate ne prend pas en compte la mise à jour de la RowSource. Je voulais donc savoir s'il existe une propriété de cette Combobox pouvant me déclencher mon événement dès que la Rowsource est mise à jour ...

Merci d'avance pour votre aide,

Matt

[Phil Free]

Bonjour,

j'ai il n'y a pas très longtemps, tenté d'aider une personne qui cherchais à mettre en attente sont code lors d'une requête vers access (voir ici). Je pensais qu'en passant par la class querytable d'excel cela marcherait mais que nenni !
A mon avis il va te falloir, comme cette personne, passer par un artifice qui consiste à utiliser l'evenement change de la plage mise à jour par ta requête.
Genre tu effaces le contenue de la plage avant lancement de la requête et tu attends l'evenement "Worksheet_Change"

Courage

[mattgui]

Salut Phil,

Ce qui est drôle c'est que cette personne ... bah c'est moi !
Du coup oui, c'est une méthode que je viens de tenter et cela fonctionne à moitié. En fait, je ne sais pas pourquoi mais mon userform arrive à trigger le Worksheet_Change alors que je ne touche à rien qui touche à cette feuille. C'est très dérangeant puisque ducoup ça tourne en boucle.
Fin bref', je cherche à voir si je trouve une adaptation pour cette méthode mais effectivement, je ne pense pas que je puisse réaliser ça directement par le userform ...

Merci de ta réponse,

Cdt

[Phil Free]

oups !

désolé de ne pas avoir reconnu ton pseudo y a trou pour ce cacher quelque part ?

Concernant ton problème c'est étrange ce déclenchement de l'evenement produit par le userform ! Franchement je ne vois pas comment c'est possible !
sinon un timer qui vérifie le contenu de la plage mise à jour en remplacement de l'evenement ?

si tu veux essayer je peux t'aider à le mettre en place.

A+