TESTとは別にという事ですが、単独で実行しても「TESTの実行日時」を取得出来ません。
下記のような構成にしないといけないと思います。
Sub TEST()
'処理
Call wtime
End Sub
Sub wtime()
With Worksheets(\u0026quot;Sheet1\u0026quot;).Range(\u0026quot;A1\u0026quot;)
.Value = Now
.NumberFormatLocal = \u0026quot;yyyy-mm-dd hh:mm\u0026quot;
End With
End Sub