セルA1に=now()
が入って時刻が出ています。

セルB1に3分たったら+1ずつ足して行くVBAをお願いします。