Ошибка времени выполнения '424' Объект, необходимый при выполнении userform.show на импортированной пользовательской форме

Question

Я пытаюсь импортировать пользовательскую форму и показать ее при первом запуске. Пользовательская форма импортируется очень хорошо, однако, при попытке показать ее, я продолжаю получать сообщение об ошибке «Требуется объект 424».

Вот мой код:

Sub Workbook_Open()

Dim wkbTarget As Excel.Workbook
Dim szTargetWorkbook As String
Dim cmpComponents As VBIDE.VBComponents
Application.ScreenUpdating = False
szTargetWorkbook = ActiveWorkbook.Name
Set wkbTarget = Application.Workbooks(szTargetWorkbook)
Set cmpComponents = wkbTarget.VBProject.VBComponents

' IMPORT FORM
cmpComponents.Import "\\myserver.domain\Application\Forms\LOGIN.frm"

LOGIN.Show

End Sub

Когда я нажимаю «Конец» при ошибке, я могу нормально отобразить пользовательскую форму.

Answer 1

Во время выполнения (спасибо @Comintern!) Вам не понравится ссылка на объект, который еще не существует. Вы можете использовать:

Userforms.add("LOGIN").Show

чтобы избежать этой прямой ссылки.