View Single Post
 
Old 11-05-2015, 10:42 PM
Guessed's Avatar
Guessed Guessed is offline Windows 7 32bit Office 2010 32bit
Expert
 
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,978
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default

It appears that Graeme is the only one that has seen your document and workbook so it might be difficult for others to chime in with help.

If xlBook.sheets(1).Range("A1").PasteSpecial ("HTML") works successfully then adding the suggested lines immediately after that should still have the xlBook.sheets(1) object available to you.

If that code to add a column is failing then perhaps there are merged cells that are causing the issue.
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote