PDA

View Full Version : Solved: Find cell and return value as string



akamax_power
06-10-2008, 12:25 PM
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

xld
06-10-2008, 12:44 PM
Dim sht As String
With Sheets("Project Summary")
sht = .Cells.Find(what:=idstr).Offset(0, 2).Value
End With

akamax_power
06-10-2008, 04:17 PM
That was easy, i feel like an idiot now