ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   when a Find statement is successful (https://www.excelbanter.com/excel-programming/283778-when-find-statement-successful.html)

captbluefin[_7_]

when a Find statement is successful
 

Hello and Happy turkey day to all.
This question falls in the "I know there has to be a better way."
category.

An example will tell all:

Here is the Find statement
dim rngFoundCell as Range
set rngFoundcell = (cells.find:= "TEST")

Now the question:

When the find is not succesful I can use the following statement:

If rngFoundCell is Nothing then
MsgBox "The word TEST has not been found."
End If

When the find statement is successful I want to be able to use an if
statement to say something like

If rngFoundcell is ???? then
MsgBox " The word TEST has been found."
End If

What I have been doing is using the following statement:

If rngFoundcell is nothing then
Else
MsgBox "The word TEST has been found."
End IF

The above statement accomplishes what I am trying to do, however, I
know there must be a better way to phrase the statement

I have tried:
If not rngFoundCell then

The statement does not work.

I have also tried the following statement in many permutations to no
avail:

If rngFoundcell.text = "TEST" then

What is the "good" way to test for a succesful Find statement??

Thanks


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/


Dave Peterson[_3_]

when a Find statement is successful
 
I like your if/then/else structure, but:

if not rngfoundcell is nothing then
would work, too.



captbluefin wrote:

Hello and Happy turkey day to all.
This question falls in the "I know there has to be a better way."
category.

An example will tell all:

Here is the Find statement
dim rngFoundCell as Range
set rngFoundcell = (cells.find:= "TEST")

Now the question:

When the find is not succesful I can use the following statement:

If rngFoundCell is Nothing then
MsgBox "The word TEST has not been found."
End If

When the find statement is successful I want to be able to use an if
statement to say something like

If rngFoundcell is ???? then
MsgBox " The word TEST has been found."
End If

What I have been doing is using the following statement:

If rngFoundcell is nothing then
Else
MsgBox "The word TEST has been found."
End IF

The above statement accomplishes what I am trying to do, however, I
know there must be a better way to phrase the statement

I have tried:
If not rngFoundCell then

The statement does not work.

I have also tried the following statement in many permutations to no
avail:

If rngFoundcell.text = "TEST" then

What is the "good" way to test for a succesful Find statement??

Thanks

------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/


--

Dave Peterson


Pete McCosh[_5_]

when a Find statement is successful
 
Cap'n,

I don't know about a "good" way, but you can test for:

If Not rngFoundCell is Nothing Then
....

Remember, the result is a Range object, so you can also
refer to any of the normal properties:

debug.print rngFoundCell.value
debug.print rngFoundCell.Address

Incidentally, what have turkeys got to do with anything?

Cheers, Pete.



-----Original Message-----

Hello and Happy turkey day to all.
This question falls in the "I know there has to be a

better way."
category.

An example will tell all:

Here is the Find statement
dim rngFoundCell as Range
set rngFoundcell = (cells.find:= "TEST")

Now the question:

When the find is not succesful I can use the following

statement:

If rngFoundCell is Nothing then
MsgBox "The word TEST has not been found."
End If

When the find statement is successful I want to be able

to use an if
statement to say something like

If rngFoundcell is ???? then
MsgBox " The word TEST has been found."
End If

What I have been doing is using the following statement:

If rngFoundcell is nothing then
Else
MsgBox "The word TEST has been found."
End IF

The above statement accomplishes what I am trying to do,

however, I
know there must be a better way to phrase the statement

I have tried:
If not rngFoundCell then

The statement does not work.

I have also tried the following statement in many

permutations to no
avail:

If rngFoundcell.text = "TEST" then

What is the "good" way to test for a succesful Find

statement??

Thanks


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from

http://www.ExcelForum.com/

.


captbluefin[_8_]

when a Find statement is successful
 

thanks Dave - works like a charm

B

-----------------------------------------------
~~ Message posted from http://www.ExcelTip.com
~~View and post usenet messages directly from http://www.ExcelForum.com


captbluefin[_9_]

when a Find statement is successful
 

thanks Dave - works like a charm

BB


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/



All times are GMT +1. The time now is 10:07 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com