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


    FILTRO DE REGISTRO EM RELATÓRIO

    avatar
    cairocesar
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 15/01/2011

    FILTRO DE REGISTRO EM RELATÓRIO Empty FILTRO DE REGISTRO EM RELATÓRIO

    Mensagem  cairocesar em 25/2/2019, 00:41

    Boa noite!
    Tenho um sistema de leilão e preciso que filtre por LEILÃO_CODIGO e LOTE_COMP_CODIGO.
    Que faça o filtro do comprador em determinado leilão.
    Desde já agradeço.

    Dim strArquivo as string
    Dim strLocal as string

    strArquivo = "acerto" & me!LOTE_COMP_CODIGO & ".pdf"
    strLocal = CurrentProject.Path & "\PDF\" & strArquivo

    DoCmd.OpenReport "ImprimirMapaDeAcertos", acViewPreview,,"LOTE_COMP_CODIGO=" & Me!LOTE_COMP_CODIGO, acHidden

    Docmd.OutputTo acOutputReport,"ImprimirMapaDeAcertos",acformatPDF,strLocal

    DoCmd.Close acReport, "ImprimirMapaDeAcertos"
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6176
    Registrado : 15/03/2013

    FILTRO DE REGISTRO EM RELATÓRIO Empty Re: FILTRO DE REGISTRO EM RELATÓRIO

    Mensagem  ahteixeira em 25/2/2019, 08:32

    Olá Cairo,

    Verifique no link abaixo as regras do fórum, em especial o nº 12:
    http://www.maximoaccess.com/t48-regras-do-forum

    Edite a sua mensagem e regularize a situação.

    Relativamente à questão, aparentemente com a informação disponível, será ajustar como pretendido nesta parte do código, com algo assim:
    Código:

    DoCmd.OpenReport "ImprimirMapaDeAcertos", acViewPreview,,"LOTE_COMP_CODIGO=" & Me!LOTE_COMP_CODIGO &" AND [LEILÃO_CODIGO] = " &  Me!CampoFiltroCodigoLeilao , acHidden

    Abraço

      Data/hora atual: 21/7/2019, 05:45