|
かるびの様
お世話になっております。
(1)変数「strFilter」に日付を任意で指定について
→時間をおいて、記載いただきましたヒントを基に再度試しましたらできました。前回できなかった理由は「#」を入れていなかったからでした・・・
strFilter = "UKEIREBI Between #" & tx2開始日.Value & "# And #" & tx2終了日.Value & "#"
(2)「T_CODE」毎にパラメータ表示がされる件
>「パラメータ表示がされ」というのは、パラメータ入力ボックスのことですか。
→パラメータ入力ボックスです。
>「パラメータ表示がされ」というのは、どのコードで表示されますか。
>コードを1行ずつ実行して確認してみてください。
→下記コードを実行したときに、「パラメータ入力ボックス」が表示されます。
DoCmd.OpenReport "R_支払明細書", acViewPreview, , _
strFilter & " AND T_CODE=" & rs!T_CODE, acWindowNormal
コード自体に問題がないとすると、
Q_支払明細書用の定義内容に問題があるのでしょうか。
試しにT_CODEではなく、別のフィールドGAICHUSHAMEIでも試してみましたが
同じように「パラメータ入力ボックス」が表示されました。
また、Q_支払明細書用は3つのテーブルから構成されます。
「T_CODE」フィールドは、3つのテーブルすべてに存在します。
あと少しの気がするのですが、なかなかゴールできなくて
やっぱりvbaは難しいですね。
|
|