Microsoft Access 掲示板

現在の単票フォームのレコードのレポートをPDF化する方法

2 コメント
views
4 フォロー

ACCESS初心者です。
単票フォームでボタンを押すと表示しているレコードの(フィールド名[品名]で)レポート名[レポート1]を表示→フォルダーにPDFで保存というVBAを下記コードで作成しました。

Private Sub コマンド1Click()
DoCmd.OpenReport "レポート1", acViewPreview, , "品名 = " & Me.品名, acHidden
DoCmd.OutputTo acOutputReport, "レポート1", acFormatPDF,

"\フルパス\" & Me.品名 & ".pdf"
DoCmd.Close acReport, "レポート1"

End Sub

[品名]はテキストにし英数字のみの入力指定にしてますが数字から始まる場合(例えば112233,1122A等)、エラーになりVBAが実行できません。
解決方法はないでしょうか?

また、アルファベットから始まる場合であれば実行はされますが実行の前にパラメータの入力が表示されます。こちらは特に問題ではないのですが表示されないようにできる方法があれば教えていただきたいです。

よろしくおねがいします。

ym
作成: 2023/06/21 (水) 11:30:23
通報 ...
1

抽出条件の対象フィールドがテキスト型の場合は、条件値を引用符(')で囲む必要があります。

DoCmd.OpenReport "レポート1", acViewPreview, , "品名 = '" & Me.品名 & "'", acHidden
2

有難うございます!引用符で囲みましたら希望通りの動作をしてくれました。
とても助かりました!