Want to Delete Specified Columns and then add Column header to the remaining ones

Hi!

So I want to add some VBA Code that deletes specified columns and then insert Bolded Column headers to the remaining columns. The columns I want deleted are D,F,I,J,K. For simplicity purposes, the column headers would be A,B,C,D,E,F,G.

I tried using Columns("D,F,I,J,K").delete but I kept on getting 13 error.

Thanks for the help!

Please Login or Register  to view this content.

See comments in code:

Please Login or Register  to view this content.

And I just figured out to do what I was asking in the previous post. Just in case some one in the future might use it, I've included the code I added.
It's probably not the most efficient way of handling the problem but it works:

Please Login or Register  to view this content.