式を修正しました。下記の式なのですが、やはり絞り込みができません。。
※読み込み時にフィルターを適用プロパティを「はい」にしている状態
"月>=#" & DateSerial(Year(Date()), Month(Date()), 1) & "# AND 月<#" & DateSerial(Year(DateAdd("m", 1, Date())), Month(DateAdd("m", 1, Date())), 1) & "#"
通報 ...