周一至周五 : 08:30 - 17:30 客服专员电话/微信:18049989370 QQ:857188287
微信咨询

扫码微信咨询

关注公众号

关注微信公众号

电话: 021 5161 9370
返回顶部
按钮控制函数公式的自动计算或手动计算
显示全部楼层 倒序浏览 发表日期 2021-05-08 13:36:26 3936次阅读 0次回复
表格中处理的数据较多,且使用了很多易失性函数后,往往会导致表格函数公式计算的时间延长。从而影响填充效率。此时可以通过一个按钮先关闭表格自动计算,待填充后再开启自动计算。这样大量的易失性函数只要计算一次,从而显著提高运行效率。

GIF 2021-05-08 13-29-19.gif

下面是VBA代码
  1.             If e.Shape.Name = "Button 1" Then
  2.                 MessageBox.Show("手动计算开启")
  3.                 ActiveWorkbook.WorkbookSet.Calculation = Calculation.Manual
  4.             ElseIf e.Shape.Name = "Button 2" Then
  5.                 MessageBox.Show("自动计算打开")
  6.                 ActiveWorkbook.WorkbookSet.Calculation = Calculation.Automatic
  7.             End If
复制代码



电话/微信:18049989370 QQ:857188287
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则  允许回帖邮件提醒楼主

快表软件是国内较早研究表格类软件开发平台的团队之一,迄今已有十多年的行业经验.致力于为企事业单位提供实用可靠的数字化平台。
  • 微信公众号

  • 微信小商店

  • 微信客服

  • Powered by Discuz! X3.4 | Copyright © 2022-2024, XiRong Soft. | 快表软件
  • 沪ICP备13033196号 | 营业执照 |上海西戎软件科技有限公司|沪公网安备31011502002146号|沪ICP备13033196号 |