ExcelでX分ごとにマクロを繰り返すまたはループする方法は？

Microsoft Excelを使用しているときに、一部の操作を実行するためにマクロを作成する必要がある場合があります。 たとえば、ある範囲のデータを新しい場所に自動的にコピーするマクロを作成するとします。 データは頻繁に変更されるため、これら5つの範囲のデータを同期するには、このマクロを手動でトリガーせずにXNUMX分ごとに自動的に実行する必要があります。 それを達成する方法は？ この記事の方法はあなたを助けることができます。

ExcelでX分ごとにマクロを繰り返すかループする

ExcelでX分ごとにマクロを繰り返すかループする

次のVBAコードは、ExcelでX分ごとにマクロを繰り返すのに役立ちます。 次のようにしてください。

1。 押す 他の + F11 同時にキーを開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウをクリックしてください インセット > モジュール。 次に、以下のVBAコードをコピーしてに貼り付けます Code 窓。 スクリーンショットを参照してください：

VBAコード：ExcelでX分ごとにマクロを繰り返すかループする

Sub ReRunMacro()
Dim xMin As String

'Insert your code here
    xMin = GetSetting(AppName:="Kutools", Section:="Macro", Key:="min", Default:="")
    If xMin = "Exit" Then
    SaveSetting "Kutools", "Macro", "min", "False"
    Exit Sub
    End If
    If (xMin = "") Or (xMin = "False") Then
      xMin = Application.InputBox(prompt:="Please input the interval time you need to repeat the Macro", Title:="Kutools for Excel", Type:=2)
      SaveSetting "Kutools", "Macro", "min", xMin
    End If
    If (xMin <> "") And (xMin <> "False") Then
      Application.OnTime Now() + TimeValue("0:" + xMin + ":0"), "ReRunMacro"
    Else
      Exit Sub
    End If
End Sub

Note：コードで、この行を置き換えてください 'ここにコードを挿入します コードを使用すると、X分ごとに実行されます。

3。 プレス F5 コードを実行するためのキー。 ポップアップで Kutools for Excel ダイアログボックスで、マクロを繰り返す間隔を入力して、[ OK ボタン。 スクリーンショットを参照してください：

これ以降、特定のマクロはブック内で5分ごとに繰り返し実行されます。

Note：マクロの実行を停止してサイクルの間隔を変更する必要がある場合は、以下のVBAコードを同じものにコピーしてください。 モジュール ウィンドウを押して、 F5 コードを実行するためのキー。 その後、マクロが停止します。上記のコードを再実行して、新しい間隔を指定してください。

VBAコード：マクロの実行を停止します

Sub ExitReRunMacro()
SaveSetting "Kutools", "Macro", "min", "Exit"
End Sub

関連記事:

• Excelでワークシートをスクロールするときに行を繰り返す方法は？
• Excelで最後または前のアクションを繰り返す方法は？
• Excelで印刷されたすべてのページの下部に行を繰り返し印刷するにはどうすればよいですか？
• Excelで新しい値が表示または到達されるまで、セルの値を繰り返すにはどうすればよいですか？