change ranges to suit, i didn't test, but looks rightvb Code:
dim notallempty as boolean, c as range for each c in range("o3:0333") if not isempty(c) then notallempty = true: exit for next if not isempty(range("c9")) and not isempty(range("c10") and notallempty then else exit sub end if




Reply With Quote