So, add to your routine a check on the cell and make sure it is not an empty cell before doing anything to it.


If Not IsEmpty(SomeCell) Then 
    'do your stuff
End If