[Resolvido]Classificação crescente

Qual código em VBA, para definir um campo como classificação crescente em um relatório.

Não poderei usar a cx.Classificar e Agrupar, pois a fonte de registro do relatório é definida por código, então terei que definir tambem a ordem de classificação, e aí o tréco enrroscou...

Agradeço se alguem puder ajudar.

Olá amigo Wano, beleza?

Vc pode fazer o seguinte:

quando chamar pelo relótorio, passe o nome do campo que deseja oredenar através do OpenArgs

DoCmd.OpenReport "NomeRelatorio", acViewPreview, , , , "Funcionário"

use o openargs no evento "ao abrir" do relatório para setar a propriedade OrderBy:

Private Sub Report_Open(Cancel As Integer)
Me.OrderByOn = True
Me.OrderBy = Me.OpenArgs
End Sub

Sucesso

Grande Avelino

Muito obrigado pela ajuda, realmente vai ajudar bastante.

Abraços,
Junior Wano