Minute(time) returns a Variant/Integer between 0 and 59, inclusive, representing the minute for time
Sub dateDemo7() Debug.Print Minute(Date) End Sub