Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
more workbooks in one
I have a macro that join more workbooks in one.
I would like to write this macro in one sheet named “report” and cop to it every month all sheets contained in the others workbooks I wan to join. Than I would like to number the pages. Someone can help me? bkList = Array("Bk1.xls", "Bk2.xls", "Bk3.xls", "Bk4.xls", "Bk5.xls" "Bk6.xls", "Bk7.xls") for i = lbound(bkList) to ubound(bklist) set wkbk = workbooks.Open(blList(i)) if i = lbound(bkList) then wkbk.Sheets.copy set wkbk1 = ActiveWorkbook else wkbk.Sheets.Copy After:=wkbk1.Sheets(wkbk1.sheets.count) end if Nex -- Message posted from http://www.ExcelForum.com |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Updating Workbooks from multiple links Workbooks | Excel Worksheet Functions | |||
Copy/ move selected data from workbooks to seperate worksheets or workbooks | Excel Worksheet Functions | |||
Display 2 formulas from source workbooks to destination workbooks | Excel Discussion (Misc queries) | |||
suddenly my excel workbooks are "shared workbooks" | Excel Discussion (Misc queries) | |||
Workbooks.Open closes other workbooks | Excel Programming |