Combobox dépendante
Fermé
tofoo
Messages postés
4
Date d'inscription
jeudi 15 novembre 2007
Statut
Membre
Dernière intervention
19 décembre 2008
-
16 juin 2008 à 18:16
tofoo Messages postés 4 Date d'inscription jeudi 15 novembre 2007 Statut Membre Dernière intervention 19 décembre 2008 - 17 juin 2008 à 08:53
tofoo Messages postés 4 Date d'inscription jeudi 15 novembre 2007 Statut Membre Dernière intervention 19 décembre 2008 - 17 juin 2008 à 08:53
A voir également:
- Combobox dépendante
- Liste déroulante dépendante excel - Guide
- Combobox additem ✓ - Forum VB / VBA
- Vba combobox listindex ✓ - Forum VB / VBA
- Javascript combobox - Forum Javascript
- Vba trier combobox ordre alphabétique ✓ - Forum VB / VBA
1 réponse
tofoo
Messages postés
4
Date d'inscription
jeudi 15 novembre 2007
Statut
Membre
Dernière intervention
19 décembre 2008
17 juin 2008 à 08:53
17 juin 2008 à 08:53
Bon petit bug, je continus mon explication.
J'aimerai que dans ma 1ere combobox définisse la catégorie de job et la seconde, le job spécifique.
Voici mon code :
Private Sub Slide1_Load()
ComboBox1.Clear
ComboBox2.Clear
ComboBox1.AddItem "FX & Money Market Job Roles"
ComboBox1.AddItem "Fixed Income Job Roles"
ComboBox1.AddItem "Equity Job Roles"
'ComboBox1.AddItem "Commodities & Energy Job Roles"
'ComboBox1.AddItem "Environmental Markets Job Roles"
'ComboBox1.AddItem "Media Job Roles"
'ComboBox1.AddItem "Cross Market Job Roles"
'ComboBox1.AddItem "Risk Management & Control Job Roles"
'ComboBox1.AddItem "Real Estates Job Roles"
'ComboBox1.AddItem "Other Job Roles"
End Sub
Public Sub ComboBox1_Change()
If ComboBox1 = "FX & Money Market Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "FX & Interest Rate Portfolio Manager"
ComboBox2.AddItem "FX & interest Rate Research Analyst"
ComboBox2.AddItem "FX & Interest Rate Sales"
ComboBox2.AddItem "FX Broker"
ComboBox2.AddItem "FX Forward Trader"
ComboBox2.AddItem "FX Options Sales & Trader"
ComboBox2.AddItem "FX Trader"
ComboBox2.AddItem "Interest Rate Broker"
ComboBox2.AddItem "Interest Rate Futures Trader"
ComboBox2.AddItem "Interest Rate Swaps Trader"
ComboBox2.AddItem "Interest Rate Trader"
ComboBox2.AddItem "Short Term interest Rate Trader"
End If
If ComboBox1 = "Fixed Income Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "Central Bank & Supranational Sales & Trader"
ComboBox2.AddItem "Commercial Paper Sales & Trader"
ComboBox2.AddItem "Convertible Bond Sales & Trader"
ComboBox2.AddItem "Corporate Bond Sales & Trader"
ComboBox2.AddItem "Credit Derivatives Sales & Trader"
ComboBox2.AddItem "FI Bond Futures Trader"
ComboBox2.AddItem "Fixed Income Broke"
ComboBox2.AddItem "Fixed Income Emerging Markets Sales & Trader"
ComboBox2.AddItem "Fixed Income Portfolio Manager"
ComboBox2.AddItem "Fixed Income Research Analyst"
ComboBox2.AddItem "Fixed Income Sales & Trader"
ComboBox2.AddItem "Government/Agency Sales & Trader"
ComboBox2.AddItem "High Yield Sales & Trader"
ComboBox2.AddItem "Market Strategist"
ComboBox2.AddItem "MBS/ABS/CDO Sales & Trader"
ComboBox2.AddItem "Municipal Sales & Trader"
ComboBox2.AddItem "Repo Sales & Trader"
ComboBox2.AddItem "Structured Products Trader / Analyst"
End If
If ComboBox1 = "Equity Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "Equity Derivatives Sales"
ComboBox2.AddItem "Equitty Derivatives Trader"
ComboBox2.AddItem "Equity Portfolio Manager"
ComboBox2.AddItem "Equity Portfolio Manager Who Trades"
ComboBox2.AddItem "Equity Research Analyst"
ComboBox2.AddItem "Equity Sales"
ComboBox2.AddItem "Equity Sales Trader"
ComboBox2.AddItem "Equity Trader"
End If
End Sub
Et le fichier joint :
https://www.cjoint.com/?griXrqBgtN
Quelqu'un peux maider ???
Merci
J'aimerai que dans ma 1ere combobox définisse la catégorie de job et la seconde, le job spécifique.
Voici mon code :
Private Sub Slide1_Load()
ComboBox1.Clear
ComboBox2.Clear
ComboBox1.AddItem "FX & Money Market Job Roles"
ComboBox1.AddItem "Fixed Income Job Roles"
ComboBox1.AddItem "Equity Job Roles"
'ComboBox1.AddItem "Commodities & Energy Job Roles"
'ComboBox1.AddItem "Environmental Markets Job Roles"
'ComboBox1.AddItem "Media Job Roles"
'ComboBox1.AddItem "Cross Market Job Roles"
'ComboBox1.AddItem "Risk Management & Control Job Roles"
'ComboBox1.AddItem "Real Estates Job Roles"
'ComboBox1.AddItem "Other Job Roles"
End Sub
Public Sub ComboBox1_Change()
If ComboBox1 = "FX & Money Market Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "FX & Interest Rate Portfolio Manager"
ComboBox2.AddItem "FX & interest Rate Research Analyst"
ComboBox2.AddItem "FX & Interest Rate Sales"
ComboBox2.AddItem "FX Broker"
ComboBox2.AddItem "FX Forward Trader"
ComboBox2.AddItem "FX Options Sales & Trader"
ComboBox2.AddItem "FX Trader"
ComboBox2.AddItem "Interest Rate Broker"
ComboBox2.AddItem "Interest Rate Futures Trader"
ComboBox2.AddItem "Interest Rate Swaps Trader"
ComboBox2.AddItem "Interest Rate Trader"
ComboBox2.AddItem "Short Term interest Rate Trader"
End If
If ComboBox1 = "Fixed Income Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "Central Bank & Supranational Sales & Trader"
ComboBox2.AddItem "Commercial Paper Sales & Trader"
ComboBox2.AddItem "Convertible Bond Sales & Trader"
ComboBox2.AddItem "Corporate Bond Sales & Trader"
ComboBox2.AddItem "Credit Derivatives Sales & Trader"
ComboBox2.AddItem "FI Bond Futures Trader"
ComboBox2.AddItem "Fixed Income Broke"
ComboBox2.AddItem "Fixed Income Emerging Markets Sales & Trader"
ComboBox2.AddItem "Fixed Income Portfolio Manager"
ComboBox2.AddItem "Fixed Income Research Analyst"
ComboBox2.AddItem "Fixed Income Sales & Trader"
ComboBox2.AddItem "Government/Agency Sales & Trader"
ComboBox2.AddItem "High Yield Sales & Trader"
ComboBox2.AddItem "Market Strategist"
ComboBox2.AddItem "MBS/ABS/CDO Sales & Trader"
ComboBox2.AddItem "Municipal Sales & Trader"
ComboBox2.AddItem "Repo Sales & Trader"
ComboBox2.AddItem "Structured Products Trader / Analyst"
End If
If ComboBox1 = "Equity Job Roles" Then
ComboBox2.Clear
ComboBox2.AddItem "Equity Derivatives Sales"
ComboBox2.AddItem "Equitty Derivatives Trader"
ComboBox2.AddItem "Equity Portfolio Manager"
ComboBox2.AddItem "Equity Portfolio Manager Who Trades"
ComboBox2.AddItem "Equity Research Analyst"
ComboBox2.AddItem "Equity Sales"
ComboBox2.AddItem "Equity Sales Trader"
ComboBox2.AddItem "Equity Trader"
End If
End Sub
Et le fichier joint :
https://www.cjoint.com/?griXrqBgtN
Quelqu'un peux maider ???
Merci