Notifications
Clear all

Valor Automático

6 Posts
3 Usuários
0 Reactions
1,981 Visualizações
(@macabruz)
Posts: 52
Trusted Member
Topic starter
 

Pessoal, bom dia!

Preciso de um código para criar números sequenciais - baseados nos que já existem um uma planilha - dentro de um Form.

Assim que eu abrir o Form, vou clicar em um botão que irá fazer o seguinte:
Ele deve percorrer a coluna A de uma planilha e procurar o último valor utilizado, para então somar 1 a esse valor e colocar o resultado em um textbox dentro do Form.

O maior problema é: Além do número, existem 2 letras como prefixo para esse número nas células da coluna A. Exemplo: JJ0001 ou RB0015..etc etc
Essas 2 letras existem para determinar quem foi a pessoa que abriu aquela ficha, e se trata da inicial do nome e sobrenome da pessoa. Porque não remover isso? Pois, cada um usa o Banco de Dados individualmente..mas mensalmente os banco de dados são compilados em um só..e se não fosse feito isso haveria mais de uma ficha 0001 por exemplo, dependendo da quantidade de usuários.

Então é isso...na coluna A tenho valores do tipo JJ0001..., RB0001..., CT0001...
Para utilizar a planilha, preciso fazer um Login..então dá pra saber qual é o usuário (Existe uma Variável Global chamada "Usuário")...com isso da pra fazer ele procurar qual foi a última ficha do usuário logado para então somar 1 e apresentar o resultado, que será JJ0002 (exemplo) em um textbox dentro do form. Isso acontece quando um botão é clicado.

Hoje fazemos isso baseado na memória (onde paramos)...ou abrindo o Banco de Dados para ver qual foi a última. Por isso essa idéia do botão para gerar isso automaticamente.

Estou tentando por aqui..mas ainda não consegui..se puderem me ajudar..agradeço!!
Se precisarem do arquivo, posso providenciá-lo após remover dados confidenciais....

Att,
Jorge Jacomini

 
Postado : 03/01/2013 11:49 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Poste seu arquivo modelo compactado!!

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/01/2013 11:52 am
(@macabruz)
Posts: 52
Trusted Member
Topic starter
 

Alexandre, obrigado pelo interesse.

Segue modelo compactado.

Programação feita no arquivo -> Formulário.xlsm - Estou tentando essa programação no form Relatório_Técnico
Você não deve precisar...mas segue informação importante:
Login: Jorge
Senha: Jorge

Para DB_Cliente -> Senha é 1234

No aguardo.

Att,
Jorge Jacomini

 
Postado : 03/01/2013 12:06 pm
(@macabruz)
Posts: 52
Trusted Member
Topic starter
 

Pessoal,

Alguém conseguiu dar uma olhada nisso?

Att,
Jorge Jacomini

 
Postado : 04/01/2013 10:07 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Jorge,

Não sei se entendi corretamente sua necessidade. O que fiz foi:
- No arquivo Formulário.xlsm, após logar-se, quando você clica no botão Abrir Formulário e clica no tipo Visita Comercial, automaticamente, o sistema checará que é que está logado e verificará qual é a última numeração daquele usuário. Em seguida é atribuída + 1 e finalmente inserido no campo número da ficha.

Note, que para que o código funcione corretamente, necessitei inserir, na coluna AZ do arquivo DB_Relatórios.xlsx, as iniciais de cada uma das pessoas cadastradas. Isso serve para que o código identifique de quem é a numeração que ele precisa procurar na planilha. Deixei visiível para que você possa entender. Todavia, você pode até ocultar a coluna se preferir.

Espero que seja isso que você esteja precisando. Abaiaxo, segue arquivo após as devidas modificações.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 04/01/2013 2:04 pm
(@macabruz)
Posts: 52
Trusted Member
Topic starter
 

Boa Noite Wagner!

Ateneu perfeitamente minhas expectativas!! Não imaginei que fosse ser tão complicado!
Tive apenas que fazer as modificações para inserir as iniciais na coluna AZ em todos os registros e aplicar as mudanças no outro Form. Também modifiquei uma coisinha ou outra..como por exemplo recalcular o valor após a inserção de um registro...mais ta valendo!!!

Muito Obrigado. Problema resolvido!!!

 
Postado : 06/01/2013 8:24 pm