OVH Cloud OVH Cloud

RECHERCHE SUR PLUSIEUR FEUILLE

10 réponses
Avatar
e.platet
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que dois
je faire j'ai essayé de créer une macro via l'assistant de recherche mais
sans succès je crie au secours

merci

manu

10 réponses

Avatar
Dédé
Salut Manu !

Et c'est quoi la donnée que tu recherche ?

Est-ce que tu va souvent la faire cette recherche ?

Dédé
"e.platet" a écrit dans le message de
news:uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois

je faire j'ai essayé de créer une macro via l'assistant de recherche mais
sans succès je crie au secours

merci

manu




Avatar
JEAN
quel type de données tu veux rechercher numerque date ou standard

"e.platet" wrote:

Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que dois
je faire j'ai essayé de créer une macro via l'assistant de recherche mais
sans succès je crie au secours

merci

manu





Avatar
Joël GARBE
Bonsoir,

Un pt'iot exemple :

Sub VaChercher()
'
Dim Quoi As String
Dim oSheet As Worksheet
Quoi = "jojo"

For Each oSheet In Worksheets
oSheet.Select
If Not Cells.Find(What:=Quoi, After:=Range("A1"), LookIn:=xlFormulas,
LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
Is Nothing Then
MsgBox oSheet.Name & " - " & Cells.Find(What:=Quoi, After:¬tiveCell,
LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
.Address
Exit For
End If
Next

End Sub


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"e.platet" a écrit dans le message de news:
uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois je faire j'ai essayé de créer une macro via l'assistant de recherche
mais sans succès je crie au secours

merci

manu



Avatar
e.platet
bonsoir Dédé et merci

la donnée est une valeur alpha numérique exemple SE00111 ou 31000
mais la donnée changera en fonction de ce que l'on veut rechercher
faire souvent je dirai oui
d'autre info Dédé?

"Dédé" a écrit dans le message de news:
%
Salut Manu !

Et c'est quoi la donnée que tu recherche ?

Est-ce que tu va souvent la faire cette recherche ?

Dédé
"e.platet" a écrit dans le message de
news:uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois

je faire j'ai essayé de créer une macro via l'assistant de recherche mais
sans succès je crie au secours

merci

manu








Avatar
Dédé
Nom je pense que les infos que tu a donnés sont suffisantes ;-)

Si tu veux pas passer par une macro, dans le menu Edition, rechercher ou
Atteindre. Tu pourra aussi remarquer que tu peux utiliser des caratères
génériques ... Pour bien utiliser cette fonction, je te conseil de faire un
tit saut dans l'aide qui explique très bien tout ça ;-)

Autrement, si tu veux te mettre au VBA, démarre l'enregistreur de macro et
fait la même chose, après avoir terminé, tu stop l'enregistreur de macro et
tu va dans l'éditeur VBA qui te donnera le code correspondant à ce que tu a
fait ... Après, tu pourra toujours venir demander comment optimiser ce code
par là ;-)

Bon courage
Dédé

"e.platet" a écrit dans le message de
news:%23Tp$
bonsoir Dédé et merci

la donnée est une valeur alpha numérique exemple SE00111 ou 31000
mais la donnée changera en fonction de ce que l'on veut rechercher
faire souvent je dirai oui
d'autre info Dédé?

"Dédé" a écrit dans le message de news:
%
Salut Manu !

Et c'est quoi la donnée que tu recherche ?

Est-ce que tu va souvent la faire cette recherche ?

Dédé
"e.platet" a écrit dans le message de
news:uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois

je faire j'ai essayé de créer une macro via l'assistant de recherche
mais



sans succès je crie au secours

merci

manu












Avatar
e.platet
merci de ton aide dédié je vais essayer tout cela demain bonsoir.

"Dédé" a écrit dans le message de news:
uRbk$
Nom je pense que les infos que tu a donnés sont suffisantes ;-)

Si tu veux pas passer par une macro, dans le menu Edition, rechercher ou
Atteindre. Tu pourra aussi remarquer que tu peux utiliser des caratères
génériques ... Pour bien utiliser cette fonction, je te conseil de faire
un
tit saut dans l'aide qui explique très bien tout ça ;-)

Autrement, si tu veux te mettre au VBA, démarre l'enregistreur de macro et
fait la même chose, après avoir terminé, tu stop l'enregistreur de macro
et
tu va dans l'éditeur VBA qui te donnera le code correspondant à ce que tu
a
fait ... Après, tu pourra toujours venir demander comment optimiser ce
code
par là ;-)

Bon courage
Dédé

"e.platet" a écrit dans le message de
news:%23Tp$
bonsoir Dédé et merci

la donnée est une valeur alpha numérique exemple SE00111 ou 31000
mais la donnée changera en fonction de ce que l'on veut rechercher
faire souvent je dirai oui
d'autre info Dédé?

"Dédé" a écrit dans le message de news:
%
Salut Manu !

Et c'est quoi la donnée que tu recherche ?

Est-ce que tu va souvent la faire cette recherche ?

Dédé
"e.platet" a écrit dans le message de
news:uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles
que
dois

je faire j'ai essayé de créer une macro via l'assistant de recherche
mais



sans succès je crie au secours

merci

manu
















Avatar
e.platet
bonsoir cela serai des données alphanumérique du type E00344 ou PISTE ect
voila
"JEAN" a écrit dans le message de news:

quel type de données tu veux rechercher numerque date ou standard

"e.platet" wrote:

Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois
je faire j'ai essayé de créer une macro via l'assistant de recherche mais
sans succès je crie au secours

merci

manu







Avatar
e.platet
je te remercie je formaliserai tout cela demain merci joel
"Joël GARBE" a écrit dans le message de news:
41b4d0c8$0$16325$
Bonsoir,

Un pt'iot exemple :

Sub VaChercher()
'
Dim Quoi As String
Dim oSheet As Worksheet
Quoi = "jojo"

For Each oSheet In Worksheets
oSheet.Select
If Not Cells.Find(What:=Quoi, After:=Range("A1"), LookIn:=xlFormulas,
LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
Is Nothing Then
MsgBox oSheet.Name & " - " & Cells.Find(What:=Quoi,
After:¬tiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
.Address
Exit For
End If
Next

End Sub


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"e.platet" a écrit dans le message de news:
uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois je faire j'ai essayé de créer une macro via l'assistant de recherche
mais sans succès je crie au secours

merci

manu







Avatar
Dédé
Mais ce fut par plaisir ;-)

Bonne fin de soirée à toi et peut-être à demain ...

Dédé
"e.platet" a écrit dans le message de
news:
merci de ton aide dédié je vais essayer tout cela demain bonsoir.

"Dédé" a écrit dans le message de news:
uRbk$
Nom je pense que les infos que tu a donnés sont suffisantes ;-)

Si tu veux pas passer par une macro, dans le menu Edition, rechercher ou
Atteindre. Tu pourra aussi remarquer que tu peux utiliser des caratères
génériques ... Pour bien utiliser cette fonction, je te conseil de faire
un
tit saut dans l'aide qui explique très bien tout ça ;-)

Autrement, si tu veux te mettre au VBA, démarre l'enregistreur de macro
et


fait la même chose, après avoir terminé, tu stop l'enregistreur de macro
et
tu va dans l'éditeur VBA qui te donnera le code correspondant à ce que
tu


a
fait ... Après, tu pourra toujours venir demander comment optimiser ce
code
par là ;-)

Bon courage
Dédé

"e.platet" a écrit dans le message de
news:%23Tp$
bonsoir Dédé et merci

la donnée est une valeur alpha numérique exemple SE00111 ou 31000
mais la donnée changera en fonction de ce que l'on veut rechercher
faire souvent je dirai oui
d'autre info Dédé?

"Dédé" a écrit dans le message de news:
%
Salut Manu !

Et c'est quoi la donnée que tu recherche ?

Est-ce que tu va souvent la faire cette recherche ?

Dédé
"e.platet" a écrit dans le message de
news:uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles
que
dois

je faire j'ai essayé de créer une macro via l'assistant de recherche
mais



sans succès je crie au secours

merci

manu




















Avatar
e.platet
merci Joël

mais je souhaiterai une petite explication sur le fonctionnement de cette
macro savoir comment elle fonctionne pour essayer par la suite de réaliser
moi même ce genre de macro

merci de chez merci


"Joël GARBE" a écrit dans le message de news:
41b4d0c8$0$16325$
Bonsoir,

Un pt'iot exemple :

Sub VaChercher()
'
Dim Quoi As String
Dim oSheet As Worksheet
Quoi = "jojo"

For Each oSheet In Worksheets
oSheet.Select
If Not Cells.Find(What:=Quoi, After:=Range("A1"), LookIn:=xlFormulas,
LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
Is Nothing Then
MsgBox oSheet.Name & " - " & Cells.Find(What:=Quoi,
After:¬tiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:úlse) _
.Address
Exit For
End If
Next

End Sub


--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"e.platet" a écrit dans le message de news:
uGP%
Bonsoir,

je souhaite faire une recherche d'une donnée sur plusieurs feuilles que
dois je faire j'ai essayé de créer une macro via l'assistant de recherche
mais sans succès je crie au secours

merci

manu