Discussion :

[létudiant_access]

Bonjour,

Mon probleme est simple (mais pourtant je n'arrive pas a le resoudre).

J'ai deux feuilles qui contiennent chacune un combobox avec les meme valeurs.
Chaque combobox est lie a une macro differente sur action click. Je veux qu'au changement d'un combobox, l'autre combobox prenne la meme valeur.

Le probleme c'est qu'en les liant du genre combo1.value=combo2.value, mes deux macros s'executent alors que je souhaite qu'uniquement celle correspondant au click utilisateur s'execute.

Pouvez-vous m'aider ?


merci beaucoup!

[Daniel.C]

Bonjour,

Pas idiot du tout ! Dans un module standard, mets :

Code :

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

Public Teste As Boolean

Dans le code du premier combobox, mets :

Code :

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

1
2
3
4
Private Sub ComboBox1_Click()
    Teste = True
    Sheets("Feuil1").ComboBox1.Value = Me.ComboBox1.Value
End Sub

et dans l'autre :

Code :

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

1
2
3
4
5
6
7
Private Sub ComboBox1_Click()
    If Teste = True Then
        Teste = False
        Exit Sub
    End If
    MsgBox "Coucou"
End Sub

Tu as compris, bien sûr, qu'il faut remplacer :

Code :

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

MsgBox "Coucou"

par le code de ta macro.

[Philippe Tulliez]

Bonjour,
Je suppose que tu utilises un ComboBox ActiveX.
Il existe alors une propriété nommée LinkedCell qui te permet de faire référence à une cellule de la feuille ou d'une autre feuille.
Tu pourrais donc par exemple utiliser la cellule A1 d'une feuille paramètre nommée Parameter et donner à la propriété LinkedCell des deux ComboBox la valeur Parameter!A1 (Il est possible également de faire référence à une cellule nommée)
Tu peux aussi utiliser un ComboBox sur une feuille et un ListBox sur une autre.
Bien entendu la base de données doit être commune ou les bases de données doivent être similaires.

Si par contre c'est un contrôle formulaire, c'est basé sur le même principe de la cellule liée - voir ma contribution sur le sujet A l'aide de 2 listes déroulantes et sans VBA - Comment rechercher une information dans une base de données

[létudiant_access]

Merci a vous deux, ca fonctionne parfaitement !!

J'ai opte pour la methode boolean.

Bonne fin de journee et encore merci !