Página 1 de 1

Copiar uma celula para um textbox

Enviado: 30 Set 2019 às 11:07
por beginnerExcel
Bom dia galera, tudo bem?

procurei no forum mas nao achei nada que fosse parecido com o que quero.

estou criando um programa de estoque especifico para minha empresa, e quero que os dados apareçam no programa
por exemplo:

medida: 0,10mm
quantidade de pçs: 20

esses valores aparecem na planilha mas quero que apareçam no textbox
estou usando esse codigo:

Private Sub TextBox5_Change()

TextBox5.Text = Sheets("ESTOQUE").Range("c7")

End Sub

porem quando inicio o VBA a textbox está vazia, somente se eu digitar qualquer tecla é que aparece o valor que está na celula, queria que ela simplesmente aparecesse automaticamente.

Re: Copiar uma celula para um textbox

Enviado: 30 Set 2019 às 11:24
por Jimmy
Olá,

Você deve colocar o código no evento Change da planilha, e não no do TextBox, porque você quer que quanto a planilha altere, o TextBox acompanhe.

Se esta mensagem colabora para a solução do problema, peço que dê um Like, clicando no botão com o "positivo", acima e a direita.

Jimmy San Juan

Copiar uma celula para um textbox

Enviado: 30 Set 2019 às 11:30
por beginnerExcel
sim, está no evento change, o que está acontecendo é que quando entra no programa o textbox está em branco, nao está aparecendo direto o valor da planilha, ai se apertar em qualquer tecla o valor aparece, mas eu queria que esse valor ja estivesse ativo sem precisar apertar qualquer tecla.

Copiar uma celula para um textbox

Enviado: 30 Set 2019 às 11:45
por eduardogrigull
O Jimmy já falou o problema.
Voce está colocando o código no evento change do TextBox, o que é errado, olhe o que voce mandou:

Private Sub TextBox5_Change()

Se voce estiver trabalhando em UserForm, ponha o código no evento "Initialization" do Userform.
Caso esteja trabalhando diretamente com um textbox na planilha, ponha no evento "Workbook_Open"

Copiar uma celula para um textbox

Enviado: 30 Set 2019 às 11:52
por beginnerExcel
Ah, agora eu entendi, obrigado. deu certo