Question

我正在运行一个使用5个宏和大量公式的程序。我在这里要求你帮助的一些宏。将程序放在一起后，有很多滞后。我的意思是，如果我们删除一行，我们必须等待1到2分钟才能执行该过程。关于我应该看什么的任何想法？我知道这听起来有点模糊，但我不知道从哪里开始寻找解决滞后的问题。我看电脑，服务器还是程序？

Answer 1

从Visual Basic概念（帮助的一部分）

通过优化Visual Basic解析对象引用的方式，可以使Visual Basic应用程序运行得更快。 Visual Basic处理对象引用的速度可能受以下因素影响：

ActiveX组件是否已实现为进程内服务器或进程外服务器。

对象引用是早期绑定还是后期绑定。通常，如果组件已作为可执行文件（.exe文件）的一部分实现，则它是进程外服务器并在其自己的进程中运行。如果它已实现为动态链接库，则它是一个进程内服务器，并在与客户端应用程序相同的进程中运行。

使用进程内服务器的应用程序通常比使用进程外服务器的应用程序运行得更快，因为应用程序不必跨越进程边界来使用对象的属性，方法和事件。有关进程内和进程外服务器的更多信息，请参阅“进程内和进程外服务器”。

如果对象引用使用声明为特定类的变量的对象变量，则它们是早期绑定的。如果对象引用使用声明为通用Object类的变量的对象变量，则它们是后期绑定的。使用早期绑定变量的对象引用通常比使用后期绑定变量的对象引用运行得快。

请参阅Microsoft人员的此链接。这是excel特定而不是VBA。 Autocalc和其他计算选项/屏幕更新等。

最小化点

因此，如果您对性能最小化点感兴趣（每个点都是查找），尤其是在循环中。

有两种方法。一种方法是，如果要多次访问，请将对象设置为最低对象。

例如（慢）

set xlapp = CreateObject("Excel.Application")
msgbox xlapp.worksheets(0).name

（更快，因为每次使用对象时都会忽略一个点）

set xlapp = CreateObject("Excel.Application")
set wsheet = xlapp.worksheets(0)
msgbox wsheet.name

第二种方式是 with 语句。您一次只能激活一个。

这会跳过100次查找。

with wsheet
For x = 1 to 100
 msgbox .name
Next
end with

字符串Concatination

并且不要一次加入一个字符串。从VBScript程序员那里看到这一点。它需要50,000个字节，并且需要多次分配和释放才能生成100个字符的字符串。