月の日数を調べるには、翌月の初日の前日が調べたい月の最終日となることを利用して調べる(C6の日付の月の日数を表示する)。
Private Sub CommandButton1_Click() MsgBox Day(DateSerial(Year(Range("C6")), Month(Range("C6")) + 1, 0)) End Sub
Comments
Comments