VBA实现关闭Excel自动计算,关闭屏幕刷新

Excel代码提速神器

涉及到提取表格大量数据操作,复制粘贴多个单元格时,尽量避免一个个单元格提取,或者一行行一列列提取数值,设计大量IO流操作非常浪费时间。尽量找出数据之间的规律,批量选中复制粘贴,找到利用双指针或者其他算法找到连续行或者列的规律进行批量操作。往往能几十倍的提升代码运行效率,一下

批量复制行列

连续行列复制

Range("A1:B3")

间隔行列复制

选中多行

粘贴后

选中区域顺序按照原先顺序

Dim MyArea1, MyArea2, MyArea3 As Range

Set MyArea1 = Range("A1:B3")

Set MyArea2 = Range("A7:B10")

Set MyArea3 = Range("A12:B14")

Application.Union(MyArea1, MyArea2, MyArea3).Select

转置粘贴

粘贴->选择粘贴->转置

c 复制代码
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True

关闭屏幕刷新

Application.ScreenUpdating = False

Application.ScreenUpdating = True

关闭公式自动计算

Application.Calculation = xlManual

Application.Calculation = xlCalculationAutomatic

相关推荐
CodeCraft Studio7 小时前
Excel处理控件Spire.XLS系列教程:C# 合并、或取消合并 Excel 单元格
前端·c#·excel
云心雨禅10 小时前
Vim操作指令全解析
编辑器·vim·excel
安分小尧12 小时前
[特殊字符] 使用 Handsontable 构建一个支持 Excel 公式计算的动态表格
前端·javascript·react.js·typescript·excel
hello_simon15 小时前
在线小白工具,PPT转PDF支持多种热门工具,支持批量转换,操作简单,高效适合各种需求
pdf·html·powerpoint·excel·pdf转html·excel转pdf格式
Tttian62219 小时前
Python办公自动化(3)对Excel的操作
开发语言·python·excel
有趣的我1 天前
vim的操作
编辑器·vim·excel
woniu_maggie1 天前
SAP EXCEL DOI 详解
开发语言·后端·excel
Dickson1 天前
如何批量拆分Excel工作表或按行拆分Excel表格 - Excel拆分器使用方法
excel·excel拆分器·拆分excel·拆分excel工作表·按行拆分excel
inxunoffice1 天前
批量将文本文件转换为 Word/PDF/Excel/图片等其它格式
pdf·word·excel
赵孝正1 天前
自动用 Excel 转 .CSV 为 .xlsx 的原理
excel