Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy worksheet from Active workbook into all other open workbooks
Hi,
Ammending the below code, how can I complete the following ; 1) copy a worksheet (named "Invoice") from the activesheet into all other open workbooks (in the first worksheet position). 2) have cell F8 in all the new workbooks match the cell ref for each of the i,3 values in the activesheet Sub NewFiles() Const cPath = "C:\Temp\" Dim wkb As Workbook, i As Long, lngLastRow As Long, sht As Worksheet With ActiveSheet lngLastRow = .Cells(Rows.Count, 3).End(xlUp).Row For i = 12 To lngLastRow Set wkb = Workbooks.Add wkb.SaveAs cPath & .Cells(i, 3).Value Next End With End Sub Thanks Troy |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro to copy active worksheet to new workbook | Excel Discussion (Misc queries) | |||
Copy Worksheet from one open workbook to another... | Excel Worksheet Functions | |||
copy worksheet from closed workbook to active workbook using vba | Excel Worksheet Functions | |||
Mailing Excel workbooks that are not active workbook | Excel Programming | |||
copy sheet1 from all open workbooks to one workbook | Excel Programming |