Adicionando rótulos dinamicamente ao formulário do usuário = UserForm em branco
Eu estou tentando adicionar dinamicamente botões para o userform, mas o userform só vem em branco. Eu simplifiquei a essência do código o máximo possível para a verificação de erros (não que isso tenha me ajudado)
Sub addLabel()
UserForm2.Show
Dim theLabel As Label
Dim labelCounter As Integer
For labelCounter = 1 To 3
Set Label = UserForm2.Controls.Add("Forms.Label.1", "Test" & labelCounter, True)
With theLabel
.Caption = "Test" & labelCounter
.Left = 10
.Width = 50
.Top = 10
End With
End Sub
Existe alguma maneira de verificar se os botões foram adicionados, mas são invisíveis? Ou porque eles não estão sendo adicionados. Qualquer ajuda muito apreciada.