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)
<code>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 </code>
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.