Microsoft Access 掲示板

Microsoft Access 掲示板

抽出したレポートに名前をつけてPDF保存したい

4 コメント
views
4 フォロー

お世話になります。

＜実現したいこと＞
請求書一覧フォームのそれぞれのレコードに「印刷保存｣ボタンをつけ、該当の請求書をPDF化し、一覧に表示されている[請求番号]、[会社名]、[会社コード]をファイル名につけて保存したい。

印刷プレビューまでは正常に動作します。
プレビューしたレポートを、ファイル名をつけて保存するところがわかりません。
ご教示どうぞよろしくお願い致します。

Private Sub 請求書印刷保存_Click()
    DoCmd.OpenReport "請求書", acViewPreview, , "[請求書番号] = " & Me.請求書番号 & ""
End Sub

mari
作成: 2021/08/19 (木) 16:03:43
通報 ...
1
hatena 2021/08/19 (木) 16:37:46

下記のような感じでどうでしょうか。

   DoCmd.OpenReport "請求書", acViewPreview, , "[請求書番号] = " & Me.請求書番号 & ""
   DoCmd.OutputTo acOutputReport, "請求書", acFormatPDF, _
                       "C:\PDFOutput\" & Me.請求書番号 & "_" & Me.会社名 & "_" & Me.会社コード & ".pdf"
2
mari 2021/08/21 (土) 09:00:01

有り難うございます！やりたいことが実現できました。大変助かりました。

追加の質問があります。
1つのボタンで、一覧に表示されている請求書を1件つづ、自動的にPDF保存を繰り返し行わせるには、どのように記述したら
よいでしょうか。
可能であれば、ご教示頂きたく、よろしくお願いいたします。
4
mari 2021/08/26 (木) 11:25:39

有難うございます。参考情報をみてトライしてみます。