Find string within a text in VBA

[neta]

HI,

How can I find a specific string in a text within a VBA code. Fo
example - to search "Japan" in "the capital of Japan is Tokyo" an
receive "TRUE" if found and "FALSE" if not..

Thanks

 

[JE McGimpsey]

One way:

Dim bFound As Boolean
bFound = InStr("the capital of Japan is Tokyo","Japan") > 0

 

[Frank Kabel]

Hi
use InStr for this. e.g.
If InStr(range("A1").value,"Japan")>0 then
msgbox "Found it"
end if

 

[Norman Harker]

Hi Neta!

One way:

=NOT(ISERROR(FIND(" Japan ",A1)))

Note that I've put a space either end of the word sought so as to
avoid TRUE for Japanese.

If you have a series of similar requests you could use:

Put the Country in F1 and then use:

=NOT(ISERROR(FIND(" "&F1&" ",A1)))

 

[Norman Harker]

Hi!

Too many Friday arvo drinks! Didn't read VBA!

--
Regards
Norman Harker MVP (Excel)
Sydney, Australia
(e-mail address removed)
news:[email protected]...

 

[Jack Sons]

Norman,

What are "arvo drinks"?

Jack Sons
The Netherlands

 

[Norman Harker]

Hi!

It's a Strine expression.

"arvo" = afternoon

 

[Jack Sons]

Norman,

Thanks, could never have guessed.
Now, don't get mad at me, what the heck is "Strine expression"?

Jack.

 

[Norman Harker]

G'day!

"Strine" = Strine for "Australian"

(Listen to how Dinki Di's say "Australian")

See:
http://www.artistwd.com/joyzine/australia/strine/

Sick as pigs here with the Kiwis winning the Bledisloe Cup match.