[Resolvido]Classificar relatório via VBA

Amigos, boa tarde!

Encontrei o que procurava no fórum, mas ainda tenho dúvidas.

Por favor,  preciso de ajuda na situação abaixo:

Esta citação é do Mestre Avelino no post http://maximoaccess.forumeiros.com/t392-resolvidoclassificacao-crescente

Qdo se refere a "chamar o relatório", onde exatamente tenho que digita o comando?
Dentro de algum evento na guia propriedades?

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

Olá,


Vamos ver se percebi a sua dúvida...

Coloque esta linha de comando no evento OnClick do botão que utiliza para abrir o relatório:

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

E este códio como o mestre Avelino descreve:

"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

Espero que ajude.

Muito obrigado pela ajuda!!

Deu certo com adaptação porque o relatório é baseado em consulta de referência cruzada.

Até a próxima.