MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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]Filtros de formulário aplicando no relatório

    avatar
    Theodoro11
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 22/09/2023

    filtros - [Resolvido]Filtros de formulário aplicando no relatório Empty [Resolvido]Filtros de formulário aplicando no relatório

    Mensagem  Theodoro11 11/10/2023, 15:59

    Pessoal, essa é minha primeira vez mexendo com relatórios.
    Eu tenho uma consulta que gera uma lista de ordens de serviço.
    Criei um formulário com uma caixa de listagem e apliquei diversos filtros, onde eu seleciono tipo de serviço, cidade e vendedor.
    Além disso também filtro essa consulta entre intervalos de tempo.
    Está funcionando perfeitamente, agora gostaria de criar um botão que imprime um relatório com o resultado das filtragens feitas no formulário.
    Como eu faço pra importar esses filtros pro relatório? Fiz tudo com VBA.
    Segue código utilizado para realizar a filtragem:

    strSQL = "SELECT * FROM OSemitida WHERE ID_SERVICO LIKE '*" & Me.TxtF & "*' AND Status LIKE '*" & "Emitida" & "*' AND Data_da_Emissao BETWEEN #" & Format(Me.TxtD1, "mm/dd/yyyy") & "# AND #" & Format(Me.TxtD2, "mm/dd/yyyy") & "# ORDER BY Data_da_Emissao"

    Seleciona a ordem de serviço da consulta OSemitida, filtra por tipo de serviço, depois filtra apenas as emitidas e depois filtra por intervalor de tempo.

    Me.Lbx.RowSource = strSQL

    Depois disso cola o resultado na caixa de listagem.


    Última edição por Theodoro11 em 11/10/2023, 17:59, editado 1 vez(es)
    avatar
    Theodoro11
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 19
    Registrado : 22/09/2023

    filtros - [Resolvido]Filtros de formulário aplicando no relatório Empty Re: [Resolvido]Filtros de formulário aplicando no relatório

    Mensagem  Theodoro11 11/10/2023, 17:54

    Consegui resolver.

    Aplicando a função:

    DoCmd.OpenReport "Osemitida", acViewPreview, (e colando a função de filtro aqui)

      Data/hora atual: 2/5/2024, 09:54