Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Autosave
I'm trying to write a macro that when a master file is saved, it will
automatically save a read only copy in another folder, any suggestions? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Autosave
You could use a macro that saves a copy in your favorite backup folder and then
marks the file readonly (the windows attribute). Option Explicit Sub testme01() Dim myPath As String Dim myFileName As String myPath = "C:\backups" If Right(myPath, 1) < "\" Then myPath = myPath & "\" End If With ThisWorkbook 'save the workbook .Save myFileName = myPath & .Name On Error Resume Next 'in case it's not there 'vbNormal will allow the code to overwrite the file SetAttr pathname:=myFileName, attributes:=vbNormal On Error GoTo 0 .SaveCopyAs Filename:=myFileName SetAttr pathname:=myFileName, attributes:=vbReadOnly End With End Sub Brad wrote: I'm trying to write a macro that when a master file is saved, it will automatically save a read only copy in another folder, any suggestions? -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Opened Autosave but when closing workbook Autosave closes itself | Excel Worksheet Functions | |||
autosave | Excel Programming | |||
Autosave | Excel Programming | |||
Removing AUTOSAVE.XLS(AUTOSAVE.XLA) from VBA editor??? | Excel Programming | |||
Removing AUTOSAVE.XLS(AUTOSAVE.XLA) from VBA editor??? | Excel Programming |