Consulting

Results 1 to 3 of 3

Thread: Auto SAve

  1. #1
    VBAX Mentor jammer6_9's Avatar
    Joined
    Apr 2007
    Location
    Saudi Arabia
    Posts
    318
    Location

    Auto SAve

    Is it possible to Autosave ActiveWorkbook in a specific period of time? Example set the workbook to autosave at 6:00 PM...
    T-ogether
    E-veryone
    A-chieves
    M-ore


    One who asks a question is a fool for five minutes; one who does not ask a question remains a fool forever.

  2. #2
    Distinguished Lord of VBAX VBAX Grand Master Bob Phillips's Avatar
    Joined
    Apr 2005
    Posts
    25,453
    Location
    ____________________________________________
    Nihil simul inventum est et perfectum

    Abusus non tollit usum

    Last night I dreamed of a small consolation enjoyed only by the blind: Nobody knows the trouble I've not seen!
    James Thurber

  3. #3
    VBAX Mentor
    Joined
    Jun 2005
    Posts
    374
    Location
    what about:
    [VBA]
    Sub deluxer()
    On Error Resume Next
    Dim x As Integer
    Dim wb As Workbook
    Application.OnTime Now + TimeSerial(0, 0, 300), "deluxer"
    For Each wb In Application.Workbooks
    If wb.name <> ActiveWorkbook.name Then
    Application.StatusBar = " now saves - " & ActiveWorkbook.name
    wb.Save
    End If
    Next
    Application.StatusBar = ""
    Exit Sub
    End Sub

    [/VBA]
    a workbook is saved automatically every 5 minutes
    thanks
    moshe

Posting Permissions

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