Hi All!

I need to find out if certain names exist in Worksheets
("Data").Range("A1:A300") in my application.
It should give boolean answer True or False.

So I would like to use "Find method" but I could not find
much answer in help file or MSDN library.

Can anyone tell me how to use find method please?

Thanks in advance,
Shinichi

Shinichi,

I like to use the CountIf function. (It has few if any errors)
Dim nm As String, x As Integer
nm = "z"
x = WorksheetFunction.CountIf(Sheets("sheet2").Range(" A1:A300"), nm)
If x = 0 Then
MsgBox (nm & " not found")
Else
MsgBox (x & " occurance(s) of " & nm & " found")
End If

You can use a For .... Next loop to cycle through a list of names.
Or you can use an Input box for the user to enter a name to search for.
Amend the code to return True or False.

You could build this into a Function instead of a Sub.
--
sb
"Shinichi" wrote in message
...
Hi All!

I need to find out if certain names exist in Worksheets
("Data").Range("A1:A300") in my application.
It should give boolean answer True or False.

So I would like to use "Find method" but I could not find
much answer in help file or MSDN library.

Can anyone tell me how to use find method please?

Thanks in advance,
Shinichi

Hi Steve,

Thanks for the help.
Yes, it works for my application.

Shinichi
-----Original Message-----
Shinichi,

I like to use the CountIf function. (It has few if any
errors)
Dim nm As String, x As Integer
nm = "z"
x = WorksheetFunction.CountIf(Sheets("sheet2").Range
("A1:A300"), nm)
If x = 0 Then
MsgBox (nm & " not found")
Else
MsgBox (x & " occurance(s) of " & nm & " found")
End If

You can use a For .... Next loop to cycle through a list
of names.
Or you can use an Input box for the user to enter a name
to search for.
Amend the code to return True or False.

You could build this into a Function instead of a Sub.
--
sb
"Shinichi" wrote in message
...
Hi All!

I need to find out if certain names exist in Worksheets
("Data").Range("A1:A300") in my application.
It should give boolean answer True or False.

So I would like to use "Find method" but I could not
find
much answer in help file or MSDN library.

Can anyone tell me how to use find method please?

Thanks in advance,
Shinichi


.

Shinichi,

Great! There are many ways to get there, but this one appeals to me since
it doesn't have error issues to work around.

--
sb
"Shinichi" wrote in message
...
Hi Steve,

Thanks for the help.
Yes, it works for my application.

Shinichi
-----Original Message-----
Shinichi,

I like to use the CountIf function. (It has few if any
errors)
Dim nm As String, x As Integer
nm = "z"
x = WorksheetFunction.CountIf(Sheets("sheet2").Range
("A1:A300"), nm)
If x = 0 Then
MsgBox (nm & " not found")
Else
MsgBox (x & " occurance(s) of " & nm & " found")
End If

You can use a For .... Next loop to cycle through a list
of names.
Or you can use an Input box for the user to enter a name
to search for.
Amend the code to return True or False.

You could build this into a Function instead of a Sub.
--
sb
"Shinichi" wrote in message
...
Hi All!

I need to find out if certain names exist in Worksheets
("Data").Range("A1:A300") in my application.
It should give boolean answer True or False.

So I would like to use "Find method" but I could not
find
much answer in help file or MSDN library.

Can anyone tell me how to use find method please?

Thanks in advance,
Shinichi


.