Notifications
Clear all

Cadastro VBA

4 Posts
2 Usuários
0 Reactions
976 Visualizações
(@eloirfabio)
Posts: 10
Active Member
Topic starter
 

Bom dia.
Tenho uma planilha que fiz para a Medicina do Trabalho da empresa onde trabalho, funciona direitinho o controle de exames, vacinas, emissão de ASO, requisição de exames, etc, com todas as fórmulas e formatações corretas. Queria fazer algo mais profissional e então resolvi me aventurar a fazer utilizando VBA. Peguei uma de exemplo e fiz algumas alterações para se adequar às minhas necessidades. Porém, tem alguns erros que não consigo resolver, por não ter muito conhecimento.
- Quando finalizo um cadastro, vai direto pra planilha onde se encontram os cadastros, onde deveria continuar na mesma tela inicial;
- Quando coloco o número do contrato e clico em pesquisar dá erro, numa string c.Activate;
- As caixas de texto não seguem a ordem quando dou TAB, pra passar de uma pra outra.
- Também não consegui colocar os dados na Combo Box.

Se alguém puder ajudar, ficarei muito agradecido.
A planilha ainda está bem "crua", mas vai estar anexada.

 
Postado : 20/10/2017 9:09 am
fcarlosc
(@fcarlosc)
Posts: 453
Honorable Member
 

Boa-tarde

Da uma olha se é isso que precisa ?

Para alterar a ordem das caixas de texto, clique com o direito do mouse no UserForm e selecione "Ordem de Tabulação"

Att,

Francisco

 
Postado : 20/10/2017 9:59 am
(@eloirfabio)
Posts: 10
Active Member
Topic starter
 

Cara, está tudo perfeito. Só há um erro na hora de excluir, em c.Select.

 
Postado : 20/10/2017 10:38 am
fcarlosc
(@fcarlosc)
Posts: 453
Honorable Member
 

Tente assim:

Private Sub cmdExcluir_Click()

'Ativar a primeira planilha
ThisWorkbook.Worksheets("Efetivo").Activate
'Selecionar a célula A3
Range("A7").Select

'Declarar a variável Resp para receber uma resposta
Dim Resp As Integer...........

 
Postado : 20/10/2017 4:20 pm