在VBA子例程中,我将值写入在单独的Excel进程中运行的另一个“目标”工作簿,如下所示:
Set xlWB = GetObject(STR_TARGET_WORKBOOK_FILENAME)
xlWB.Worksheets(STR_TARGET_SHEET).Range("B1").value = Now()在向目标工作簿写入值时,我希望暂停计算。如果它运行在与这个VBA相同的Excel进程中,我可以直接执行Application.Calculation = xlCalculationManual。
如何在运行目标工作簿的Excel进程中获取和设置Application.Calculation模式?
发布于 2021-03-24 04:55:41
外部工作簿对象也将具有对其Application的引用,因此我们可以简单地执行以下操作:
Dim xlWB As Object
Dim calcMode As Integer
Set xlWB = GetObject(STR_TARGET_WORKBOOK_FILENAME)
' Get the Target's calculation mode
calcMode = xlWB.Application.Calculation
' Suspend calculation in the Target's Excel process
xlWB.Application.Calculation = xlCalculationManual
' ... do stuff to xlWB
' Restore whatever calculation mode was in that process
xlWB.Application.Calculation = calcModehttps://stackoverflow.com/questions/66589702
复制相似问题