Page 1 of 2 12 LastLast
Results 1 to 15 of 22
  1. #1
    Bronze Lounger
    Join Date
    Jan 2001
    Location
    Melbourne, Australia
    Posts
    1,294
    Thanks
    0
    Thanked 0 Times in 0 Posts

    autosave and autorecover (Word 2002 XP SR3)

    searching through the posts about autosave and autorecover.

    it mentions the autosave feature has been removed from Word 97 & replaced with autorecover.

    therefore is it safe to say that autosave is not in Word XP(2002)

    diana

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    That is correct. See How can I make Word save or back up my document automatically? on the Word MVP site for an overview of some important settings in the Save tab of Tools | Options...

  3. #3
    Bronze Lounger
    Join Date
    Jan 2001
    Location
    Melbourne, Australia
    Posts
    1,294
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    thanks again Hans

    diana

  4. #4
    Bronze Lounger
    Join Date
    Jan 2001
    Location
    Melbourne, Australia
    Posts
    1,294
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    ...and in excel XP (2002) the autosave is left "untouched" ie it still automatically saves your file every # minutes?

  5. #5
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    Nope:

    "In Microsoft Excel 2002 and in Microsoft Office Excel 2003, the AutoSave feature has been replaced with the AutoRecover feature."

    "These following add-ins are no longer included with Excel 2002 and with later versions of Excel. Additionally, they are not available for download:
    - Autosave Add-in (Autosave.xla)
    - ..."

    Our (W)MVP Jan Karel Pieterse has written an AutoSafe add-in for Excel that replaces the old AutoSave add-in supplied by Microsoft in Excel 2000 and before. It's free and it's available from the JKP-ADS Download page.

  6. #6
    Bronze Lounger
    Join Date
    Jan 2001
    Location
    Melbourne, Australia
    Posts
    1,294
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    thank you Hans

    diana

  7. #7
    Platinum Lounger
    Join Date
    Feb 2001
    Location
    Yilgarn region of Toronto, Ontario
    Posts
    5,453
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: autosave and autorecover (Word 2002 XP SR3)

    <P ID="edit" class=small>(Edited by chrisgreaves on 07-Nov-08 07:30. Added notes on SaveReminder.zip)</P>>That is correct. See "How can I make Word save or back up my document automatically? "
    Excellent reference and brought-me-to-a-standstill reading.
    Thanks.

    (next day)
    I downloaded SaveReminder.zip from Graham Mayor’s site and am using it with the following modifications.
    I reason that there's no need to activate a document prior to saving, and there's no need to save a document (such as dear old Document1) if it isn't dirty.<pre> For x = 1 To DocCount
    '''' Documents(x).Activate
    '''' ActiveDocument.Save
    With Documents(x)
    If .Saved Then
    Else
    .Save
    End If
    End With
    Next x</pre>


  8. #8
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post
    Hi, Chris -

    Doing a search to modify the above macro, I noticed your post:

    "I downloaded SaveReminder.zip from Graham Mayor’s site and am using it with the following modifications.
    I reason that there's no need to activate a document prior to saving, and there's no need to save a document (such as dear old Document1) if it isn't dirty.

    For x = 1 To DocCount
    '''' Documents(x).Activate
    '''' ActiveDocument.Save
    With Documents(x)
    If .Saved Then
    Else
    .Save
    End If
    End With
    Next x
    "
    ==========
    Where does this go in the original macro?

    My husband downloaded SaveReminder quite a while ago (he still is with Word 97...) and its dialog box opens before a document does. He has to click End in the dialog box ("Run-time error 5") before he can get to work. Your edits seem to solve this problem. We are not savvy enough to know where to place your code.

    Thank you for your help!

    (He uses Windows XP, SR2.)

  9. #9
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts
    The SavRemMain module in the SavedReminder.dot add-in contains the following macro:

    Code:
    Sub SaveDoc()
    Dim DocCount As Integer
    Dim DocIndex As Integer
    Dim x As Integer
    On Error Resume Next
    	If SaveAll Then
    		DocCount = Documents.Count
    		DocIndex = ActiveWindow.Index
    		For x = 1 To DocCount
    			Documents(x).Activate
    			ActiveDocument.Save
    		Next x
    		Windows(DocIndex).Activate
    	Else
    		ActiveDocument.Save
    	End If
    	AutosaveReminder False
    End Sub
    Chris's modifications go into this macro, with the following result:

    Code:
    Sub SaveDoc()
    Dim DocCount As Integer
    Dim DocIndex As Integer
    Dim x As Integer
    On Error Resume Next
    	If SaveAll Then
    		DocCount = Documents.Count
    		DocIndex = ActiveWindow.Index
    		For x = 1 To DocCount
    			With Documents(x)
    				If .Saved Then
    				Else
    					.Save
    				End If 
    		   End With
    		Next x
    		Windows(DocIndex).Activate
    	Else
    		ActiveDocument.Save
    	End If
    	AutosaveReminder False
    End Sub

  10. #10
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post
    Hi, Hans -

    I'm embarrassed to say we cannot get this new code to work.

    We navigated to SaveReminder.dot, file/open, deleted the original Savedoc code and added Chris' code.
    We saved the .dot, exited, restarted, and still get "Invalid procedure call or argument." Doesn't matter if we open a file from Deskto, from a Folder, via Windows Explorer.

    Perhaps I should delete the .dot and download it again....

    Curious

    P.S. what does the <?ph mean next to code area???

  11. #11
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts
    Make sure that you edited only the SaveDoc macro, and nothing else. As a test, I installed the add-in with Chris's modifications, and it works (even if it doesn't do what he intended).

  12. #12
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post
    Thanks, Hans. I checked yet again that I edited only the SaveDoc mac and that was the only change I made.

    I will delete that .dot and install it again.

    Regards, Curious

  13. #13
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post
    Okay. Installed SaveReminder, made the edits to Savedoc macro and files do open directly -- no dialog box. Thanks to you and Chris.

    However, the doc isn't being save automatically nor is the ShowOptions toolbar appearing as had been originally .

    I have taken the liberty of copying the following macros with the hope you can indicate what True/False or False/True changes should be made to correct these 2 issues: not saving and not exhibiting the toolbar.

    Thank you.

    Edit:
    Sorry - here is the code:

    Sub RunSave()
    GetVal
    If TurnOff = True Then
    ElseIf Documents.Count < 1 Then
    AutosaveReminder False
    ElseIf SaveAuto = True Then
    SaveDoc
    Else
    frmSaveReminder.Show
    End If
    End Sub

    Sub SaveDoc()
    Dim DocCount As Integer
    Dim DocIndex As Integer
    Dim x As Integer
    On Error Resume Next
    If SaveAll Then
    DocCount = Documents.Count
    DocIndex = ActiveWindow.Index
    For x = 1 To DocCount
    With Documents(x)
    If .Saved Then
    Else
    .Save
    End If
    End With
    Next x
    Windows(DocIndex).Activate
    Else
    ActiveDocument.Save
    End If
    AutosaveReminder False
    End Sub

    Sub ShowOptions()
    frmRemindOptions.Show 'This shows the Save Reminder options dialog
    End Sub

  14. #14
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts
    Did you store the SaveReminder.dot file in your startup folder for Word (by default C:\Documents and Settings\<username>\Application Data\Microsoft\Word\Startup)?
    Did you quit and restart Word after this?

  15. #15
    4 Star Lounger
    Join Date
    Oct 2001
    Location
    New York, New York, USA
    Posts
    538
    Thanks
    0
    Thanked 1 Time in 1 Post
    Hans - stored it in

    c:\program files\microsoft office\office\startup

    (He still uses Word 97)

    yes, quit & restarted several times....

    Curious

Page 1 of 2 12 LastLast

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •