MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Classificar relatório via VBA

    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 530
    Registrado : 20/01/2013

    [Resolvido]Classificar relatório via VBA Empty [Resolvido]Classificar relatório via VBA

    Mensagem  João Ricardo em 18/3/2014, 15:25

    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://www.maximoaccess.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
    nevesj
    nevesj
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 94
    Registrado : 30/10/2012

    [Resolvido]Classificar relatório via VBA Empty Re:Classificar relatório via VBA

    Mensagem  nevesj em 20/3/2014, 15:48

    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.
    João Ricardo
    João Ricardo
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 530
    Registrado : 20/01/2013

    [Resolvido]Classificar relatório via VBA Empty Re: [Resolvido]Classificar relatório via VBA

    Mensagem  João Ricardo em 20/3/2014, 21:47

    Muito obrigado pela ajuda!!

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

    Até a próxima.

    Conteúdo patrocinado

    [Resolvido]Classificar relatório via VBA Empty Re: [Resolvido]Classificar relatório via VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 17/10/2019, 12:13