MaximoAccess

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

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

    [Resolvido]Relatório rolagem sempre abaixo

    avatar
    IuriEmanuel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 23/08/2018

    [Resolvido]Relatório rolagem sempre abaixo Empty [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  IuriEmanuel em 13/5/2019, 11:55

    Bom dia, Companheiros.
    Tenho um relatório onde possui muitos registros, e ele é contínuo. É Muito chato sempre que abrir o relatório, ter que rola-lo. Gostaria de saber se possui um código ou alguma propriedade para que o mesmo automaticamente sempre seja movido para baixo.

    Obrigado!
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3142
    Registrado : 21/04/2011

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  Marcelo David em 13/5/2019, 17:11

    Boa tarde,
    Para ir para a última página, no evento "Ao abrir" do relatório, ponha:

    DoCmd.GoToRecord , , acLast


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    IuriEmanuel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 23/08/2018

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  IuriEmanuel em 13/5/2019, 17:17

    Bom dia Marcelo,
    Entendi... Porém ainda não baixa. O Relatório é folha contínua, ou seja ele teria que baixar a barra de rolagem
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3142
    Registrado : 21/04/2011

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  Marcelo David em 13/5/2019, 17:19

    Em casa, a noite tentamos algo (caso alguém não lhe traga a solução)


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    avatar
    IuriEmanuel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 23/08/2018

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  IuriEmanuel em 13/5/2019, 17:21

    Está perfeito, tentaremos depois. Muito obrigado pelo esforço dedicado a me ajudar, Marcelo.
    Marcelo David
    Marcelo David
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3142
    Registrado : 21/04/2011

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  Marcelo David em 14/5/2019, 03:25

    Evento Ao abrir:

    SendKeys "{END}", True


    .................................................................................
    Marcelo David
    www.mrdsystem.com.br (em construção)
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4213
    Registrado : 06/11/2009

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  Assis em 14/5/2019, 08:20

    Bom dia

    Para um formulário continuo.

    Não testei em relatório.

    Private Sub Form_Load()

    'By JPaulo
    On Error Resume Next
    Dim IntPosicao As Long

      DoCmd.GoToRecord , , acLast
      IntPosicao = Me.CurrentRecord
      IntPosicao = IntPosicao - 10' -----------------------------> aqui coloca a quantidade dos últimos registos quer desejar ver
     
    DoCmd.GoToRecord acDataForm, Me.name, acGoTo, IntPosicao
    End Sub


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    IuriEmanuel
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 69
    Registrado : 23/08/2018

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  IuriEmanuel em 14/5/2019, 11:58

    Muito obrigado a todos, consegui com a ajuda de ambos.
    De fato, o código para mover o relatório para baixo, Marcelo seria o que você me passou, porem no evento "Ao Abrir" ele não funciona. Ao testar o código que Assis passou, do colega J Paulo, funcionou, porém eu notei que o mesmo é no evento "Ao Carregar", logo, utilizei somente o mesmo, uma vez que a intenção era ir diretamente ao ultimo, e ficou muito bom.


    Muito obrigado mesmo a vocês, que Deus os abençoe.

    Att,
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4213
    Registrado : 06/11/2009

    [Resolvido]Relatório rolagem sempre abaixo Empty Re: [Resolvido]Relatório rolagem sempre abaixo

    Mensagem  Assis em 14/5/2019, 12:14

    Obrigado pelo retorno



    .................................................................................
    *** Só sei que nada sei ***

      Data/hora atual: 13/8/2020, 09:26