FindNext

Salut,
je ne comprends pas très bien à partir de quel élément l'usager peut
préciser son choix ???
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 1979b01c44d70$cb41cea0$a601280a@phx.gbl...
Bonjour à tous,

Avec l'aide d'un userform sur lequel ne se trouve qu'un
combobox, l'usager choisit le nom d'un projet. Excel, avec
les instructions suivantes, se rend directement au premier
projet correspondant au choix du combobox.

Cependant, comme plusieurs projets peuvent avoir le même
nom (différentes personnes y travaillant) j'aimerais avoir
la possibilité de demander à l'usager si c'est bien le
projet qu'il désire consulter ou si il désire voir si une
autre personne travaille aussi avec un projet du même nom.

Voici le code...

Private Sub ComboBox1_Change()
On Error Resume Next

Nom = ComboBox1
With ActiveSheet()
Cells.Find(What:=Nom, After:=Range("C6"), _
LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext, MatchCase:úlse).Activate
End With
Unload UserForm3
End Sub

Auriez-vous une idée ?

Merci de votre temps

Denys

Bonjour Pascal,

Sur la feuille Excel, il y a un bouton de commande. En
l'activant, un Userform apparait avec le combobox. Les
choix apparaissant au combobox sont le nom de tous les
projets en cours. Cependant, plusieurs personnes peuvent
être affectées à un même projet.

Sur le feuille Excel, apparait un tableau avec dans une
cellule, le nom du projet. Ce tableau est situé sous le
nom de celui qui s'en occupe. Si Jean travaille sur le
projet Bonjour, alors un tableau apparait sous le nom de
Jean (colonne B par exemple).

Si Paul travaille aussi sur ce projet, alors un tableau
est aussi créé sous le nom de Paul (colonne C par exemple).

Je veux donc que l'usager puisse continuer le recherche
après qu'Excel l'ait dirigé au tableau de Jean....

Il faut noter que l'usager ne saura pas nécessairement au
départ qui est affecté à tel ou tel projet. C'est pourquoi
je ne peux demander de trouver le projet Bonjour affecté à
Paul par exemple.

Est-ce plus clair ainsi ?

Merci

Denys

-----Original Message-----
Salut,
je ne comprends pas très bien à partir de quel élément
l'usager peut

préciser son choix ???
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait
pas ou il va."

Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news: 1979b01c44d70$cb41cea0$a601280a@phx.gbl...
Bonjour à tous,

Avec l'aide d'un userform sur lequel ne se trouve qu'un
combobox, l'usager choisit le nom d'un projet. Excel, avec
les instructions suivantes, se rend directement au premier
projet correspondant au choix du combobox.

Cependant, comme plusieurs projets peuvent avoir le même
nom (différentes personnes y travaillant) j'aimerais avoir
la possibilité de demander à l'usager si c'est bien le
projet qu'il désire consulter ou si il désire voir si une
autre personne travaille aussi avec un projet du même nom.

Voici le code...

Private Sub ComboBox1_Change()
On Error Resume Next

Nom = ComboBox1
With ActiveSheet()
Cells.Find(What:=Nom, After:=Range("C6"), _
LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext,
MatchCase:=False).Activate

End With
Unload UserForm3
End Sub

Auriez-vous une idée ?

Merci de votre temps

Denys


.

Salut Denys,
c'est un peu plus clair mais pas suffisamment pour une réponse élaborée.
Il faudrait vraiment connaître la structure précise et la manière dont en
est extraite la combobox.
Si c'est l'allure ci-dessous pour la feuille
PAUL
|projet 1|projet 2
JEAN
|projet 3|projet 2
alors si ta combobox est construite sans doublons avec les noms seuls des
projets ,
alors il est possible d'ajouter les noms
on y trouverait
projet 1 => PAUL
projet 2 => PAUL
projet 2 => JEAN
projet 3 => JEAN
'============================================== Tu peux aussi créer une combobox avec les Noms PAUL, JEAN (ou avec les
projets)
puis une listbox qui affichet les projets (ou les noms) sur l'évènement
change de ta combobox (en modifiant sa propriété RowSource...)

--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 197b801c44d75$199e8cb0$a601280a@phx.gbl...
Bonjour Pascal,

Sur la feuille Excel, il y a un bouton de commande. En
l'activant, un Userform apparait avec le combobox. Les
choix apparaissant au combobox sont le nom de tous les
projets en cours. Cependant, plusieurs personnes peuvent
être affectées à un même projet.

Sur le feuille Excel, apparait un tableau avec dans une
cellule, le nom du projet. Ce tableau est situé sous le
nom de celui qui s'en occupe. Si Jean travaille sur le
projet Bonjour, alors un tableau apparait sous le nom de
Jean (colonne B par exemple).

Si Paul travaille aussi sur ce projet, alors un tableau
est aussi créé sous le nom de Paul (colonne C par exemple).

Je veux donc que l'usager puisse continuer le recherche
après qu'Excel l'ait dirigé au tableau de Jean....

Il faut noter que l'usager ne saura pas nécessairement au
départ qui est affecté à tel ou tel projet. C'est pourquoi
je ne peux demander de trouver le projet Bonjour affecté à
Paul par exemple.

Est-ce plus clair ainsi ?

Merci

Denys

-----Original Message-----
Salut,
je ne comprends pas très bien à partir de quel élément
l'usager peut

préciser son choix ???
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait
pas ou il va."

Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news: 1979b01c44d70$cb41cea0$a601280a@phx.gbl...
Bonjour à tous,

Avec l'aide d'un userform sur lequel ne se trouve qu'un
combobox, l'usager choisit le nom d'un projet. Excel, avec
les instructions suivantes, se rend directement au premier
projet correspondant au choix du combobox.

Cependant, comme plusieurs projets peuvent avoir le même
nom (différentes personnes y travaillant) j'aimerais avoir
la possibilité de demander à l'usager si c'est bien le
projet qu'il désire consulter ou si il désire voir si une
autre personne travaille aussi avec un projet du même nom.

Voici le code...

Private Sub ComboBox1_Change()
On Error Resume Next

Nom = ComboBox1
With ActiveSheet()
Cells.Find(What:=Nom, After:=Range("C6"), _
LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext,
MatchCase:úlse).Activate

End With
Unload UserForm3
End Sub

Auriez-vous une idée ?

Merci de votre temps

Denys


.

Merci Pascal,

Cependant, je vais essayer de continuer avec ce que j'ai
puisque cela fonctionne bien. En fait, je voulais juste
incorporer la fonction find next dans la macro que j'ai
donné au début...

Merci pour ton temps...

Denys

-----Original Message-----
Salut Denys,
c'est un peu plus clair mais pas suffisamment pour une
réponse élaborée.

Il faudrait vraiment connaître la structure précise et la
manière dont en

est extraite la combobox.
Si c'est l'allure ci-dessous pour la feuille
PAUL
|projet 1|projet 2
JEAN
|projet 3|projet 2
alors si ta combobox est construite sans doublons avec
les noms seuls des

projets ,
alors il est possible d'ajouter les noms
on y trouverait
projet 1 => PAUL
projet 2 => PAUL
projet 2 => JEAN
projet 3 => JEAN
'======================== =======================
Tu peux aussi créer une combobox avec les Noms PAUL, JEAN
(ou avec les

projets)
puis une listbox qui affichet les projets (ou les noms)
sur l'évènement

change de ta combobox (en modifiant sa propriété
RowSource...)

--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait
pas ou il va."

Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news: 197b801c44d75$199e8cb0$a601280a@phx.gbl...
Bonjour Pascal,

Sur la feuille Excel, il y a un bouton de commande. En
l'activant, un Userform apparait avec le combobox. Les
choix apparaissant au combobox sont le nom de tous les
projets en cours. Cependant, plusieurs personnes peuvent
être affectées à un même projet.

Sur le feuille Excel, apparait un tableau avec dans une
cellule, le nom du projet. Ce tableau est situé sous le
nom de celui qui s'en occupe. Si Jean travaille sur le
projet Bonjour, alors un tableau apparait sous le nom de
Jean (colonne B par exemple).

Si Paul travaille aussi sur ce projet, alors un tableau
est aussi créé sous le nom de Paul (colonne C par
exemple).

Je veux donc que l'usager puisse continuer le recherche
après qu'Excel l'ait dirigé au tableau de Jean....

Il faut noter que l'usager ne saura pas nécessairement au
départ qui est affecté à tel ou tel projet. C'est pourquoi
je ne peux demander de trouver le projet Bonjour affecté à
Paul par exemple.

Est-ce plus clair ainsi ?

Merci

Denys

-----Original Message-----
Salut,
je ne comprends pas très bien à partir de quel élément
l'usager peut

préciser son choix ???
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait
pas ou il va."

Sénèque.
http://www.ilyapa.net/excel
http://www.ilyapa.net/baseExcel
"Denys" <anonymous@discussions.microsoft.com> a écrit
dans le message de

news: 1979b01c44d70$cb41cea0$a601280a@phx.gbl...
Bonjour à tous,

Avec l'aide d'un userform sur lequel ne se trouve qu'un
combobox, l'usager choisit le nom d'un projet. Excel,
avec

les instructions suivantes, se rend directement au
premier

projet correspondant au choix du combobox.

Cependant, comme plusieurs projets peuvent avoir le même
nom (différentes personnes y travaillant) j'aimerais
avoir

la possibilité de demander à l'usager si c'est bien le
projet qu'il désire consulter ou si il désire voir si une
autre personne travaille aussi avec un projet du même
nom.

Voici le code...

Private Sub ComboBox1_Change()
On Error Resume Next

Nom = ComboBox1
With ActiveSheet()
Cells.Find(What:=Nom, After:=Range("C6"), _
LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext,
MatchCase:=False).Activate

End With
Unload UserForm3
End Sub

Auriez-vous une idée ?

Merci de votre temps

Denys


.

.