我有一个用户窗体在通过电子表格打开时打开vbmodeless但是当我通过另一个工作簿中的超链接打开同一个电子表格时,表单会打开,电子表格在其后面可见。
经过一番研究后,这是由于Private Sub Workbook_Open()因其他进程被阻止而没有被解雇。
如何解决这个问题,以便像通常隐藏excel一样打开用户窗体?我正在使用excel 2010。
*编辑 - 已添加代码
“ThisWorkbook'
中的代码Private Sub Workbook_Open()
frm_Option_Menu.Show vbModeless
End Sub
以上打开的形式的代码:
Private Sub UserForm_Initialize()
Application.Visible = False
Dim tbl As ListObject
Dim check As Variant
Dim tRows As Range
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Current Accounts")
Set tbl = ws.ListObjects("Accounts")
Set tRows = ws.ListObjects("Accounts").ListColumns(1).DataBodyRange
For Each check In tRows
With Me.cboPart
.AddItem check.Value
End With
Next check
DTPicker2.Value = DateAdd("ww", -2, Date - (Weekday(Date, vbMonday) - 6))
DTPicker1.Value = DateAdd("ww", -2, Date - (Weekday(Date, vbMonday) - 0))
End Sub
令人讨厌的是,唯一没有初始化的是Application.visible = false ......
JR。