0

注文参照番号を使用してクエリから取得する注文フォーム レポートがあります。大量に注文する場合は、shift-f9 キーを押して新しい番号でクエリを更新し、pdf に出力する必要があります。リストまたはできれば一連のパラメータを入力するマクロまたはVBAの方法はありますか。

注文 1 ～ 100 をプルアップして印刷したいとします。レポートを手動で 100 回更新して印刷する代わりに、どうすればこれを行うようにアクセスに指示できますか? PDFのタイトルを埋めるパラメータを設定できればボーナスポイント...

これが簡単な質問である場合は申し訳ありません。グーグルで調べてみましたが、正しい用語を使用していたとは思いません。

4

1 に答える 1

0

PDFのタイトルと言えば、ファイル名のことでしょうか？レポートに使用されるタイトル パラメータの名前について言及していないためです。

Sub printPDF(firstRec As Integer, lastRec As Integer, rptTitle As String)
Dim recCount As Integer
recCount = firstRec
Do Until recCount = lastRec
    DoCmd.SetParameter "[paramName]", recCount
    DoCmd.OutputTo acOutputReport, "[reportName]", acFormatPDF, CurrentProject.Path & "\" & rptTitle & "_" & recCount & ".pdf", False
    recCount = recCount + 1
Loop
End Sub

[reportName] をレポートの名前に変更し、[paramName] を (おそらく) レコード ID に渡すパラメーターの名前に変更します。次に、firstRec から lastRec までの注文番号の [title]_[orderNo].pdf という名前の .pdf ファイルを取得する必要があります。

于 2013-08-30T10:10:12.303 に答える