Using VBA to create column header

I've created some columns using this code:

Please Login or Register  to view this content.

I'd like to put values (or column headers) into B1, C1, D1, N1, O1, and P1.

try add some code lines, like this:

Please Login or Register  to view this content.