S
Scooter
I am getting a type mismatch on this
Dim intResult As Integer
intResult = Range("a:a").Find(What:="abc", After:="A44", LookIn:=xlValues,_
LookAt:=xlPart, SearchOrder:=xlByRows,
SearchDirection:=xlNext,_
MatchCase:=False, SearchFormat:=False).Row
I have also tried
intResult = Cells.Find(What:="abc", After:="A44", ...).Row
intResult = Selection.Find(What:="abc", After:="A44", ...).Row
Dim intResult As Integer
intResult = Range("a:a").Find(What:="abc", After:="A44", LookIn:=xlValues,_
LookAt:=xlPart, SearchOrder:=xlByRows,
SearchDirection:=xlNext,_
MatchCase:=False, SearchFormat:=False).Row
I have also tried
intResult = Cells.Find(What:="abc", After:="A44", ...).Row
intResult = Selection.Find(What:="abc", After:="A44", ...).Row