2024年4月27日发(作者：)

Excel VBA常用代码100句

(1) Option Explicit 强制对模块内全部变量进行声明

(2) Option Base 1 指定数组的第一个下标为1

(3) On Error Resume Next 忽视错误连续执行VBA代码,避开消失错误消息

(4) On Error GoTo 100 当错误发生时跳转到过程中的某个位置

(5) On Error GoTo 0 恢复正常的错误提示

(6) yAlerts=False 在程序执行过程中使消失的警告框不显示

(7) yAlerts=True 在程序执行过程中恢复显示警告框

(8) Updating=False 关闭屏幕刷新

(9) Updating = True 打开屏幕刷新

(10) () 创建一个新的工作簿

(11) Workbooks(“”).Activate 激活名为book1的工作簿

(12) 保存工作簿

— 1 —

(13) 关闭当前工作簿

(14) 猎取活动工作薄中工作表数

(15) 返回活动工作薄的名称

(16) ‘返回当前工作簿名称

(17) me ‘返回当前工作簿路径和名

(18) ‘当前工作表中已使用的行数

(19) ‘猎取工作表的行数(注：考虑兼容性)

(20) Sheets(Sheet1).Name= “Sum” 将Sheet1命名为Sum

(21) Before:=Worksheets(1) 添加一个新工作表在第

一工作表前

(22)

After:=() 将当前工作表移至

工作表的最终

(23) Worksheets(Array(“sheet1”,”sheet2”)).Select 同时选择工作表1和工作

表2

— 2 —