Buscar dados da pla...
 
Notifications
Clear all

Buscar dados da planilha para TextBox

5 Posts
2 Usuários
0 Reactions
1,657 Visualizações
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Pessoal, tudo bem?!?!

Preciso de um grande help.

Imaginem que tenho um UserForm, onde digito alguns campos e os transfiro para uma planilha de banco de dados. Nesta planilha, eu fiz uma fórmula que cria um código para a linha de informação que digitei no UserForm. Por Exemplo:

USERFORM
Data: 30/05/2012 (TextBox1) - DIGITADO NO USERFORM
Classe: Pessoa Física (ComboBox1) - DIGITADO NO USERFORM
Código Registro: PF.00001.2012.05.30 (TextBox2 ou ComboBox2) - BUSCAR da planilha assim que os dados forem transferidos do UserForm para a Planilha de banco de dados.

PLANILHA
Coluna A, Linha 2 => 30/05/2012
Coluna B, Linha 2 => Pessoa Física;
Coluna C, Linha 2 => Numeração Automática;
Coluna D, Linha 2 => =CONCATENAR(SE(B2="PESSOA FÍSICA";"PF";"");".";TEXTO(C2;"00000");".";TEXTO(ANO(A2;AAAA));".";TEXTO(MÊS(A2;MM));".";TEXTO(DIA(A2;AAAA)))

E assim, sucessivamente nas linhas que seguem...

O que preciso é que o TextBox ou ComboBox ou List busque a informação gerada pela fórmula CONCATENAR na planilha para o lançamento que está sendo REALIZADO no UserForm.

Se alguém puder me ajudar!!!

Abs,

 
Postado : 30/05/2012 2:11 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não entendi, se o lancamento "está sendo feito"; me parece que não existe na planilha; então quer que busque o que?

 
Postado : 30/05/2012 2:19 pm
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Reinaldo, obrigado pelo seu retorno.

na verdade, há um Command para transferir os dados dos TextBox e ComboBox para a planilha. O que preciso é fazer a operação inversa, ou seja, com os dados registrados na planilha e, após o Command, retornar o código gerado pela informação inserida em um TextBox ou ComboBox ou List.

Abs,

 
Postado : 30/05/2012 3:48 pm
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Pessoal, bom dia!

Encontrei a solução na base da tentativa e erro.

No CommandButton que utilizo pra gerar o código e gravar os dados digitados no UserForm para a planilha, eu inserir o seguinte comando.

TextBox5.Value = ActiveCell.Offset(0, 5).Value (este comando busca o dado da planilha)
ActiveCell.Offset(0, 5).Value = TextBox5.Value (grava o dado em formato texto, eliminando a fórmula existente e, consequentemente, diminuíndo o tamanho do arquivo).

Obrigado pela atenção de todos.

Abs,

 
Postado : 31/05/2012 9:02 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Fabricio, bom que achou o caminho,
é assim que aprendemos/gravamos melhor; pelo menos eu creio nisso; com nossas tentativas e erros.

 
Postado : 31/05/2012 10:18 am