santeria
Well-known Member
- Joined
- Oct 7, 2003
- Messages
- 1,844
Related to the Big File Macro...
I am trying to set it up so that the Network file has a XLT on the network, and also that the file has a consistent name, plus a current date in the format Month/Day/year... like FILENAME 02/06/04
The Macro below does a similar sort of thing for a local File, but this needs to be on a Network.
I don't know of any reason why a template cannot be on a network, but, if you do, please advise.
Ta
I am trying to set it up so that the Network file has a XLT on the network, and also that the file has a consistent name, plus a current date in the format Month/Day/year... like FILENAME 02/06/04
The Macro below does a similar sort of thing for a local File, but this needs to be on a Network.
I don't know of any reason why a template cannot be on a network, but, if you do, please advise.
Code:
Dim OrigFile As Object
Set OrigFile = ActiveWorkbook
Workbooks.Add Template:= _
"C:\Documents and Settings\name\Application Data\Microsoft\Templates\CMS.xlt"
ActiveWorkbook.SaveAs Filename:= _
"C:\REPORTS\DAILY SKILL 77\" & Format(Date, "mm_mmmm") & "\" & _
Format(Date, "mmm dd\.\x\l\s"), FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
Application.DisplayAlerts = False
OrigFile.Close
Application.DisplayAlerts = True
End Sub
Ta