Excelで日付判定 (ID:104754)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 objSheetをExcel.WorkSheetオブジェクトとし、 行位置lngRow,列位置lngColとすると If Day(DateAdd("d",1,objSheet.Cells(lngRow,lngCol).Value)) = 1 Then MsgBox"月末日です" End If