Выход после запуска Microsoft Access в качестве запланированной задачи

Question

Я поставил диспетчер задач Windows для запуска макросов на MS Access в интервале времени (15 минут)

Я запустить макрос, установив Диспетчер задач не по VBA. И макрос запускает как мой код VBA, так и командный файл для WinSCP!

Я хочу, чтобы он закрыл программу доступа при запуске макроса. (Надеюсь, не через секунду .. поскольку мой WinSCP запускается в течение секунды, чтобы завершить импорт 100%)

Есть ли все-таки, что я могу установить его так, как хочу?

Что не работает: Автоматически закрыть программу доступа на начиная с его запуска макроса для запуска с помощью диспетчера задач Windows

Что работает: Task Manager автоматически запускает свою программу Access

Answer 1

Put это вверху вашего кодового модуля:

#If VBA7 Then 
    Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As LongPtr) 'For 64 Bit Systems 
#Else 
    Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'For 32 Bit Systems 
#End If 

Чтобы закрыть доступ через одну секунду, позвоните по этой ссылке sub:

Sub CloseAccess() 
Dim i As Integer 

For i = 1 To 10 
    Sleep 100 
    DoEvents 
Next i 
DoCmd.Quit 
End Sub