excel - ワークブック、保存、閉じる、再度開く (TimeValue を使用)、繰り返す

Question

マクロは、「CloseMe」に割り当てられたボタンで実行されます。以前は私のニーズに合わせて実行されていましたが、もう実行されていません (別のワークブックでこのコードを使用しようとして成功しなかったため)。保存して閉じ、再開するまで 10 秒待ちますが、すぐに閉じます。

Sub CloseMe()
Application.OnTime Now + TimeValue("00:00:10"), "OpenMe"
ThisWorkbook.Close True
End Sub

Sub OpenMe()
Application.OnTime Now + TimeValue("00:10:00"), "OpenMe"
ThisWorkbook.Close True
End Sub

保存して閉じ、再開するまで 10 秒待ち、(リアルタイム データを収集するため) 10 分間開いたままにし、このプロセスを (手動で中断して停止するまで) 繰り返すコードが必要です。ありがとう