Выполнение макросов на интервале времени в ms-проекте

Question

Я пытаюсь создать макрос для сохранения файла MS-проекта в определенном формате в заданном месте с заданным интервалом, пока приложение открыто. У меня это в основном работает, кроме выполнения на интервальной части.

У меня было немного Google вокруг, и при использовании Excel или Word вы можете использовать метод Application.OnTime & смещение времени, чтобы вызвать подпрограмму с требуемым интервалом. К сожалению, не похоже, что этот метод существует в MS-Project.

Есть ли альтернативный метод, который я могу использовать здесь, или я должен отказаться от этой идеи?

Answer 1

Я понимаю, что это поздний ответ, но у меня есть решение, которое я использовал для аналогичной проблемы. Просто перейдите к событию Project_Change, так как оно часто запускается, и сравните с переменной.

Public lastSave As Date


Private Sub Project_Change(ByVal pj As Project)


    If DateDiff("n", lastSave, Now()) > 1 Then ' Replace 1 with # of minutes between saves.
        Application.FileSave
        lastSave = Now()

    End If

End Sub