COMBOBOX

[Marco]

VOIR FICHIER JOINT
CE PROBLEME EST SIMPLE MAIS TROP COMPLEXE POUR UN NOVICE COMME MOI ET POURTANT J EN AI TELLEMENT BESOIN POUR LA SUITE DE MON TRAVAIL DE FIN D ETUDE.
SI VOUS EN AVEZ LE COURAGE JETEZ Y UN OEIL
MERCI D AVANCE

 

[Jam]

MARCO,

Cesse de crier, cela agresse nos oreilles !
Bonjour, j'm'appelle Marco et j'ai un problème...c'est pas mal aussi !

Enfin, t'as oublié la pièce jointe.

J'ai bien peur que TU N'AIS PAS DE REPONSE :angry:

Message édité par: mrexcel, à: 14/03/2005 19:11

 

[marco]

J AI UNE LISTBOX NOMME ONGLET UNE COMBOBOX NOMME MARQUE ET UNE DEUXIEME NOMME CLASSE. La listbox renvoie a une feuille du classeur, la combobox nommé MARQUE renvoie à une liste dans la colonne A. Jusque là tout est ok... APRES AIE(ligne de pointillé----). J aimerai que le choix effectué dans cette combobox renvoie à une liste (dépendant des lignes) ds la combobox CLASSE.

Présentation feuille excel

A B C D
1 Boulanger pain bonbon tarte
2 Boucher boeuf saucisson jambon
3 Restaurant entree plat dessert

Exemple : Je choisis Alimentation qui me renvoie à cette feuille . Alors je choisis ds la colonne A (combobox Marque) Boucher et là j aimerais voir apparaître ds la combobox Classe la liste bœuf saucisson jambon mais je n y arrive pas ………




Programme



Private Sub Onglets_Change()
Dim OngletSelect As Integer
' Déterminer la ligne sélectionnée dans la liste déroulante
OngletSelect = ListeDeroulanteCombinee.Onglets.ListIndex + 2
' Mise à jour ComboBox Modele et Type
Dim DerniereMarque As String
Sheets(OngletSelect).Activate
DerniereMarque = Range('A1').End(xlDown).Address
Marque.RowSource = 'A1:' & DerniereMarque
Marque.ListIndex = 0
---------------------------------------------------------------------
Dim Classix As Integer
Classix = ListeDeroulanteCombinee.Marque.ListIndex
Classe.RowSource = B Classix.End(xlToRight)
Classe.ListIndex = 0
End Sub

 

[visiteur]

bonjour MrExcel, marco

tu trouveras un début de réponse sur ce lien
https://www.excel-downloads.com/help/charte/

bonne fin de journée