Home |
Search |
Today's Posts |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Public newWorkBook As Excel.Workbook
Sub copy() Set newWorkBook = Application.Workbooks.Add this code copies current region Workbooks("book2").Sheets("Sheet1").Range("A1").Cu rrentRegion.cop Destination:=newWorkBook.Sheets("sheet1").Range("a 1") this code copies all cells Workbooks("book2").Sheets("Sheet1").Cells.cop Destination:=newWorkBook.Sheets("sheet1").Range("a 1") End Su -- Message posted from http://www.ExcelForum.com |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Can not copy a sheet to another book | Excel Worksheet Functions | |||
Too Few Rows to copy sheet to another book | Excel Worksheet Functions | |||
Copy sheets into one book | Excel Worksheet Functions | |||
copy worksheets to new book without linking to original book | Excel Discussion (Misc queries) | |||
Pivot Table: Copy from one Book to another | Excel Discussion (Misc queries) |