Notifications
Clear all

Classificar Numericamente Cadastros

4 Posts
2 Usuários
0 Reactions
832 Visualizações
(@joocta)
Posts: 187
Estimable Member
Topic starter
 

Alguém sabe como fazer para a cada cadastro feito a lista fosse classificada por ordem de códigos?
Que rotina eu devo incluir nos cadastros?
Att,
Joocta.

 
Postado : 04/03/2013 7:15 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Use pesquisa!!!

Sua dúvida está vaga!!

como fazer para a cada cadastro feito a lista fosse classificada por ordem de códigos?

que lista, na guia, no Form????

Que rotina eu devo incluir nos cadastros?

Que cadastro??

Mande seu modelo bem exemplificado e COMPACTADO!!!

Att

 
Postado : 04/03/2013 7:39 pm
(@joocta)
Posts: 187
Estimable Member
Topic starter
 

O cadastro e feito via form, e são alocados em uma planilha. Os códigos são digitados e as vezes fora de ordem gostaria que a cada cadastro feito a planilha fosse Atualizada por ordem de códigos numericamente.
Att,
Joocta.

 
Postado : 04/03/2013 8:12 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

O mais fácil é utilizar o Gravador de Macros :

Supondo que os dados a classificar estejam na Coluna A ficaria :

Sub Macro1()
' Macro gravada em 6/3/2013 por Mauro Coutinho
'

    Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
        
End Sub

É só fazer a adaptação e colocar a classificação logo apos a rotina que lança na planilha, porem minha sugestão seria, se, quando do lançamento você não tem a visualização em tempo real, é colocar a rotina de classificar quando do fechamento do form, assim ganha-se no tempo uma vez que a rotina rodará somente uma vez ao invez de rodar a cada lançamento.

Se olhar na ajuda do VBA sobre o Metodo Sort encontrara varias dicas e exemplos.

[]s

 
Postado : 06/03/2013 8:15 pm