Accessでフィールドの値をファイル名にして、レポートをPDFファイルに出力

Accessでフィールドの値をファイル名にして、レポートをPDFファイルに出力するためのVBAを作成してみました。

Dim fileName As String
fileName = フィールド名1 & "_" & フィールド名2 & "_" & フィールド名3
DoCmd.OutputTo acOutputReport, "レポート名", acFormatPDF, "https://・・・/Documents/" & fileName & ".pdf"

ファイルの保存先がhttps://・・・となっているのは、会社でローカル保存が禁止されていて、OneDriveに保存するためです。ローカルに保存するのであればC:¥等に変えてもらえればいけるはずです。

素人なので間違いがあるかもですが、とりあえずこれで問題なく動いています。