Texte cellule Excel

Bonjour,
Comment est-ce que je pourrai dire en VB: Si le texte de la cellule contient le mot "Robinet", alors... ?

Merci d'avance

Code:

---

if instr(1,cells(1,1).value,"Robinet",vbTextCompare) <> 0 then

---

Un exemple parmi tant d'autres :mrgreen:

Bonjour,
bienvenue sur le forum
je pense que tu devrais lire les règles du forum qui te suggère avant de poster de lire:
les tutoriels
les FAQS
et tutti quanti
:)
rémi

Citation:

---

Envoyé par illight

Code:

---

if instr(1,cells(1,1).value,"Robinet",vbTextCompare) <> 0 then

---

Un exemple parmi tant d'autres :mrgreen:

---

Non, je ne trouve pas, c'est bien, Instr ! quoique... je mettrais :

Code:

---

if instr(cells(1,1).value,"Robinet", vbTextCompare) <> 0 then

---

Si tu mets Instr(1,....) faudra que le texte de la cellule commence par le mot cherché. lovevale dit "Contient" et non "Commence par" :mouarf:

Merci beaucoup

Citation:

---

Envoyé par ouskel'n'or

Non, je ne trouve pas, c'est bien, Instr ! quoique... je mettrais :

Code:

---

if instr(cells(1,1).value,"Robinet", vbTextCompare) <> 0 then

---

Si tu mets Instr(1,....) faudra que le texte de la cellule commence par le mot cherché. lovevale dit "Contient" et non "Commence par" :mouarf:

---

Si tu veux chipoter :mrgreen: dans l'aide :

Citation:

---

Si cet argument est omis, la recherche commence au premier caractère.

---

Donc que tu mette 1 ou pas ça revient au meme :mrgreen: De plus :

Citation:

---

L'argument start est obligatoire si l'argument compare est indiqué

---

Donc t'es obligé de mettre 1 :mrgreen: t'as testé au moins ce que t'as écrit petit mouton ? :mrgreen:

Oui, j'ai testé mais j'avais utilisé ce que j'utilise toujours (vieille habitude), lcase pour les deux éléments. Pas besoin de Compare, pas besoin de Instr(1,...)
Ainsi, si l'option Compare binary a été déclarée dans le module -> jamais d'accident :langue:

Bon, ça va, t'as raison ! :(