Как передать объект Internet Explorer из модуля в пользовательскую форму и обратно в модуль

Question

У меня есть модуль для доступа к веб-странице. Затем он отображает пользовательскую форму с несколькими кнопками. В зависимости от кнопки пользователь нажимает определенную ссылку на веб-сайте. Как только ссылка нажата, управление должно быть возвращено главному модулю.

Я попытался настроить глобальную переменную в модуле, но она не работает. Вот некоторый псевдокод:

Public ie as Object
Sub AccessSite()
   Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
    ie.Navigate "https://www.website.com"
    ie.Fullscreen = False

While ie.Busy
    DoEvents
Wend
MsgBox(ie)
UserForm1.Show

End Sub

Чтобы определить, успешно ли я передал объект ie, я сначала запускаю функцию MsgBox (т.е.) в модуле. Появится окно с сообщением «Internet Explorer». Затем я показываю пользовательскую форму и запускаю ту же команду MsgBox (т.е.), когда нажимаю кнопку 1. На этот раз окно сообщения пустое - переменная не прошла успешно.

Private Sub CommandButton1_Click()
MsgBox (ie)
Unload UserForm4
End Sub