none
Excluir textboxes dinamicamente RRS feed

  • Pergunta

  • Olá, preciso excluir 3 textboxes de um formulário ao mesmo tempo, dinamicamente por um botão de comando , porém o código que estou usando exclui uma de cada vez e gostaria que ele excluísse as três de uma vez. Será que tem como fazer isso? O código que estou usando é:

    Private Sub CommandButton2_Click()


    For Each C In UserForm1.Controls
         If TypeName(C) = "TextBox" Then
              txtbox_num = txtbox_num + 1
         End If
    Next C

    If txtbox_num = 3 Then
         MsgBox "Deve haver no mínimo um produto para concluir o cadastro.", vbInformation
         Exit Sub
    End If

    UserForm1.Controls.Remove (txtbox_num + 1)

    End Sub


    Obrigada!

    quarta-feira, 17 de julho de 2019 18:13