J'ai quelques petits soucis avec mes comboBox.
2 comboboxs dans un même formulaire.
***********************
Private Sub UserForm_Initialize() 'Donne les valeurs à la liste
déroulante du premier combobox
Me.Combo_lst_poste.RowSource = ("NomPoste")
Me.Combo_lst_poste.ListIndex = -1
***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox.
Mon probleme c'est que le contenu de mon second combobox est lié à celui du
1er.
La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de
mettre le code suivant sur un bouton que je valide apres
avoir selectionné le contenu de mon 1er combobox
********************
Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le
contenu du 2eme combobox en passant par un commandButton
If Combo_lst_poste.Value = "Jean" Then
Combo_lst_sousposte.RowSource = ("DetailJean")
Combo_lst_sousposte.ListIndex = -1
ElseIf Combo_lst_poste.Value = "Pierre" Then
Combo_lst_sousposte.RowSource = ("DetailPierre")
Combo_lst_sousposte.ListIndex = -1
End If
End Sub
************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a
cliquer sur un bouton.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Deedooz,
AV avait commis un exemple sur le sujet :
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" a écrit dans le message de news:
Bonsoir,
J'ai quelques petits soucis avec mes comboBox. 2 comboboxs dans un même formulaire.
*********************** Private Sub UserForm_Initialize() 'Donne les valeurs à la liste déroulante du premier combobox Me.Combo_lst_poste.RowSource = ("NomPoste") Me.Combo_lst_poste.ListIndex = -1 ***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox. Mon probleme c'est que le contenu de mon second combobox est lié à celui du 1er. La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de mettre le code suivant sur un bouton que je valide apres avoir selectionné le contenu de mon 1er combobox
******************** Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le contenu du 2eme combobox en passant par un commandButton If Combo_lst_poste.Value = "Jean" Then Combo_lst_sousposte.RowSource = ("DetailJean") Combo_lst_sousposte.ListIndex = -1 ElseIf Combo_lst_poste.Value = "Pierre" Then Combo_lst_sousposte.RowSource = ("DetailPierre") Combo_lst_sousposte.ListIndex = -1 End If End Sub ************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a cliquer sur un bouton.
Merci d'avance pour votre aide
Bonjour Deedooz,
AV avait commis un exemple sur le sujet :
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" <nospam-deedooz@free.fr> a écrit dans le message de news: u7Z2KVj4FHA.2872@TK2MSFTNGP15.phx.gbl...
Bonsoir,
J'ai quelques petits soucis avec mes comboBox.
2 comboboxs dans un même formulaire.
***********************
Private Sub UserForm_Initialize() 'Donne les valeurs à la liste
déroulante du premier combobox
Me.Combo_lst_poste.RowSource = ("NomPoste")
Me.Combo_lst_poste.ListIndex = -1
***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox.
Mon probleme c'est que le contenu de mon second combobox est lié à celui du
1er.
La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de
mettre le code suivant sur un bouton que je valide apres
avoir selectionné le contenu de mon 1er combobox
********************
Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le
contenu du 2eme combobox en passant par un commandButton
If Combo_lst_poste.Value = "Jean" Then
Combo_lst_sousposte.RowSource = ("DetailJean")
Combo_lst_sousposte.ListIndex = -1
ElseIf Combo_lst_poste.Value = "Pierre" Then
Combo_lst_sousposte.RowSource = ("DetailPierre")
Combo_lst_sousposte.ListIndex = -1
End If
End Sub
************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a
cliquer sur un bouton.
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" a écrit dans le message de news:
Bonsoir,
J'ai quelques petits soucis avec mes comboBox. 2 comboboxs dans un même formulaire.
*********************** Private Sub UserForm_Initialize() 'Donne les valeurs à la liste déroulante du premier combobox Me.Combo_lst_poste.RowSource = ("NomPoste") Me.Combo_lst_poste.ListIndex = -1 ***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox. Mon probleme c'est que le contenu de mon second combobox est lié à celui du 1er. La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de mettre le code suivant sur un bouton que je valide apres avoir selectionné le contenu de mon 1er combobox
******************** Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le contenu du 2eme combobox en passant par un commandButton If Combo_lst_poste.Value = "Jean" Then Combo_lst_sousposte.RowSource = ("DetailJean") Combo_lst_sousposte.ListIndex = -1 ElseIf Combo_lst_poste.Value = "Pierre" Then Combo_lst_sousposte.RowSource = ("DetailPierre") Combo_lst_sousposte.ListIndex = -1 End If End Sub ************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a cliquer sur un bouton.
Merci d'avance pour votre aide
Deedooz
C'est tout a fait ce qu'il me fallait.
Merci
"michdenis" a écrit dans le message de news:
Bonjour Deedooz,
AV avait commis un exemple sur le sujet :
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" a écrit dans le message de news:
Bonsoir,
J'ai quelques petits soucis avec mes comboBox. 2 comboboxs dans un même formulaire.
*********************** Private Sub UserForm_Initialize() 'Donne les valeurs à la liste déroulante du premier combobox Me.Combo_lst_poste.RowSource = ("NomPoste") Me.Combo_lst_poste.ListIndex = -1 ***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox. Mon probleme c'est que le contenu de mon second combobox est lié à celui du
1er. La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de mettre le code suivant sur un bouton que je valide apres avoir selectionné le contenu de mon 1er combobox
******************** Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le contenu du 2eme combobox en passant par un commandButton If Combo_lst_poste.Value = "Jean" Then Combo_lst_sousposte.RowSource = ("DetailJean") Combo_lst_sousposte.ListIndex = -1 ElseIf Combo_lst_poste.Value = "Pierre" Then Combo_lst_sousposte.RowSource = ("DetailPierre") Combo_lst_sousposte.ListIndex = -1 End If End Sub ************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a cliquer sur un bouton.
Merci d'avance pour votre aide
C'est tout a fait ce qu'il me fallait.
Merci
"michdenis" <michdenis@hotmail.com> a écrit dans le message de
news:ONqD8hj4FHA.400@TK2MSFTNGP09.phx.gbl...
Bonjour Deedooz,
AV avait commis un exemple sur le sujet :
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" <nospam-deedooz@free.fr> a écrit dans le message de news:
u7Z2KVj4FHA.2872@TK2MSFTNGP15.phx.gbl...
Bonsoir,
J'ai quelques petits soucis avec mes comboBox.
2 comboboxs dans un même formulaire.
***********************
Private Sub UserForm_Initialize() 'Donne les valeurs à la liste
déroulante du premier combobox
Me.Combo_lst_poste.RowSource = ("NomPoste")
Me.Combo_lst_poste.ListIndex = -1
***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox.
Mon probleme c'est que le contenu de mon second combobox est lié à celui
du
1er.
La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de
mettre le code suivant sur un bouton que je valide apres
avoir selectionné le contenu de mon 1er combobox
********************
Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le
contenu du 2eme combobox en passant par un commandButton
If Combo_lst_poste.Value = "Jean" Then
Combo_lst_sousposte.RowSource = ("DetailJean")
Combo_lst_sousposte.ListIndex = -1
ElseIf Combo_lst_poste.Value = "Pierre" Then
Combo_lst_sousposte.RowSource = ("DetailPierre")
Combo_lst_sousposte.ListIndex = -1
End If
End Sub
************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a
cliquer sur un bouton.
Le fichier exemple est là : http://cjoint.com/?lftOk6EBoC
Salutations!
"Deedooz" a écrit dans le message de news:
Bonsoir,
J'ai quelques petits soucis avec mes comboBox. 2 comboboxs dans un même formulaire.
*********************** Private Sub UserForm_Initialize() 'Donne les valeurs à la liste déroulante du premier combobox Me.Combo_lst_poste.RowSource = ("NomPoste") Me.Combo_lst_poste.ListIndex = -1 ***********************
Jusque la pas de probleme, mes choix s'affichent bien dans mon combobox. Mon probleme c'est que le contenu de mon second combobox est lié à celui du
1er. La seule facon que j'ai trouvé pour mettre mon 2eme combobox à jour est de mettre le code suivant sur un bouton que je valide apres avoir selectionné le contenu de mon 1er combobox
******************** Private Sub CommandButton1_Click() 'bidouille pour mettre a jour le contenu du 2eme combobox en passant par un commandButton If Combo_lst_poste.Value = "Jean" Then Combo_lst_sousposte.RowSource = ("DetailJean") Combo_lst_sousposte.ListIndex = -1 ElseIf Combo_lst_poste.Value = "Pierre" Then Combo_lst_sousposte.RowSource = ("DetailPierre") Combo_lst_sousposte.ListIndex = -1 End If End Sub ************************
Mais je voudrais que cette mise a jour se fasse toute seule sans avoir a cliquer sur un bouton.
