none
Problema ao inserir os dados na tabela vba RRS feed

  • Pergunta

  • Olá pessoal,

    estou com um problema para inserir os dados na minha planilha.

    Tenho um UserForm, que quando preenchido deve inserir na planilha uma sequência de linhas. Porém, só consegui fazer ele incrementar a primeira linha. Não consigo fazê-lo preencher as próximas linhas juntas. Como fazer com que ele preencha todas essas linhas e não somente a primeira.

     Esse é o código que estou usando:

    Private Sub CommandButtonSalvarHH_Click()
        Dim intLinha As Integer
        intLinha = ThisWorkbook.Worksheets("HH").Range("A65536").End(xlUp).Offset(1, 0).Row

        ThisWorkbook.Worksheets("HH").Cells(intLinha, 1) = TextBoxInserirData
        ThisWorkbook.Worksheets("HH").Cells(intLinha, 2) = ComboBoxSelecionarLinha
        ThisWorkbook.Worksheets("HH").Cells(intLinha, 3) = TextBox1
        ThisWorkbook.Worksheets("HH").Cells(intLinha, 4) = TextBox2
        ThisWorkbook.Worksheets("HH").Cells(intLinha, 6) = TextBox3

    End Sub

    Não sei se fui clara. Alguém tem ideia de como se faz?

    Obrigada!


    quarta-feira, 22 de março de 2017 13:49

Todas as Respostas

  • Ao inserir um código no fórum, utilize blocos de código. Para utilizar essa ferramenta, clique no botão cuja legenda é “Inserir bloco de código” na barra do editor de mensagens do fórum. Uma janela aparecerá onde você deverá colar seu código cru na caixa de texto à esquerda. Então, selecione a opção Vb.Net na caixa de combinação que você verá em cima à esquerda e depois clique no botão Inserir.

    ---

    Vejo que em seu código ele preenche a primeira linha vazia com os dados do formulário.

    VocÊ deseja que sejam preenchidas mais que uma linha? Se sim, quais e quantos dados em linhas a mais serão gravados?


    http://www.ambienteoffice.com.br || Grupo de WhatsApp: https://chat.whatsapp.com/K1uey5Q4yJdKnsgWkVQAZG

    sexta-feira, 24 de março de 2017 13:35
    Moderador