B.Key, спасибо большое! Я бы сам не догадался. А почему в UserForm2 i=0 To 5? Хотя всё прекрасно работает
Код |
---|
Private Sub UserForm_Activate() H = 30 For i = 0 To 5 Set Pr = Me.Controls.Add("Forms.CommandButton.1") |