OFFICE VB 语句

发布时间:2023-12-06 18:30:57

定制模块行为(1OptionExplicit''强制对模块内所有变量进行声明OptionPrivateModule''标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不显OptionCompareText''字符串不区分大小写OptionBase1''指定数组的第一个下标为1(2OnErrorResumeNext''忽略错误继续执行VBA代码,避免出现错误消息(3OnErrorGoToErrorHandler''当错误发生时跳转到过程中的某个位置(4OnErrorGoTo0''恢复正常的错误提示(5Application.DisplayAlerts=False''在程序执行过程中使出现的警告框不显示(6Application.ScreenUpdating=False''关闭屏幕刷新Application.ScreenUpdating=True''打开屏幕刷新(7Application.Enable.CancelKey=xlDisabled''禁用Ctrl+Break中止宏运行的功能工作簿1
(8Workbooks.Add(''创建一个新的工作簿(9Workbooks(book1.xls.Activate''激活名为book1的工作簿(10ThisWorkbook.Save''保存工作簿(11ThisWorkbook.close''关闭当前工作簿(12ActiveWorkbook.Sheets.Count''获取活动工作薄中工作表数(13ActiveWorkbook.name''返回活动工作薄的名称(14ThisWorkbook.Name‘返回当前工作簿名称ThisWorkbook.FullName‘返回当前工作簿路径和名称(15ActiveWindow.EnableResize=False‘禁止调整活动工作簿的大小(16Application.Window.ArrangexlArrangeStyleTiled‘将工作簿以平铺方式排列(17ActiveWorkbook.WindowState=xlMaximized‘将当前工作簿最大化工作表(18ActiveSheet.UsedRange.Rows.Count‘当前工作表中已使用的行数(19Rows.Count‘获取工作表的行数(注:考虑向前兼容性2

OFFICE VB 语句

相关推荐