excel - Copying a column to a new workbook sheet in VBA -


i trying copy existing column sheet column in new workbook.

the code tried:

set newbook = workbooks.add sheets("sheet1").columns(1).copy destination:=newbook.sheets("sheet1").columns(2) 

this creating sheet no values copied! code works if copy sheet in same workbook.

how should create new sheet in newbook , target columns in sheet?

you must remember old book, otherwise sheets("sheet1").columns(1) refer first column of sheet1 of newly added 1 since activeworkbook in moment (so copy something, empty column):

sub qwerty()     set w1 = activeworkbook     set newbook = workbooks.add     w1.sheets("sheet1").columns(1).copy destination:=newbook.sheets("sheet1").columns(2) end sub 

edit#1:

this rename sheet in new workbook , perform copy:

sub qwerty2()     set w1 = activeworkbook     set newbook = workbooks.add     activesheet.name = "report"     w1.sheets("sheet1").columns(1).copy destination:=columns(2) end sub 

Comments

Popular posts from this blog

asp.net mvc - SSO between MVCForum and Umbraco7 -

Python Tkinter keyboard using bind -

ubuntu - Selenium Node Not Connecting to Hub, Not Opening Port -