Paste selected columns from worksheet in a workbook to anotherworkbook
Hi,
I am trying to copy a selected number of columns from one workbook and paste it into another worksheet in a second workbook. I keep on getting an error on ActiveSheet.Paste.(ie. TargetWS.Paste below) How can i get round this or better still could a vb champion show me the correct way to do this. Thanks. kolu Set SrcWkb = Workbooks("source.xls") Application.Windows("source.xls").Activate Columns("G:I").Select Application.CutCopyMode = False Selection.Copy Application.Windows("Target.xls").Activate Columns("G:I").Select With TargetWkb.Worksheets("sheet") TargetWS.Paste End With |
Paste selected columns from worksheet in a workbook to anotherworkbook
On 4 Apr, 01:50, Orimslala wrote:
Hi, I am trying to copy a selected number of columns from one workbook and paste it into another worksheet in a second workbook. I keep on getting an error on ActiveSheet.Paste.(ie. TargetWS.Paste below) How can i get round this or better still could a vb champion show me the correct way to do this. Thanks. kolu * * Set SrcWkb = Workbooks("source.xls") * * Application.Windows("source.xls").Activate * * Columns("G:I").Select * * Application.CutCopyMode = False * * Selection.Copy * * Application.Windows("Target.xls").Activate * * Columns("G:I").Select * * With TargetWkb.Worksheets("sheet") * * * * TargetWS.Paste * * End With The error message i get is : object invoked has disconnected from its cilents when i execute TargetWS.Paste |
All times are GMT +1. The time now is 01:00 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com