VBA Tester si un mot existe dans une feuille

perdinch · 12 Octobre 2010

Bonjour,

Comment faire en VBA une recherche d'un terme dans une feuille d'un classeur dans la plage a1:Z1 .

exemple : rechercher le terme "tata"

Si "tata" existe faire ceci
Si "tata" n'existe pas faire cela

j'ai essayé avec find ...en vain.

MERCI de vos suggestions

tototiti2008 · 12 Octobre 2010

Re : VBA Tester si un mot existe dans une feuille

Bonjour perdinch,

Peut-être

Code:

If Application.Countif(Range("A1:Z1"),"tata")>0 then

si "tata" seul dans la cellule

ou

Code:

If Application.Countif(Range("A1:Z1"),"*tata*")>0 then

si "tata" contenu dans la cellule

Pierrot93 · 12 Octobre 2010

Re : VBA Tester si un mot existe dans une feuille

Bonjour Perdinch, toto

Perso, la méthode "find" étant native dans vba je l'utiliserais :

Code:

Dim x As Range
Set x = Range("A1:Z1").Find("tata", , xlValues, xlWhole, , , False)
If Not x Is Nothing Then MsgBox "trouvé en " & x.Address Else MsgBox "n'existe pas..."

si le mot recherché représente la totalité de la cellule, pour une partie modifier "xlWhole" par "xlpart".

bon après midi
@+

VBA Tester si un mot existe dans une feuille

perdinch

XLDnaute Occasionnel

tototiti2008

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

Discussions similaires

VBA Tester si un mot existe dans une feuille

perdinch

XLDnaute Occasionnel

tototiti2008

XLDnaute Barbatruc

Pierrot93

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency