Question

我在K栏中的内容全天不断更新。我想在特定时间复制特定单元格的值，并将它们粘贴到F列中。我缺少的是在特定时间复制内容的VBA代码。

Answer 1

基于chris neilsen的评论（我不知道Application.OnTime）。

您可以执行以下操作（以下代码在ThisWorkbook模块中）：

Option Explicit


Private Sub Workbook_Open()
    Call ScheduleTask
End Sub


Public Sub ScheduleTask()
    Application.OnTime TimeValue("15:00:00"), "ThisWorkbook.Execute"
End Sub

Public Sub Execute()
    Debug.Print "Executing task", Now

    'Place your code here

    Call ScheduleTask
End Sub

VBA：在特定时间复制单元格值

1 个答案: