それでは、下記ではどうですか。
stFilter = "本部 In(" & Mid(stFilter, 2) & ") And ([申請日] Is Null Or [申請日]=#" & [TXT申請] & "#)"
通報 ...
それでは、下記ではどうですか。
stFilter = "本部 In(" & Mid(stFilter, 2) & ") And ([申請日] Is Null Or [申請日]=#" & [TXT申請] & "#)"