VBA 用户窗体数组

Question

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

我对 VBA 还很陌生，所以任何建议或只是一个让我入门的地方将不胜感激。谢谢。

Answer 1

确保 UserForm 的 ShowModal 属性设置为 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 的五个独立副本