[Resolvido]Classificação automática de Registros

Boa tarde amigos. Como usar a classificação crescente ou decrescente em vba em um relatório? Tipo se o campo empresa for = a "IBGE" a classificação será Crescente no campo Setor.
se o campo empresa for = a "Petrobras" a classificação será Crescente no campo Andar. Alguma dica?

Teste por favor;

Private Sub Report_Load()

   Select Case Me.Empresa.Value
      Case Is = "IBGE"
         Me.OrderBy = "Setor ASC"
      Case Is = "petrobas"
         Me.OrderBy = "Andar ASC"
   End Select
   Me.OrderByOn = True
   
End Sub

Boa tarde amigo JPaulo. Muito obrigado pela ajuda foi 100% funcional. Abraço e sucesso

Obrigado pelo retorno o forum agradece.

Boa JPaulo. Desculpe comecei testar aqui e revi que não funcionou. Estou colocando o bd com o devido relatório para que o amigo possa mais uma vez me dar uma força. Como exemplo quero que somente os registros da empresa Forum campo grande tivessem a classificação por setor classificada com crescente. Obrigado

Qual o formato do seu Access ?

access 2010 32 bts

A verificar o que pretende, aguarde...

Duas questões;

1º Para ordenar por VBA você não pode ter o relatório Classificado, apenas agrupado.

2º Você só conseguirá ordenar com um (1) criterio apenas, jamais com dois (2) no mesmo relatorio.

Quando lhe passei o codigo, sempre pensei que o relatorio seria gerado a pedido do nome da empresa como criterio.

Boa tarde JPaulo. Compriendi sua explicação e te agradeço pela força. Obriagado