Using VBA I want an If/Then statement to search within a single cell (D59) to
find if the ":" (colon character) exists after the fourth character. If not
"Then: Wrong = True"

In an adjacent worksheet cell I could just enter =iserr(find(":",D59,4)) and
if the result is True then I know it doesn't exist.

How do I write this in VBA?

If Instr(5, Range("D59"), ":") 0 then Wrong = True

"AZSteve" wrote:

Using VBA I want an If/Then statement to search within a single cell (D59) to
find if the ":" (colon character) exists after the fourth character. If not
"Then: Wrong = True"

In an adjacent worksheet cell I could just enter =iserr(find(":",D59,4)) and
if the result is True then I know it doesn't exist.

How do I write this in VBA?

Dang, I really need to learn to read the details more carefully before
posting my reply. This actually should have been:

If InStr(5, Range("D59"), ":") = 0 Then Wrong = True

or

If Not InStr(5, Range("D59"), ":") 0 Then Wrong = True

but you probably got the idea anyhow...


"B Lynn B" wrote:

If InStr(5, Range("D59"), ":") 0 then Wrong = True

"AZSteve" wrote:

Using VBA I want an If/Then statement to search within a single cell (D59) to
find if the ":" (colon character) exists after the fourth character. If not
"Then: Wrong = True"

In an adjacent worksheet cell I could just enter =iserr(find(":",D59,4)) and
if the result is True then I know it doesn't exist.

How do I write this in VBA?