文档介绍：VBA语句集
(第1辑)
定制模块行为
(1) Option Explicit '强制对模块内所有变量进行声明
Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显示
pare Text '字符串不区分大小写
Option Base 1 '指定数组的第一个下标为1
(2) On Error Resume Next '忽略错误继续执行VBA代码,避免出现错误消息
(3) On Error GoTo ErrorHandler '当错误发生时跳转到过程中的某个位置
(4) On Error GoTo 0 '恢复正常的错误提示
(5) =False '在程序执行过程中使出现的警告框不显示
(6) =False '关闭屏幕刷新
=True '打开屏幕刷新
(7) =xlDisabled '禁用Ctrl+Break中止宏运行的功能
工作簿
(8) () '创建一个新的工作簿
(9) Workbooks("").Activate '激活名为book1的工作簿
(10) '保存工作簿
(11) '关闭当前工作簿
(12) '获取活动工作薄中工作表数
(13) '返回活动工作薄的名称
(14) 『返回当前工作簿名称
『返回当前工作簿路径和名称
(15) =False 『禁止调整活动工作簿的大小
(16) xlArrangeStyleTiled 『将工作簿以平铺方式排列
(17) =xlMaximized 『将当前工作簿最大化
工作表
(18) 『当前工作表中已使用的行数
(19) 『获取工作表的行数(注:考虑向前兼容性)
(20) Sheets(Sheet1).Name= "Sum" '将Sheet1命名为Sum
(21) Before:=Worksheets(1) '添加一个新工作表在第一工作表前
(22) After:=ActiveWorkbook. _
Sheets() '将当前工作表移至工作表的最后
(23) Worksheets(Array("sheet1","sheet2")).Select '同时选择工作表1和工作表2
(24) Sheets("sheet1").De