オンラインで答えを探していたときに、実際には何も見つかりませんでした。非アクティブ状態が 5 分間続くとマクロが閉じる場所にマクロを配置しました。ユーザーがセルを編集しているときにタイマーが開始されない場合を除いて、魅力のように機能するため、このために閉じられません。ユーザーが編集モードになっている時間のタイマーをExcelに設定する方法はありますか? 編集モードを終了すると、マクロは 5 分間の非アクティブ状態を開始します。どんな助けでも大歓迎です!
これがワークブックモジュールです
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub
Private Sub Workbook_Open()
start_Countdown
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
stop_Countdown
start_Countdown
End Sub
これが標準モジュールです
Option Explicit
Public Close_Time As Date
Sub start_Countdown()
Close_Time = Now() + TimeValue("00:05:00")
Application.OnTime Close_Time, "close_WB"
End Sub
Sub stop_Countdown()
Application.OnTime Close_Time, "close_WB", , False
End Sub
Sub close_wb()
ThisWorkbook.Close True
End Sub