Открытие UserForm из VB

[kss]

Всем здравствуйте!
Подскажите пожалуйста как из VB открыть excel, а при открытии excel-я открывалась UserForm, а Basic закрыть?

[alex77755]

Открыть не проблема

Private Sub Комманда1_Click()
Dim Ex As Object
Set Ex = CreateObject("Excel.Application")
Ex.Workbooks.Open App.Path & "\x.xls"
Ex.Visible = True
End' Или Unload
End Sub

Открыть форму знаю только макросом. Например на событие открытия книги повесить

Private Sub Workbook_Open()
UserForm1.Show 0 ' 
End Sub

[kss]

alex77755 - большое спасибо!
А можно ли сделать, чтобы UserForm открывалась как модальное окно?

[alex77755]

Тогда не закроется бейсик