VBA在循环冻结数据上行时，需要每秒运行一次Sub_Vba_Excel_While Loop_Do While

VBA在循环冻结数据上行时，需要每秒运行一次Sub

vba excel

VBA在循环冻结数据上行时，需要每秒运行一次Sub,vba,excel,while-loop,do-while,Vba,Excel,While Loop,Do While,我需要每秒运行一次sub，同时从提要接收数据。该函数查看单元格中的数据，确定条件是否正确，如果正确，则向输入数据的交易服务器发送命令。这个问题是，一旦我运行循环，While循环就会冻结excel中的单元格，使程序在不更新的情况下执行 Dim timeremaining As Integer timeremaining = Range("E7").Value Application.Calculation = xlCalculationAutomatic Do While timeremaini

我需要每秒运行一次sub，同时从提要接收数据。该函数查看单元格中的数据，确定条件是否正确，如果正确，则向输入数据的交易服务器发送命令。这个问题是，一旦我运行循环，While循环就会冻结excel中的单元格，使程序在不更新的情况下执行

Dim timeremaining As Integer
timeremaining = Range("E7").Value
Application.Calculation = xlCalculationAutomatic

Do While timeremaining > 5
    Endowment
    Sleep 1000
Loop

我曾经尝试过设置一个定时器，并创建一个函数来运行它一定的次数，但是这两个函数都冻结了我的数据提要

谢谢。

尝试在VBA中使用该方法

例如： Application.WaitNow+TimeValue0:00:10