Página 1 de 1

Copiando dados do Textbox para planilha

Enviado: Ter Dez 13, 2011 10:19 pm
por von Gadelgallegen
Pessoal, qual é a rotina para copiar um dado de um textbox para uma planilha?

Re: Copiando dados do Textbox para planilha

Enviado: Qua Dez 14, 2011 10:29 am
por Mauro Coutinho
Use :

Código: Selecionar todos

Range("A1").Value = TextBox1.Value
[]s

Re: Copiando dados do Textbox para planilha

Enviado: Qua Dez 14, 2011 8:08 pm
por von Gadelgallegen
Talvez tenha me expressado mal. Bom, a minha idéia é ter 3 textboxes e um CommandButton. Eu digito nos Textboxes e quando clico no Botão de comando esses dados são copiados, para uma célula correspondente, por exemplo textbox1, célula A1, textbox2, célula B1 e textbox3, célula C1 e os dados são apagados para que se possa inserir novos dados que serão copiados para as células A2, B2 e C2, (...), assim por diante!

Qual a rotina?

Re: Copiando dados do Textbox para planilha

Enviado: Qua Dez 14, 2011 10:07 pm
por joseA
Seria isso??

Código: Selecionar todos

Private Sub CommandButton1_Click()
    Dim linha As Integer
    linha = Plan1.Range("A65536").End(xlUp).Offset(1, 0).Row
    Plan1.Range("A" & linha).Value = TextBox1
    Plan1.Range("B" & linha).Value = TextBox2.Text
    Plan1.Range("C" & linha).Value = TextBox3.Text
    MsgBox "Cadastrado com sucesso...", 64, "Dados"
    Me.TextBox1 = ""
    Me.TextBox2 = ""
    Me.TextBox3 = ""
End Sub

Re: Copiando dados do Textbox para planilha

Enviado: Qua Fev 13, 2019 2:53 pm
por lima.luiz
Boa tarde. Quero aproveitar o código, porém preciso que o textbox grave na mesma coluna ex: textbox1 gravar na coluna B1; textbox2 gravar na coluna B2; e assim consecutivamente. Pode ajudar?