Posted to microsoft.public.excel.programming
|
|
SPOT THE MISTAKE!....
Thanks for the help Dave!
WhytheQ wrote:
Sorry Don but I'm not prepared to accept any sort of criticism of the
case I use.
I wasn't shouting, and if you look back on my previous posts on this
group (and there are a lot) then you will see that I'm always polite.
I have been involved in threads previously where people have posted
really rude comments, in lower case text - maybe you should concentrate
on those!
Thanks for your comments & long may the internet be free of petty
red-tape.
Jason
Don Guillett wrote:
1. Please don't SHOUT. It is considered rude to type in all caps.
2. Have a look in the vba help index for FINDNEXT. There is a good example.
--
Don Guillett
SalesAid Software
"WhytheQ" wrote in message
oups.com...
CAN ANYONE SEE WHERE THE ERROR IS WITH THE FOLLOWING CODE. I REGULARLY
HAVE PROBLEMS WITH THE FIND METHOD. MAYBE I'M MISSING AN ARGUMENT OUT,
AS IT ALWAYS THROWS THE ERROR "OBJECT REQUIRED" EVEN WHEN THE
SERCHSTRING IS IN THE AREA BEING SEARCHED
MAYBE THE PROBLEM IS THAT THE SEARCH STRINGS AND SEARCHAREA ARE ON
DIFFERENT WORKSHEETS?
ANY HELP GREATLY APPRECIATED,
JASON.
Dim myFoundAddress As String
For i = 2 To x
On Error Resume Next
myFoundAddress =
Sheets("Static").Range("MG_Tournaments").Find _
(What:=Sheets("Input").Cells(i, 7), LookIn:=xlValues,
LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=True, _
SearchFormat:=False).Address
If myFoundAddress < "" Then
Cells(i, 8) = "True"
Else
Cells(i, 8) = "False"
End If
Next
On Error GoTo 0
|