The problem is the do until statement - the loop is not happening at
all therefore it is not finding the next P. Can I change the do until
statement to a range, or to the end of column?