So I have previously gone through this forum and found an answer to what I was trying to achieve but now the VBA I have isn't working anymore and I can't figure out why it is not. Could somebody take a look at my code and spreadsheet and tell what I am missing. The link to the previous thread that helped me achieve my goal is below:

http://www.excelforum.com/excel-prog...ml#post4218152

I have attached the workbook that contains the data I am trying to format.

Data Dump form ADVWEB.xlsm