Access (VBA)

Access VBAに関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Pro : Access 2019)
PDF変換するとエラーになる
投稿日時: 23/02/07 11:01:52
投稿者: yamasho

お世話になります。
 
VBAでレポートをPDF変換しています。
 
strPath1 = CurrentProject.Path & "\PDF\***" & Format(Me!日付, "yyyymmdd") & ".pdf"
DoCmd.OpenReport "R_***", acViewPreview, , , acHidden '非表示で開く
DoCmd.OutputTo acOutputReport, "R_***", acFormatPDF, strPath1
DoCmd.Close acReport, "R_***"
 
実行ボタンを押すとPDF変換します。
1回目はPDF変換しますが、
続けてコマンドボタンを押すと
 
DoCmd.OutputTo
 
のところで
 
outputto アクションの実行は取り消されました
 
というエラーになってしまいます。
何か解放してあげないといけないのでしょうか?
 

回答
投稿日時: 23/02/07 11:27:52
投稿者: Suzu

ファイル名が同じ為、保存できないのでは?

回答
投稿日時: 23/02/07 11:40:41
投稿者: sk

引用:
strPath1 = CurrentProject.Path & "\PDF\***" & Format(Me!日付, "yyyymmdd") & ".pdf"
DoCmd.OpenReport "R_***", acViewPreview, , , acHidden '非表示で開く
DoCmd.OutputTo acOutputReport, "R_***", acFormatPDF, strPath1
DoCmd.Close acReport, "R_***"

引用:
outputto アクションの実行は取り消されました

同じパスに作成済みの PDF ファイルが別のアプリケーション
( Adobe Acrobat など)で開かれている状態で OutputTo メソッドを
実行しようとされたからではないかと。
 
その場合は開かれている PDF ファイルを閉じてから
再度実行して下さい。

投稿日時: 23/02/07 12:59:17
投稿者: yamasho

お世話になります。
 
仰る通りでした。
PDF変換した後、確認でAdobe Acrobatで開いていました。
 
Adobe Acrobatを開かない状態で連続でPDF変換したところ、
無事変換できました。
 
初歩的なミスで申し訳ございませんでした。
ありがとうございました。