Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :
> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
> juste pour l’exemple !!
> Merci de votre aide.
>
Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :
> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
> juste pour l’exemple !!
> Merci de votre aide.
>
Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :
> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
> juste pour l’exemple !!
> Merci de votre aide.
>
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" <StDonat@discussions.microsoft.com> a écrit dans le message de
news: 5C02C340-F574-4E15-95F5-F87BB4870BB1@microsoft.com...
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Merci pour le début de réponse.
Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
F1.Range("B65536").End(xlUp).Row))
donc par array....
"LSteph" wrote:Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Merci pour le début de réponse.
Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
F1.Range("B65536").End(xlUp).Row))
donc par array....
"LSteph" wrote:
Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :
Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Merci pour le début de réponse.
Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
F1.Range("B65536").End(xlUp).Row))
donc par array....
"LSteph" wrote:Bonjour,
c'est selon comment tu obtiens sa source
rowsource, array, boucle... ??
faut repasser la moulinette en filtrant avec if ou select case par
exemple, ou modifier la source...
(..aussi userform ou feuille?)
Cordialement.
--
lSteph
StDonat a écrit :Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
juste pour l’exemple !!
Merci de votre aide.
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" <StDonat@discussions.microsoft.com> a écrit dans le message de
news: 5C02C340-F574-4E15-95F5-F87BB4870BB1@microsoft.com...
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Salut, voici chef :
dim lindex as long
combo1.RemoveItem lindex
Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu peux
écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré comme
le 1er positif...
Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante car
en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
remontant, ainsi, tout ce que tu supprime est changé derrière ton pointeur,
tu t'en moques, voici un exemple complet, ça fera 2 ? :
dim lindex as long
dim i as long
dim lesNoms as string(2)
lesNoms(0) = "georges"
lesNoms(1) = "Philippe"
for i = combo1.listcount-1 to 0 step -1
for j = 0 to 1
if leNom(j) = combo1.text then
lindex = combo1.listindex
combo1.removeitem lindex
endif
next j
next i
combo1.refresh
if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
d'affichage
est-ce clair ???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons une
| liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
Georges »
| ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là, c'est
| juste pour l'exemple !!
| Merci de votre aide.
|
Bonjour,
Tu as tout à fait raison, j'ai fait ça de tête à main levée, en effet,
il aut faire évoluer l'indice, merci ;o)
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| il y a 2 trucs que je ne pige pas!
| A Quoi sert la boucle I ?
| Conbo1.Text a toujours la meme valeur
|
|
| "LE TROLL" wrote:
|
| > Salut, voici chef :
| >
| > dim lindex as long
| > combo1.RemoveItem lindex
| >
| > Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu
peux
| > écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré
comme
| > le 1er positif...
| >
| > Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante
car
| > en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
| > suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
| > faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
| > alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
| > remontant, ainsi, tout ce que tu supprime est changé derrière ton
pointeur,
| > tu t'en moques, voici un exemple complet, ça fera 2 ? :
| >
| > dim lindex as long
| > dim i as long
| > dim lesNoms as string(2)
| > lesNoms(0) = "georges"
| > lesNoms(1) = "Philippe"
| > for i = combo1.listcount-1 to 0 step -1
| > for j = 0 to 1
| > if leNom(j) = combo1.text then
| > lindex = combo1.listindex
| > combo1.removeitem lindex
| > endif
| > next j
| > next i
| > combo1.refresh
| > if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
| > d'affichage
| >
| > est-ce clair ???
| > --
| > Merci beaucoup, au revoir et à bientôt :o)
| > ------
| > Romans, logiciels, email, site personnel
| > http://irolog.free.fr/joe.htm
|
> ------------------------------------------------------------------------------------
| > "StDonat" a écrit dans le message de
| > news:
| > | Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons
une
| > | liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
| > Georges »
| > | ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là,
c'est
| > | juste pour l'exemple !!
| > | Merci de votre aide.
| > |
| >
| >
| >
Bonjour,
Tu as tout à fait raison, j'ai fait ça de tête à main levée, en effet,
il aut faire évoluer l'indice, merci ;o)
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" <StDonat@discussions.microsoft.com> a écrit dans le message de
news: 540EDB3F-4194-4FBC-A49F-10904411B247@microsoft.com...
| il y a 2 trucs que je ne pige pas!
| A Quoi sert la boucle I ?
| Conbo1.Text a toujours la meme valeur
|
|
| "LE TROLL" wrote:
|
| > Salut, voici chef :
| >
| > dim lindex as long
| > combo1.RemoveItem lindex
| >
| > Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu
peux
| > écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré
comme
| > le 1er positif...
| >
| > Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante
car
| > en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
| > suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
| > faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
| > alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
| > remontant, ainsi, tout ce que tu supprime est changé derrière ton
pointeur,
| > tu t'en moques, voici un exemple complet, ça fera 2 ? :
| >
| > dim lindex as long
| > dim i as long
| > dim lesNoms as string(2)
| > lesNoms(0) = "georges"
| > lesNoms(1) = "Philippe"
| > for i = combo1.listcount-1 to 0 step -1
| > for j = 0 to 1
| > if leNom(j) = combo1.text then
| > lindex = combo1.listindex
| > combo1.removeitem lindex
| > endif
| > next j
| > next i
| > combo1.refresh
| > if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
| > d'affichage
| >
| > est-ce clair ???
| > --
| > Merci beaucoup, au revoir et à bientôt :o)
| > ------
| > Romans, logiciels, email, site personnel
| > http://irolog.free.fr/joe.htm
|
> ------------------------------------------------------------------------------------
| > "StDonat" <StDonat@discussions.microsoft.com> a écrit dans le message de
| > news: 5C02C340-F574-4E15-95F5-F87BB4870BB1@microsoft.com...
| > | Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons
une
| > | liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
| > Georges »
| > | ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là,
c'est
| > | juste pour l'exemple !!
| > | Merci de votre aide.
| > |
| >
| >
| >
Bonjour,
Tu as tout à fait raison, j'ai fait ça de tête à main levée, en effet,
il aut faire évoluer l'indice, merci ;o)
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"StDonat" a écrit dans le message de
news:
| il y a 2 trucs que je ne pige pas!
| A Quoi sert la boucle I ?
| Conbo1.Text a toujours la meme valeur
|
|
| "LE TROLL" wrote:
|
| > Salut, voici chef :
| >
| > dim lindex as long
| > combo1.RemoveItem lindex
| >
| > Si "dupont" est à l'index 10, ben tu files = lindex = 10, mais tu
peux
| > écrire en dur (à éviter), ne pas oublier que ça part de 0, considéré
comme
| > le 1er positif...
| >
| > Lais arthung, si tu en enlève plusieurs, par cette méthode ça plante
car
| > en en ôtant un, tu changes les index supérieur à celui enlevé, si tu me
| > suis, tu les réduis d'un dans ce cas, alors ça impliquerait qu'il faille
| > faire un Combi1.Refresh, et que tu récupère de nouveau l'index souvent,
| > alors, pour ne pas avoir se désagrément, il faut partir d'en bas, en
| > remontant, ainsi, tout ce que tu supprime est changé derrière ton
pointeur,
| > tu t'en moques, voici un exemple complet, ça fera 2 ? :
| >
| > dim lindex as long
| > dim i as long
| > dim lesNoms as string(2)
| > lesNoms(0) = "georges"
| > lesNoms(1) = "Philippe"
| > for i = combo1.listcount-1 to 0 step -1
| > for j = 0 to 1
| > if leNom(j) = combo1.text then
| > lindex = combo1.listindex
| > combo1.removeitem lindex
| > endif
| > next j
| > next i
| > combo1.refresh
| > if combo1.listcount = >0 then combo1.listindex = ' ' ' ta position
| > d'affichage
| >
| > est-ce clair ???
| > --
| > Merci beaucoup, au revoir et à bientôt :o)
| > ------
| > Romans, logiciels, email, site personnel
| > http://irolog.free.fr/joe.htm
|
> ------------------------------------------------------------------------------------
| > "StDonat" a écrit dans le message de
| > news:
| > | Bonjour, J'ai un combobox avec un certain nombre de valeurs(supposons
une
| > | liste de prénoms). Je souhaiterais pouvoir retirer de cette liste «
| > Georges »
| > | ou « Philippe ». Rassurez-vous je n'ai rien contre ces 2 prénoms là,
c'est
| > | juste pour l'exemple !!
| > | Merci de votre aide.
| > |
| >
| >
| >
bonjour,
(comme je ne sais quelle recette a cuisiné "SansDoublos" et "ou")
voici un exemple plus standard partant d'un array et rebouclant dessus
pour filtrer
Private Sub UserForm_Initialize()
Dim myArr(), i as long
myArr = Array("toto", "Georges", "titi", "Philippe", "Mgr")
ComboBox1.Clear
For i = 0 To UBound(myArr)
Select Case LCase(myArr(i))
Case "georges", "philippe"
Case Else
ComboBox1.AddItem myArr(i)
End Select
Next
End Sub
'lSteph
StDonat a écrit :
> Merci pour le début de réponse.
> Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
> Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
> F1.Range("B65536").End(xlUp).Row))
> donc par array....
>
> "LSteph" wrote:
>
>> Bonjour,
>>
>> c'est selon comment tu obtiens sa source
>>
>> rowsource, array, boucle... ??
>> faut repasser la moulinette en filtrant avec if ou select case par
>> exemple, ou modifier la source...
>>
>> (..aussi userform ou feuille?)
>>
>> Cordialement.
>>
>> --
>> lSteph
>>
>> StDonat a écrit :
>>> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
>>> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
>>> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
>>> juste pour l’exemple !!
>>> Merci de votre aide.
>>>
bonjour,
(comme je ne sais quelle recette a cuisiné "SansDoublos" et "ou")
voici un exemple plus standard partant d'un array et rebouclant dessus
pour filtrer
Private Sub UserForm_Initialize()
Dim myArr(), i as long
myArr = Array("toto", "Georges", "titi", "Philippe", "Mgr")
ComboBox1.Clear
For i = 0 To UBound(myArr)
Select Case LCase(myArr(i))
Case "georges", "philippe"
Case Else
ComboBox1.AddItem myArr(i)
End Select
Next
End Sub
'lSteph
StDonat a écrit :
> Merci pour le début de réponse.
> Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
> Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
> F1.Range("B65536").End(xlUp).Row))
> donc par array....
>
> "LSteph" wrote:
>
>> Bonjour,
>>
>> c'est selon comment tu obtiens sa source
>>
>> rowsource, array, boucle... ??
>> faut repasser la moulinette en filtrant avec if ou select case par
>> exemple, ou modifier la source...
>>
>> (..aussi userform ou feuille?)
>>
>> Cordialement.
>>
>> --
>> lSteph
>>
>> StDonat a écrit :
>>> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
>>> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
>>> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
>>> juste pour l’exemple !!
>>> Merci de votre aide.
>>>
bonjour,
(comme je ne sais quelle recette a cuisiné "SansDoublos" et "ou")
voici un exemple plus standard partant d'un array et rebouclant dessus
pour filtrer
Private Sub UserForm_Initialize()
Dim myArr(), i as long
myArr = Array("toto", "Georges", "titi", "Philippe", "Mgr")
ComboBox1.Clear
For i = 0 To UBound(myArr)
Select Case LCase(myArr(i))
Case "georges", "philippe"
Case Else
ComboBox1.AddItem myArr(i)
End Select
Next
End Sub
'lSteph
StDonat a écrit :
> Merci pour le début de réponse.
> Il s'agit d'un cbx dans un userform et je lui affecte la sourcepar:
> Combobox.list=SansDoublonsTrié(F1.Range(ou & "3:" & ou &
> F1.Range("B65536").End(xlUp).Row))
> donc par array....
>
> "LSteph" wrote:
>
>> Bonjour,
>>
>> c'est selon comment tu obtiens sa source
>>
>> rowsource, array, boucle... ??
>> faut repasser la moulinette en filtrant avec if ou select case par
>> exemple, ou modifier la source...
>>
>> (..aussi userform ou feuille?)
>>
>> Cordialement.
>>
>> --
>> lSteph
>>
>> StDonat a écrit :
>>> Bonjour, J’ai un combobox avec un certain nombre de valeurs(supposons une
>>> liste de prénoms). Je souhaiterais pouvoir retirer de cette liste « Georges »
>>> ou « Philippe ». Rassurez-vous je n’ai rien contre ces 2 prénoms là, c’est
>>> juste pour l’exemple !!
>>> Merci de votre aide.
>>>