■日付の比較は一旦「yyyy/MM/dd」形式にした上で、Cdate関数で日付型に変換してから比較する Sub test() Dim ws As Worksheet Dim strDatePrevYYYY_M_1 As String '前月1日文字型 Dim strDateNextYYYY_M_1 As String '翌月1日文字型 Dim strTargetDate As St…