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


2 participantes

    [Resolvido]Erro em filtragem por data inicial e final

    avatar
    tombr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 334
    Registrado : 08/04/2018

    [Resolvido]Erro em filtragem por data inicial e final Empty [Resolvido]Erro em filtragem por data inicial e final

    Mensagem  tombr 14/5/2018, 19:19

    Boa Tarde,

    Por favor, ajudar se possível.

    Não estou conseguindo fazer a filtragem por data inicial e final no meu formulário FRelatorio ao selecionar o Tipo de Relatório: Produto Por Menor Preço

    Observação Importante: Já o Relatório Por Produto consigo fazer a filtragem de forma correta.


    Segue em anexo BD:
    Anexos
    [Resolvido]Erro em filtragem por data inicial e final AttachmentTesteRelatório.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (140 Kb) Baixado 3 vez(es)


    Última edição por tombr300 em 1/6/2018, 17:07, editado 1 vez(es)
    marceloarboit
    marceloarboit
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 147
    Registrado : 09/07/2015

    [Resolvido]Erro em filtragem por data inicial e final Empty Re: [Resolvido]Erro em filtragem por data inicial e final

    Mensagem  marceloarboit 14/5/2018, 20:20

    Tom,  

    Coloque no evento Ao carregar do seu relatório RelatorioProdutoMenorPreco o seguinte comando:

    Código:
    Private Sub Report_Open(Cancel As Integer)
    If Me.OpenArgs <> "" Then
        Me.RecordSource = "Select * From [Consulta Por Produto] Where " & Me.OpenArgs
    Else
        Me.RecordSource = "Consulta Por Produto"
    End If
    End Sub

    Espero ter ajudado.

    Abs.,
    Marcelo.
    avatar
    tombr
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 334
    Registrado : 08/04/2018

    [Resolvido]Erro em filtragem por data inicial e final Empty Re: [Resolvido]Erro em filtragem por data inicial e final

    Mensagem  tombr 14/5/2018, 20:40

    Olá, Marcelo

    Deu tudo certo.

    Mais uma vez obrigado pela ajuda.

    Conteúdo patrocinado


    [Resolvido]Erro em filtragem por data inicial e final Empty Re: [Resolvido]Erro em filtragem por data inicial e final

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 18:45