VBA UserForm Array

Question

В настоящее время у меня есть электронная таблица Excel с некоторыми данными и командная кнопка, которая создает пользовательскую форму, отображающую подмножество этих данных. Пользовательская форма была разработана таким образом, чтобы облегчить просмотр данных. Проблема, с которой я столкнулся, заключается в том, что я хотел бы, чтобы командная кнопка делала несколько экземпляров моей пользовательской формы, чтобы каждая форма могла отображать свой набор данных.

Я довольно новичок в VBA, поэтому любые предложения или просто место для начала работы будут с благодарностью. Спасибо.

Answer 1

Убедитесь, что для свойства ShowModal UserForm установлено значение 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