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

    PDF ou XPS

    Compartilhe

    vagnersoft
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 19/02/2011

    PDF ou XPS

    Mensagem  vagnersoft em Qui 11 Fev 2016, 17:36

    Na Ribbon Visualização de Impressão, no ícone PDF ou XPS Exportar o objeto selecionado para um arquivo de documento PDF ou XPS, ao publicar o documento o Access 2016 é encerrado e não ocorre a gravação do objeto.

    pergunta:

    Existe um Fix para correção deste bug?



    Atenciosamente,

    Vagner Izaias Ferreira
    Vagner'Soft Informática

    affraid
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3151
    Registrado : 14/08/2013

    Re: PDF ou XPS

    Mensagem  FabioPaes em Qui 11 Fev 2016, 18:37

    Amigo, crie um Botao e coloque esse Codigo no Evento ao Clicar...:

    Código:

    Dim nomeArquivo, strLocal As String
    'Nome do arquivo: Relatorio_15_T-DIA.MES.YYYY.hhhmmm.pdf
    nomeArquivo = "Relatorio_" & Me.Codigo & "_T-" & Format(Now, "dd.mm.yyyy.hhmm") & ".pdf"

    'salva no Local do Aplicativo, para mandar para um local especifico descomentar a linha a baixo
    'strLocal = "D:\Backup\" & nomeArquivo ' para salvar em d:\Backup\NomedoArquivo.pdf
    strLocal = CurrentProject.Path & "\" & nomeArquivo

    'Filtra o relatorio pelo codigo Visualizado para em seguida exportar para PDF
    DoCmd.OpenReport "RLT_CAMPOS", acViewPreview, , "[CÓDIGO] = [Forms]![FML_CAMPOS]![CÓDIGO]", acHidden

    'Gera arquivo pdf do relatório previamente aberto e filtrado.
    DoCmd.OutputTo acOutputReport, "RLT_CAMPOS", acFormatPDF, strLocal, False

    'Fecha o relatório
    DoCmd.Close acReport, "RLT_CAMPOS"

    RLT_CAMPOS é o Nome do Reltorio

    Ele exporta pra PDF na Pasta do Programa.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3151
    Registrado : 14/08/2013

    Re: PDF ou XPS

    Mensagem  FabioPaes em Qui 11 Fev 2016, 18:42

    ou com esse Código para Perguntar para o Usuario onde quer salvar o Arquivo...

    Código:
    DoCmd.OutputTo acOutputReport, "r1", acFormatPDF, , True
    r1 é o nome do Relatório.

    vagnersoft
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 19/02/2011

    PDF ou XPS

    Mensagem  vagnersoft em Sex 12 Fev 2016, 17:11

    Obrigado Fábio pela descrição do código. Mas estou mesmo a procura do Fix para correção do Bug.

    Smile

      Data/hora atual: Dom 25 Jun 2017, 06:26