(1) Option Explicit 强制对模块内所有变量进行声明。
Option Compare Text 字符串不区分大小写。
Option Base 1 指定数组的第一个下标为1。
(2) On Error Resume Next 忽略错误继续执行VBA代码,避免出现错误消息。
(3) On Error GoTo ErrorHandler 当错误发生时跳转到过程中的某个位置。
如何利用ExcelVBA解决棘手的数据提取问题
今天同事问了个我一个数据提取的问题。他的需求是这样的: 他有1个工作簿,里面有100个工作表。他希望把每个工作表里的第6行的b6:i6数据复制到一起, 也就是说他要把工作表里的第6行,汇总在一起。比如这样: 他说如果你没办法,那他只能手动来复制100个工作表,提取这数据了。 我想了下说,我用VBA编程试试。 差不多
(4) On Error GoTo 0 恢复正常的错误提示。
(5) Application.DisplayAlerts=False 在程序执行过程中使出现的警告框不显示。
(6) Application.ScreenUpdating=False 关闭屏幕刷新。
Application.ScreenUpdating=True 打开屏幕刷新。
(7) Application.Enable.CancelKey=xlDisabled 禁用。
Ctrl Break 中止宏运行的功能。
如何隐藏Excel编辑栏
在Excel VBA中,如果需要隐藏Excel编辑栏以方便用户的操作体验,可通过VBA设置Excel编辑栏的显示状态隐藏Excel编辑栏。Excel2003可通过VBA宏隐藏Excel编辑栏。 隐藏Excel编辑栏的方法: 首先按“Alt F11”组合键,Excel2003打开代码编辑器,单击&