| |
>クエリで実行すると抽出結果が表示されるのですが、
>モジュールで宣言して実行すると、
>パラメータ入力を聞かれてしまいます。
>【ロット台帳変更_引張表示.ロット一括変更】？？インプットボックス
>
>StrSQL = "SELECT ロット台帳変更用.* FROM ロット台帳変更用 " _
> & "INNER JOIN ロット台帳変更_引張表示 " _
> & "ON ロット台帳変更用.ロットNo = ロット台帳変更_引張表示.ロットNo " _
> & "WHERE (((ロット台帳変更_引張表示.ロット一括変更) = True ))" _
> & "ORDER BY ロット台帳変更用.ロットNo"
>
>DoCmd.OpenForm "ロット台帳変更", , StrSQL
OpenFormの第３引数 FilterName にクエリ名またはSQLを設定した場合は、
WHERE句が フォームのFilterプロパティに、ORDER BY句がOrderByプロパティに
設定されます。SELECT句、FROM句は関係有りません。
パラメータが出るのは、フォームのレコードソースのクエリに、
ロット台帳変更_引張表示 が含まれてないからではないですか。
フォームのレコードソースを「ロット台帳変更_引張表示」が
含まれるものに変更するか、
下記のように第４引数に抽出条件を設定するようにします。
StrSQL = "ロットNo In " _
& "(SELECT T.ロットNo FROM ロット台帳変更_引張表示 AS T" _
& " WHERE ロット一括変更 = True)" _
DoCmd.OpenForm "ロット台帳変更", , , StrSQL
|
|
![[未読]](./data/access/image/read_icon.gif){kind=icon}
