ExcelVBAで現在の時間を数値で取得

時間判定用

Dim nowHHMM
nowHHMM = CInt(Format(Now(), "hhmm"))