Type Info:
HTMLDialogWindow As HTMLDialogWindow
Dim HTMLDlgWnd As HTMLDialogWindow Set HTMLDlgWnd = Application.Windows.HTMLDialogWindow