Fonction de type InStr pour colonne

Bonjour à toutes et à tous ! :)

Existe-t-il une fonction qui agit comme InStr mais qui cherche la première occurence d'un mot dans une colonne ?
(donc qui donne le numéro de ligne)

Merci d'avance pour vos réponses.:ccool:

Kaera*

PS: C'est pas faut d'avoir cherché et sur le net et sur le forum...

Bonjour,

Tu pourrais utiliser la méthode Find

Voir réponse de ce post
http://www.developpez.net/forums/d11...lule-contient/

Bonjour,

Ici donne le N° de ligne du 1er "Toto" dans la colonne 2 :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub LeNumeroEst() Dim MaCible As Range   On Error GoTo errare Set MaCible = Columns(2).Find(What:="Toto", After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByColumns, _ SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=True) 'à tester avec : LookAt:=xlWhole pour voir la différence MsgBox MaCible.Row Set MaCible = Nothing Exit Sub errare: MsgBox "Aucune occurence trouvée" 'MaCible est restée à nothing dans ce cas End Sub

---

et surtout, il faut se souvenir que :

Citation:

---

Les paramètres des arguments RechercherDans, Regarder, OrdreRecherche et RespecterNbreOctets sont enregistrés chaque fois que vous utilisez cette méthode. Si vous ne spécifiez aucune valeur pour ces arguments lors du prochain appel à la méthode, les valeurs enregistrées sont utilisées. Le fait de définir ces arguments modifie les paramètres de la boîte de dialogue Rechercher, ce qui a pour effet de changer les paramètres enregistrés qui sont utilisés lorsque vous ne spécifiez pas les arguments. Pour éviter toute ambiguïté, définissez ces arguments explicitement chaque fois que vous utilisez cette méthode.

---

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points ;)

Didier

Bonjour jfontaine et Ormonth,

Merci à vous deux pour vos propositions de solutions. :ccool:

Ormonth, dans ta méthode, dans le Find(What:= puis-je utiliser * et ?, comme dans Like ?
Ex : ("*bravo?monsieur*)

Merci d'avance !:)

Citation:

---

Envoyé par Kaera

Bonjour jfontaine et Ormonth,

Ormonth, dans ta méthode, dans le Find(What:= puis-je utiliser * et ?, comme dans Like ?
Ex : ("*bravo?monsieur*)

---

Pas pareil, c'est pourquoi j'avais mis dans le code :

Code:

---

'à tester avec : LookAt:=xlWhole pour voir la différence

---

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier

Bonjour,

donc tu peux utiliser pour chercher le Mot "Donneur" dans la colonne 2 qui comporte "Donneur d'ordre test" :

Code:

---

1 2	Set MaCible = Columns(2).Find(What:="*Don?eur*", After:=ActiveCell, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, _ SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=True)

---

ou avec une meilleure maîtrise de la syntaxe :

Code:

---

1 2	Set MaCible = Columns(2).Find(What:="Don?eur", After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, SearchOrder:=xlByColumns, _ SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=True)

---

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier

Re,

J'allais justement te répondre que j'ai essayé d'utiliser * et ? et ça a fonctionné.

Merci pour ta disponibilité et ton efficacité Ormonth. :ccool: