Combobox en cascade

fhoest

XLDnaute Accro

• 16 Janvier 2010

• #2

Re : Combobox en cascade

bonsoir
bien que chez moi j'ai une erreur dans la combo2 resolu
voici ce code pour toi trouver et inserer dans tes textbox

Code:

Sub trouve()
Dim a, b, c As String
Dim ligne As Long
textbox1.text=""
textbox2.text=""
a = ComboBox1.Value
b = ComboBox2.Value
c = ComboBox3.Value

Columns(3).Select
With Selection
Cells.Find(What:=c, After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    '
End With
Do
ligne = ActiveCell.Row
If Range("a" & ligne).Value = a And Range("b" & ligne).Value = b Then
TextBox1.Value = Range("e" & ligne).Text
TextBox2.Value = Range("d" & ligne).Text
Else:
Cells.FindNext(After:=ActiveCell).Activate
End If

A+

 

Dernière édition: 16 Janvier 2010

Vote positif 0 Vote négatif

fhoest

XLDnaute Accro

• 16 Janvier 2010

• #3

Re : Combobox en cascade

remoi
je viens juste de modifier et ajouter textbox1.text="" et textbox2.text=""
dans le code que je t'ai filer
au cas ou tu l'avais deja copier
A+

 

Dernière édition: 16 Janvier 2010

Vote positif 0 Vote négatif

J

Jean-luc1311

XLDnaute Occasionnel

• 17 Janvier 2010

• #4

Re : Combobox en cascade

Bonjour,

Merci pour ta réponse, je teste ton code.
Cela va beaucoup m'aider.

A+🙂

 

Vote positif 0 Vote négatif

J

Jean-luc1311

XLDnaute Occasionnel

• 17 Janvier 2010

• #5

Re : Combobox en cascade

Désolé, mais je n'arrive pas faire fionctionner mon fichier.
Sarait-il possible de me retourner mon fichier modifié?
Merci par avance.
Cordialement JL

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 17 Janvier 2010

• #6

Re : Combobox en cascade

Bonjour,
Par tableau intermédiaire et ajout d'une dimension au tableau principal
A+
kjin

 

Pièces jointes

• Jluc.zip

  22 KB · Affichages: 138
• Jluc.zip

  22 KB · Affichages: 141
• Jluc.zip

  22 KB · Affichages: 143

Vote positif 0 Vote négatif

J

Jean-luc1311

XLDnaute Occasionnel

• 17 Janvier 2010

• #7

Re : Combobox en cascade

Bonjour Kjin,

Merci pour le coup de main, c'est le résultat attendu.
Cordialement.
Jean-luc

 

Vote positif 0 Vote négatif