This failed as you noted:

Sub tester1()
Rows(1).Value = "Z"
Range("M1").Value = "A"
Set oWorksheet = ActiveSheet
Range("A:AA").EntireColumn.Hidden = True
vColName = "A"
Set oFound = oWorksheet.Rows(1).Find(vColName, _
LookIn:=xlValues, LookAt:=xlWhole)
If Not oFound Is Nothing Then
Debug.Print oFound.Address
Else
Debug.Print "Not found"
End If

End Sub

This Worked - using xlFormulas rather than xlValues

Sub tester2()
Rows(1).Value = "Z"
Range("M1").Value = "A"
Set oWorksheet = ActiveSheet
Range("A:AA").EntireColumn.Hidden = True
vColName = "A"
Set oFound = oWorksheet.Rows(1).Find(vColName, _
LookIn:=xlFormulas, LookAt:=xlWhole)
If Not oFound Is Nothing Then
Debug.Print oFound.Address
Else
Debug.Print "Not found"
End If

End Sub

of course looking for something produced by a formula would not work.

--
Regards,
Tom Ogilvy

"Michel" wrote in message
m...
"Bob Phillips" wrote:
The fact that it is hidden should not stop you.
What problem are you experiencing?

Correct, the problem is that it can't be found!
Set oFound = oWorksheet.Rows(1).Find(vColName, LookIn:=xlValues,
LookAt:=xlWhole)

so, the error comes from trying to use the oFound which in Nothing

So I should have asked: How can I search in hidden columns?