Run time error 1004 - Method 'range of object' _ 'global failed'

[Pauljj]

This error message is coming up at this point in my code

Set C1 = Range(Cells(3, 7), Cells(3, 165)).Find(Range(vData).Value, LookIn:=xlValues, lookat:=xlWhole)



I think it has something to do with it trying to find vdata which is a week number

I am trying to find week number 1 between cells 3,7 and 3,165 can anyone see something glaringly obvious that I can't ?

 

[JackDanIce]

It seems to be a problem with your variable vData, what type is it and how do you define it?

 

[JackDanIce]

This works for me anyway:

Sub TryMe()
Dim C1 As Range
Dim vData As String
vData = Range("A1")
Set C1 = Range(Cells(3, 7), Cells(3, 165)).Find(vData, LookIn:=xlValues, lookat:=xlWhole)
C1.Select
End Sub

Where A1 has the word "Hello" and I've also placed that word in cell M3

 

[Pauljj]

Legendary Jack, thanks very much, I changed this part as per your message Find(vData,

and it worked perfectly

Thanks very much

Paul

 

[JackDanIce]

You're welcome