Как повторять или зацикливать макрос каждые X минут в Excel?

При работе с Microsoft Excel вам может понадобиться создавать макросы для выполнения определенных операций. Например, вы хотите создать макрос для автоматического копирования диапазона данных в новое место. Поскольку данные будут часто меняться, вам нужно, чтобы этот макрос автоматически запускался каждые 5 минут без ручного запуска, чтобы синхронизировать эти два диапазона данных. Как это сделать? Метод, описанный в этой статье, поможет вам.

Повторение или цикл макроса каждые X минут в Excel

Повторение или цикл макроса каждые X минут в Excel

Следующий код VBA поможет вам повторять макрос каждые X минут в Excel. Пожалуйста, действуйте следующим образом.

1. Нажмите клавиши Alt + F11 одновременно, чтобы открыть окно Microsoft Visual Basic for Applications.

2. В окне Microsoft Visual Basic for Applications нажмите Вставить > Модуль. Затем скопируйте и вставьте приведенный ниже код VBA в окно Кода. Смотрите скриншот:

Код VBA: Повторение или цикл макроса каждые X минут в Excel

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

Примечание: В коде замените эту строку ‘Insert your code here на код, который вы будете выполнять каждые X минут.

3. Нажмите клавишу F5, чтобы запустить код. В появившемся диалоговом окне Kutools for Excel введите интервал времени, через который будет повторяться макрос, и нажмите кнопку ОК. Смотрите скриншот:

С этого момента указанный макрос будет выполняться повторно каждые 5 минут в вашей книге.

Примечание: Если вам нужно остановить выполнение макроса и изменить интервал цикла, пожалуйста, скопируйте приведенный ниже код VBA в то же окно Модуля и нажмите клавишу F5, чтобы запустить код. После этого макрос будет остановлен, повторно запустите вышеуказанный код, чтобы указать новый интервал.

Код VBA: Остановка выполнения макроса

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

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Связанные статьи:

• Как повторять строки при прокрутке листа в Excel?
• Как повторить последнее или предыдущее действие в Excel?
• Как печатать строки повторно внизу каждой напечатанной страницы в Excel?
• Как повторять значение ячейки до тех пор, пока не увидите или не достигнете нового значения в Excel?