Need assistance in the code

[Jagdev]

Hi Experts
I am trying to find a specific column for row1 and then check if it contains blank cell highlight the cell. I am able to find the column with the below code.

With Sheets(1).Rows(1)
Set t = .Find("location*", LookAt:=xlPart)

And normal code to check each cell is

For Each cell In Range(A2:A10)
     If cell = "" And cell.Column < 4 Then cell.Interior.Color = vbYellow
     Next cell

How to add both the code which first find the specific column and then loop throw each cell in the column and highlight the blank cell if it is there.
Regards,
JD