ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Copy worksheet from Active workbook into all other open workbooks (https://www.excelbanter.com/excel-programming/290855-copy-worksheet-active-workbook-into-all-other-open-workbooks.html)

TroyB[_2_]

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




All times are GMT +1. The time now is 06:02 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com