Пошаговое исполнение макроса ошибка 2001

У меня есть настройка макроса Autoexec в базе данных Access 2016, чтобы определить, какую форму открыть на основе Environ("USERNAME").

Когда я открываю базу данных, я получаю макрос «Ошибка 2001». Если я нажимаю «Остановить все макросы», я могу продолжать использовать базу данных без проблем, пока я не изменю имя файла, тогда проблема возникнет снова.

Есть ли какие-либо варианты предотвращения появления этой ошибки?

Вызываемый код

LUser = LCase(Environ("USERNAME")) 'Get current username

DoCmd.OpenForm "frmDash", acNormal, , , , acWindowNormal

If IsNull(DLookup("[sysname]", "tblaccmannew", "sysname=" & "'" & LUser & "'")) Then
    DoCmd.OpenForm "frmSearch", acNormal, , , , acWindowNormal
    Forms!frmDash.Visible = False
End If

Вам нужно «доверять» местонахождению базы данных.

.

Укажите надежное расположение (Access 2013 и 2016)

1. На вкладке «Файл» нажмите «Параметры».

2. В диалоговом окне «Параметры доступа» слева нажмите «Центр управления безопасностью».

3. Справа в разделе «Центр управления безопасностью Microsoft Office Access» щелкните «Доверие». Центр настроек.

4. На левой панели диалогового окна «Центр управления безопасностью» щелкните «Надежные». Местоположение.

5. Чтобы добавить сетевое расположение, на правой панели выберите Разрешить доверенные Флажок «Местоположения в моей сети».

6. Нажмите «Добавить новое местоположение».

7. В диалоговом окне «Надежное расположение Microsoft Office» используйте один из следующие методы:

   • В поле «Путь» введите полный путь к месту, которое вы хотите добавить.

   • Нажмите «Обзор», чтобы перейти к местоположению.

8. Чтобы указать, что подпапки новых надежных расположений также должны быть доверенные, выберите подпапки в этом месте также проверяйте доверенные коробка.

9. При желании в поле «Описание» введите описание доверенного местоположение.

(Источник)

Также обратите внимание; в продукт встроена функция открытия исходной формы, поэтому автоматический запуск не требуется. Посмотрите в ‘Параметры’ Текущая база данных ‘

Симптомы Ошибка 2001 — Вы отменили предыдущую операцию

Ошибки времени выполнения происходят без предупреждения. Сообщение об ошибке может появиться на экране при любом запуске %программы%. Фактически, сообщение об ошибке или другое диалоговое окно может появляться снова и снова, если не принять меры на ранней стадии.

Возможны случаи удаления файлов или появления новых файлов. Хотя этот симптом в основном связан с заражением вирусом, его можно отнести к симптомам ошибки времени выполнения, поскольку заражение вирусом является одной из причин ошибки времени выполнения. Пользователь также может столкнуться с внезапным падением скорости интернет-соединения, но, опять же, это не всегда так.

(Только для примера)

Причины Вы отменили предыдущую операцию — Ошибка 2001

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

Ошибки во время выполнения обычно вызваны несовместимостью программ, запущенных в одно и то же время. Они также могут возникать из-за проблем с памятью, плохого графического драйвера или заражения вирусом. Каким бы ни был случай, проблему необходимо решить немедленно, чтобы избежать дальнейших проблем. Ниже приведены способы устранения ошибки.

Методы исправления

Ошибки времени выполнения могут быть раздражающими и постоянными, но это не совсем безнадежно, существует возможность ремонта. Вот способы сделать это.

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

Обратите внимание: ни ErrorVault.com, ни его авторы не несут ответственности за результаты действий, предпринятых при использовании любого из методов ремонта, перечисленных на этой странице — вы выполняете эти шаги на свой страх и риск.

• Remove From My Forums

• Question

• Dear All,

  i am kind of newbie in Access but i am developing a project form my company. It is splited and placed on Server. I am getting the following errors when i try to use it:

  This one appears every time when i open the file or i create new report: 

  Enter Parameter Value

  Open Issues.ID

  [______________]

  When i click «Close Report» button i get:

  Macro Single Step

  Macro Name:

  Issue List : ID : OnClick : Embedded Macro

  ConditionL

  True: IsNull([ID])

  Action Name: SetTempVar

  Arguments:CurrentID, Nz(DMax(«[ID]»,[Form].[RecordSource]),0)

  Error Number: 2001

  Option — Close All Macros

  Tell me what you need to help me, i can provide you the whole tool. Thanks in advance.

  • Edited by

    Friday, November 15, 2013 9:28 AM

• Remove From My Forums

• Question

• Dear All,

  i am kind of newbie in Access but i am developing a project form my company. It is splited and placed on Server. I am getting the following errors when i try to use it:

  This one appears every time when i open the file or i create new report: 

  Enter Parameter Value

  Open Issues.ID

  [______________]

  When i click «Close Report» button i get:

  Macro Single Step

  Macro Name:

  Issue List : ID : OnClick : Embedded Macro

  ConditionL

  True: IsNull([ID])

  Action Name: SetTempVar

  Arguments:CurrentID, Nz(DMax(«[ID]»,[Form].[RecordSource]),0)

  Error Number: 2001

  Option — Close All Macros

  Tell me what you need to help me, i can provide you the whole tool. Thanks in advance.

  • Edited by

    Friday, November 15, 2013 9:28 AM