打开VBA时运行窗体？

nnsea

打开Excel,进入VBE,新建一个模块,一个窗体,名称为userform1,输入下列代码:
sub auto_open()
    Application.Visible = False
    UserForm1.Show
end sub

在窗体上新建一个按钮为CommandButton1,双击后如入下列代码:
Private Sub CommandButton1_Click()
     Unload Me
     Application.Visible = True
End Sub

nnsea

Private Sub UserForm_Initialize()

Application.WindowState = xlMaximized

ActiveWindow.WindowState = xlMaximized

UserForm1.Height = Application.Height

UserForm1.Width = Application.Width

Me.Left = 0

Me.Top = 0

End Sub

nnsea

Private Sub Workbook_Open()
UserForm1.Show
End Sub

nnsea

Private Sub Workbook_Open()

Userform1.Show False

End Sub

nnsea

Sub 打开窗体()

Userform1.Show False

End Sub