Hi Guys,

I am trying to mix the both but get an run time error 54 on line

If Dir(.Cells(r, "c")) <> "" Then