Excel vba 关闭自动计算这句话怎么写?打开自动计算这句话又怎么写?

Application.Calculation = xlCalculationManual '手动重算

Application.Calculation = xlCalculationAutomatic '自穗派前备动猜悔贺重算

在function开始处加一句，Application.Volatile，用慎竖此句讲自定义函数行孝态设置为易失性函数，这样才能保证数据发生变化时，函数重新档源计算。

比如:

Function getABC()

Application.Volatile

'函数主体

End Fcuntion

---