hatena
hatena
2021/02/23 (火) 21:45:27
①のSQLは「値集合クエリ」に設定しているということですか。
まず、このSQLの
Format(Year([満了日]) & "/" & Month([満了日]),"yyyy/mm")
は、
Format([満了日],"yyyy/mm")
で十分ですね。
②のコードは下記でいいでょう。
Private Sub cbo満了日検索_AfterUpdate()
DoCmd.ApplyFilter , "Format([満了日],'yyyy/mm')=[Forms]![F_管理リスト]![cbo満了日検索]"
End Sub
VBAのコードにSQL条件式を埋め込む場合は、引用符として'(単引用符)を使います。
詳細は下記を読んでください。
通報 ...