auto archiving

  • Thread starter Thread starter torpido
  • Start date Start date
T

torpido

Hi, i tried this on general froum, so far i got one reply which was a
macro, it kinda didnt work. can somebody help me, ill be very glad
thanks
hi all
just wanted to aks if there is any kinda of auto- fucntion that can
archive a worksheet separatly wihout needing to save the acctual file.
like i have "book1" and i add an entry then print the sheet but i dont
want to save it cuz its a template-like but i want to have a record of
it some where else with same date.
like "book1 05-10-2005", "book1 06-10-2005" and so on to be saved in
given path(folder).

i know i can do this by "save-as" but then i must always give the file
name over and over and i must choose where to save everytime.

the macro which i got in reply was this, mybe it can be a lil help
'------Start
Option Explicit

Sub SaveCopyOfSheet()
Dim strSaveAs As String
Dim strInitial As String
Dim strFilter As String

ActiveSheet.Copy
strInitial =3D "Book1_" & Format(Date, "yyyy_mm_dd") & ".xls"
strFilter =3D "Excel (*.xls), *.xls"
strSaveAs =3D
Application.GetSaveAsFilename(InitialFilename:=3Ds trInitial,
Filefilter:=3DstrFilter)
If strSaveAs <> False Then
ActiveWorkbook.SaveAs Filename:=3D _
strSaveAs, FileFormat:=3DxlNormal, Password:=3D"",
WriteResPassword:=3D"", _
ReadOnlyRecommended:=3DFalse, CreateBackup:=3DFalse
ActiveWindow.Close
End If
If MsgBox("Close this document", vbQuestion + vbYesNo) =3D vbYes Then
ThisWorkbook.Saved =3D True
ThisWorkbook.Close
End If
End Sub
'------------ END
by:
Wouter Magr=E9
 
thanks, but as u said its not exactly as i wished.
if this add-in could be edited so a user can choose a saperate folder
for each sheets and the created backup file remains there instead of
deleting that would be great.
this add-in should work stand-alone for each sheet not one-for-all, so
each sheet can have it own AutoSafe setting.
 
this forums is so papoulated i think, my thread goes to 2nd page so fast
:lol:
anyway just wanted to bump this post so it may get some attention
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top