View Single Post
 
Old 10-21-2015, 02:22 AM
gmayor's Avatar
gmayor gmayor is offline Windows 7 64bit Office 2010 32bit
Expert
 
Join Date: Aug 2014
Posts: 4,106
gmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud of
Default

If you are referring to the earlier macro, this addresses the workbook with the variable xlBook. To insert columns between A & B and between B & C locate the line
Code:
xlBook.sheets(1).Range("A1").PasteSpecial ("HTML")
and after it add the lines
Code:
xlBook.sheets(1).Range("B1").EntireColumn.Insert
xlBook.sheets(1).Range("D1").EntireColumn.Insert
__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com
Reply With Quote