Excel VBA用户窗体数组

Excel VBA用户窗体数组,excel,userform,vba,Excel,Userform,Vba,目前,我有一个Excel电子表格,其中包含一些数据和一个命令按钮,用于创建一个UserForm,以显示该数据的子集。用户表单的设计使数据更易于查看。我遇到的问题是,我希望命令按钮生成UserForm的多个实例,以便每个表单都可以显示不同的数据集 我是VBA的新手,所以如果有任何建议或只是给我一个入门的地方,我将不胜感激。谢谢。确保UserForm的showmodel属性设置为False,否则一次只能显示UserForm的一个实例 在这之后,就简单到: Dim ufArray(0 To 4) As

目前,我有一个Excel电子表格,其中包含一些数据和一个命令按钮,用于创建一个UserForm,以显示该数据的子集。用户表单的设计使数据更易于查看。我遇到的问题是,我希望命令按钮生成UserForm的多个实例,以便每个表单都可以显示不同的数据集


我是VBA的新手,所以如果有任何建议或只是给我一个入门的地方,我将不胜感激。谢谢。

确保
UserForm
showmodel
属性设置为
False
,否则一次只能显示
UserForm
的一个实例

在这之后,就简单到:

Dim ufArray(0 To 4) As UserForm1
Dim i As Integer

For i = 0 To 4
    Set ufArray(i) = New UserForm1
Next i

For i = 0 To 4
    Load ufArray(i)
    ufArray(i).Show
Next i

要显示
UserForm1
的五个独立副本,请确保
UserForm
showmodel
属性设置为
False
,否则一次只能显示
UserForm
的一个实例

在这之后,就简单到:

Dim ufArray(0 To 4) As UserForm1
Dim i As Integer

For i = 0 To 4
    Set ufArray(i) = New UserForm1
Next i

For i = 0 To 4
    Load ufArray(i)
    ufArray(i).Show
Next i

显示五份独立的
UserForm1

非常好!非常感谢你。这正是我要找的。太好了!非常感谢你。这正是我想要的。