常用的VBA技巧

第1章Range（单元格）对象8 技巧1单元格的引用方法8 1-1使用Range属性8 1-2使用Cells属性9 1-3使用快捷记号9 1-4使用Offset属性10 1-5使用Resize属性11 1-6使用Union方法12 1-7使用UsedRange属性12 1-8使用CurrentRegion属性13 技巧2选定单元格区域的方法13 2-1使用Select方法13 2-2使用Activate方法14 2-3使用Goto方法15 技巧3获得指定行、列中的最后一个非空单元格15 技巧4定位单元格18 技巧5查找单元格19 5-1使用Find方法19 5-2使用Like运算符23 技巧6替换单元格内字符串24 技巧7复制单元格区域25 技巧8仅复制数值到另一区域28 8-1使用选择性粘贴28 8-2直接赋值的方法29 技巧9单元格自动进入编辑状态30 技巧10禁用单元格拖放功能30 技巧11单元格格式操作31 11-1单元格字体格式设置31 11-2设置单元格内部格式33 11-3为单元格区域添加边框34 11-4灵活设置单元格的行高列宽36 技巧12单元格中的数据有效性37 12-1在单元格中建立数据有效性37 12-2判断单元格是否存在数据有效性39 12-3动态的数据有效性39 12-4自动展开数据有效性下拉列表41 技巧13单元格中的公式42 13-1在单元格中写入公式42 13-2检查单元格是否含有公式43 13-3判断单元格公式是否存在错误44 13-4取得单元格中公式的引用单元格45 13-5将单元格中的公式转换为数值46 技巧14单元格中的批注47 14-1判断单元格是否存在批注47 14-2为单元格添加批注48 14-3删除单元格中的批注49 技巧15合并单元格操作50 15-1判断单元格区域是否存在合并单元格50 15-2合并单元格时连接每个单元格的文本51 15-3合并内容相同的连续单元格52 15-4取消合并单元格时在每个单元格中保留内容54 技巧16高亮显示单元格区域55 技巧17双击被保护单元格时不显示提示消息框56 技巧18重新计算工作表指定区域58 技巧19录入数据后单元格自动保护58 技巧20工作表事件Target参数的使用方法60 20-1使用单元格的Address 属性60 20-2使用Column属性和Row属性61 20-3使用Intersect方法61 第2章Worksheet（工作表）对象63 技巧21引用工作表的方式63 21-1使用工作表的名称63 21-2使用工作表的索引号63 21-3使用工作表的代码名称64 21-4使用ActiveSheet属性引用活动工作表64 技巧22选择工作表的方法65 技巧23遍历工作表的方法66 23-1使用For...Next 语句66 23-2使用For Each...Next 语句68 技巧24在工作表中上下翻页69 技巧25工作表的添加与删除70 技巧26禁止删除指定工作表74 技巧27自动建立工作表目录76 技巧28工作表的深度隐藏78 技巧29防止更改工作表的名称80 技巧30工作表中一次插入多行81 技巧31删除工作表中的空行82 技巧32删除工作表的重复行84 技巧33定位删除特定内容所在的行86 技巧34判断是否选中整行87 技巧35限制工作表的滚动区域88 技巧36复制自动筛选后的数据区域89 技巧37使用高级筛选获得不重复记录91 技巧38工作表的保护与解除保护92 技巧39奇偶页打印95 第3章Wordbook（工作簿）对象97 技巧40工作簿的引用方法97 40-1使用工作簿的名称97 40-2使用工作簿的索引号97 40-3使用ThisWorkbook98 40-4使用ActiveWorkbook99 技巧41新建工作簿文件99 技巧42打开指定的工作簿101 技巧43判断指定工作簿是否打开104 43-1遍历Workbooks集合方法104 43-2错误处理方法104 技巧44禁用宏则关闭工作簿105 技巧45关闭工作簿不显示保存对话框109 45-1使用Close方法关闭工作簿109 45-2单击工作簿关闭按钮关闭工作簿111 技巧46禁用工作簿的关闭按钮111 技巧47保存工作簿的方法113 47-1使用Save方法113 47-2直接保存为另一文件名113 47-3保存工作簿副本113 技巧48保存指定工作表为工作簿文件114 技巧49打印预览时不触发事件116 技巧50设置工作簿文档属性信息118 技巧51不打开工作簿取得其他工作簿数据119 51-1使用公式119 51-2使用GetObject函数120 51-3隐藏Application对象121 51-4使用ExecuteExcel4Macro方法122 51-5使用SQL连接123 技巧52返回窗口的可视区域地址124 第4章Shape（图形）、Chart（图表）对象126 技巧53在工作表中添加图形126 技巧54导出工作表中的图片131 技巧55在工作表中添加艺术字133 技巧56遍历工作表中的图形135 技巧57移动、旋转图片137 技巧58工作表中自动插入图片138 技巧59固定工作表中图形的位置141 技巧60使用VBA自动生成图表143 技巧61使用独立窗口显示图表147 技巧62导出工作表中的图表148 技巧63多图表制作149 第5章Application对象153 技巧64取得Excel版本信息153 技巧65取得当前用户名称154 技巧66Excel中的“定时器”154 技巧67设置活动打印机的名称156 技巧68屏蔽、改变组合键的功能157 技巧69设置Excel窗口标题栏158 技巧70自定义Excel状态栏159 技巧71灵活退出Excel160 技巧72隐藏Excel主窗口161 72-1设置Application对象的Visible属性161 72-2将窗口移出屏幕162 72-3设置工作簿作为加载宏运行163 第6章使用对话框165 技巧73使用Msgbox函数165 73-1显示简单的提示信息165 73-2定制个性化的消息框166 73-3获得消息框的返回值167 73-4在消息框中排版169 73-5对齐消息框中显示的信息170 技巧74自动关闭的消息框172 74-1使用WshShell.Popup方法显示消息框172 74-2使用API函数显示消息框173 技巧75使用InputBox函数174 75-1简单的数据输入174 75-2使用对话框输入密码176 技巧76使用InputBox方法178 76-1输入指定类型的数据178 76-2获得单元格区域地址180 技巧77内置对话框181 77-1调用内置的对话框181 77-2获取选定文件的文件名184 77-3使用“另存为”对话框186 技巧78调用操作系统“关于”对话框188 第7章菜单和工具栏190 技巧79在菜单中添加菜单项190 技巧80在菜单栏指定位置添加菜单193 技巧81屏蔽和删除工作表菜单195 技巧82改变系统菜单的操作196 技巧83定制自己的系统菜单197 技巧84改变菜单按钮图标203 技巧85右键快捷菜单增加菜单项204 技巧86自定义右键快捷菜单205 技巧87使用右键菜单制作数据有效性208 技巧88禁用工作表右键菜单210 技巧89创建自定义工具栏211 技巧90自定义工具栏按钮图标214 技巧91自定义工作簿图标215 技巧92移除工作表的最小最大化和关闭按钮216 技巧93在工具栏上添加下拉列表框217 技巧94屏蔽工作表的复制功能219 技巧95禁用工具栏的自定义220 技巧96屏蔽所有的命令栏223 技巧97恢复Excel的命令栏224 第8章控件与用户窗体226 技巧98限制文本框的输入226 技巧99文本框添加右键快捷菜单228 技巧100文本框回车自动输入232 技巧101自动选择文本框内容233 技巧102设置文本框数据格式234 技巧103限制文本框的输入长度236 技巧104将光标返回文本框中237 技巧105文本框的自动换行239 技巧106多个文本框数据相加241 技巧107控件跟随活动单元格242 技巧108高亮显示按钮243 技巧109组合框和列表框添加列表项的方法245 109-1使用RowSource属性添加列表项245 109-2使用List属性添加列表项246 109-3使用AddItem方法添加列表项247 技巧110去除列表框数据源的重复值和空格249 技巧111移动列表框条目251 技巧112允许多项选择的列表框254 技巧113多列组合框和列表框的设置257 113-1多列组合框和列表框添加列表项257 113-2多列列表框写入工作表259 技巧114输入时逐步提示信息261 技巧115二级组合框268 技巧116使用DTP控件输入日期270 技巧117使用RefEdit控件选择区域273 技巧118如何注册控件274 技巧119遍历控件的方法277 119-1使用名称中的变量遍历控件277 119-2使用对象类型遍历控件279 119-3使用程序标识符遍历控件280 119-4使用名称中的变量遍历图形281 119-5使用FormControlType属性遍历图形282 技巧120使微调框最小变动量小于1283 技巧121不打印工作表中的控件285 121-1设置控件格式285 121-2设置控件的printobjcet属性287 技巧122在框架中使用滚动条287 技巧123使用多页控件289 技巧124标签文字垂直居中对齐291 技巧125使用TabStrip控件293 技巧126显示GIF动画图片295 技巧127播放Flash文件298 技巧128在工作表中添加窗体控件300 128-1使用AddFormControl方法301 128-2使用Add方法303 技巧129在工作表中添加ActiveX控件305 129-1使用Add方法306 129-2使用AddOLEObject方法308 技巧130使用spreadsheet控件309 技巧131使用Listview控件312 131-1使用Listview控件显示数据列表312 131-2在Listview控件中使用复选框315 131-3调整Listview控件的行距317 131-4在Listview控件中排序320 131-5Listview控件的图标设置321 技巧132调用非模式窗体324 技巧133进度条的制作326 133-1使用进度条控件326 133-2使用标签控件328 技巧134使用TreeView控件显示层次331 技巧135用户窗体添加图标335 技巧136用户窗体添加最大最小化按纽337 技巧137禁用窗体标题栏的关闭按钮338 技巧138屏蔽窗体标题栏的关闭按钮339 技巧139无标题栏和边框的窗体341 技巧140制作年月选择窗体342 技巧141自定义窗体中的鼠标指针类型345 技巧142调整窗体的显示位置346 技巧143由鼠标确定窗体显示位置348 技巧144用户窗体的打印349 技巧145使用自定义颜色设置窗体颜色351 技巧146在窗体中显示图表352 146-1使用Export方法352 146-2使用API函数354 技巧147窗体运行时调整控件大小355 技巧148在用户窗体上添加菜单358 技巧149在用户窗体上添加工具栏362 技巧150使用代码添加窗体及控件367 技巧151用户窗体的全屏显示373 151-1设置用户窗体为应用程序的大小373 151-2根据屏幕分辨率进行设置374 技巧152在用户窗体上添加状态栏375 第9章函数的使用379 技巧153调用工作表函数求和379 技巧154查找最大、最小值379 技巧155不重复值的录入381 技巧156获得当月的最后一天383 技巧157四舍五入运算384 157-1极小值修正法384 157-2调用工作表函数法385 技巧158使用字符串函数385 技巧159使用日期函数387 技巧160判断是否为数值391 技巧161格式化数值、日期和时间392 技巧162个人所得税自定义函数394 技巧163人民币大写函数396 技巧164列号转换为列标398 技巧165判断工作表是否为空表399 技巧166查找指定工作表400 技巧167查找指定工作簿是否打开402 技巧168取得应用程序的安装路径402 技巧169数组的使用404 169-1代码运行时创建数组404 169-2文本转换为数组405 169-3使用动态数组去除重复值407