PDF ou XPS

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

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.

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.

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