Notifications
Clear all

Aparecer Código Gerado e Data no UserForm

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

Prezados, bom dia!

É um prazer fazer parte dessa comunidade.

Estou com dificuldade em fazer aparecer, no UserForm, o código gerado e a data de vencimento de uma determinada informação. Tenho um UserForm que vou preenchendo e, à medida que concluo uma etapa, a planilha onde os dados estão sendo alocados gera um código através de uma fórmula, só que esse código gerado não aparece no UserForm em sua TextBox (ela fica em branco). O mesmo acontece com a data de vencimento da informação. Como corrijo isso?

Aguardo contato.

Muito obrigado!!!

 
Postado : 08/05/2012 9:23 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bem vindo ao Planilhando Fabricio,

Mostre se arquivo, se possivel. ;)

 
Postado : 08/05/2012 10:45 am
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Infelizmente é uma ferramenta institucional e eu não tenho autorização para postá-la aqui.

Mas é, mais ou menos, o seguinte: Criei um UserForm com os campos da minha planilha (não é o formulário gerado pelo Excel). Ao digitar alguns campos, tipo: Nº DO GUICHÊ, DATA e SERVIÇO, eu criei uma fórmula de concatenação que cria um código único para aquela informação (como se fosse um número de protocolo). Bem, no TextBox que deveria retornar esta informação gerada não aparece nada (fica em branco). Eu preciso que, ao digitar as informações que compõem esse código, ele apareça no TextBox do UserForm. O raciocíonio do código segue abaixo:

A1 Nº REGISTRO: 1
B1 Nº DO GUICHÊ: 17
C1 DATA: 09/05/2012
D1 SERVIÇO: ELÉTRICA

E1 Fórmula do Código: =CONCATENAR(D1;ANO(C1);MÊS(C1);DIA(C1);"00";A1).

Deveria aparecer no TextBox a informação: ELÉTRICA201259001, só que fica em branco, mesmo constando a informação na planilha de dados. Além disso, para cada novo registro, o código criado para ele é que deverá retornar (e não o primeiro ou outro qualquer).

Aguardo retorno e conto com a compreensão.

 
Postado : 08/05/2012 11:27 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Isso não impede de você criar um arquivo modelo (com dados fictícios) e compactar, depois nos enviar!!!

Att

 
Postado : 08/05/2012 11:30 am
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Tranquilo. Eu farei um modelo e envio mais tarde, pode ser?

 
Postado : 08/05/2012 11:53 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Com o modelo fica muito mais facil que orientemos um caminho; porem veja se lhe auxilia.
Para que o texbox mostre o valor, e necessario que coloque em algum evento que gere uma alteração,
por exemplo no evento "change" do TextSERVIÇO (creio ser o ultimo a ser preenchido)
TextCodigo.value=Year(cdate(TextData)) & Month(cdate(TextData)) & Day(cdate(TextData)) & "00" & TextNumRegistro

 
Postado : 08/05/2012 12:45 pm
(@fabricio-viana)
Posts: 7
Active Member
Topic starter
 

Pessoal, boa tarde!

Anexo arquivo com a planilha. Os dados são outros, mas o conceito é esse

Obrigado pela Ajuda!

 
Postado : 08/05/2012 1:10 pm