Amending code

Please Login or Register  to view this content.

this code on sheet SU3 COPYS column B:B, and then does the rest of the code. This process is then repeated for column C:C , D:D and so on and there is lot of code here. Can anyone help me simplfy this so that if column b1 is NOT empty then run this code and then move to the next column and so on..