Solved: Find cell and return value as string

[akamax_power]

Ok, I'm having a little trouble with this.

I want to be able to find the cell in the sheet "Project Summary" that contains a specific ID and return the value of an offset cell the found cell as a string.

something like:

Dim sht As String
sht = cells.find(what:=idstr, after:=Sheets("Project Summary").range("A1"),).offset(0,2).value

This doesnt work but maybe you get the idea.

Thanks,
Gerald

[Bob Phillips]

Dim sht As String
With Sheets("Project Summary")
sht = .Cells.Find(what:=idstr).Offset(0, 2).Value
End With

[akamax_power]

That was easy, i feel like an idiot now