質問: Dlookup("ID","クエリ名","クエリ項目='"&Mid(Me.temp1,i,1)&"'") next End Sub ``` ### 試したこと debug.printに表示されるIDをtempに代入しようとしましたがうまくいきませんでした。 ### 補足情報(FW/ツールのバージョンなど) Access2016
回答: `Me.temp2`を上書きしているからです。追記にする必要があります。 ``` Me.temp2 = Me.temp2 & Dlookup("ID","クエリ名","クエリ項目='"&Mid(Me.temp1,i,1)&"'") ```