PDA

View Full Version : Need assistance in the code



Jagdev
07-22-2015, 05:48 AM
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