a few ways, one way would be utilising native XL match formula
assuming lookup criteria is in column A of Sheet1, x marks the spot...(ie row number in column A)
Code:
x = Application.WorksheetFunction.Match("concluded",Sheets("Sheet1").Columns(1),0)
note: you will need an error handler also in case you don't find a match... else VBA will bug out