提高版套装

Excel 2010 VBA编程与实践

　第1章 基础理论

　　1.1 快速获取帮助

　　　疑难1 如何获取所有控件的属性及属性值

　　　　※ 前期绑定与后期绑定

　　　疑难2 部分对象在输入时没有成员列表提示，如何解决

　　　　※ 没有成员列表的对象

　　　疑难3 如何找出错误语句及获取错误原因并发送到开发者邮箱

　　　　※ 利用ShellExecute函数调用程序的方式

　　1.2 程序防错要点

　　　疑难4 程序出错有哪些原因

　　　　※ 常见错误分析

　　　疑难5 如何获取VBA所有运行时错误的详细说明

　　　　※ 通过Error函数获取错误信息

　　　疑难6 如何在执行完毕后报告出错次数及原因

　　　　※ 捕捉所有错误信息

　　　疑难7 如何开发完善的程序

　　　　※ 数组区域对VBA程序的影响

　　　疑难8 防错语句在程序或者函数中应用有哪些优势

　　　　※ 利用Err.Number属性判断错误类型

　　1.3 代码优化之道

　　　疑难9 如何优化过程“隐藏偶数行”

　　　　※ 关闭ScreenUpdating提升程序效率

　　　疑难10 如何优化过程“设置字体属性”

　　　　※ 利用With简化对象引用

　　　疑难11 如何优化过程“隔三行求和”

　　　　※ 减少单元格的写入次数提升程序效率

　　　疑难12 如何优化过程“B列所有图片右移”

　　　　※ 有针对性地使用Select方法

　　　疑难13 如何优化过程“建工作表目录”

　　　　※ VBA中数组的作用

　　　疑难14 如何优化过程“成绩评语”

　　　　※ 区分适合置于循环体中的语句

　　　疑难15 如何优化过程“删除空单元格所在行”

　　　　※ 不用循环而选择多个符合条件的单元格

　　　疑难16 如何优化过程“批量修改批注背景色”

　　　　※ 区分父对象与子对象

　　　疑难17 如何优化过程“隔一行插入一行”

　　　　※ 计算模式对程序效率的影响

　　　疑难18 如何优化过程“获取外网IP地址”

　　　　※ 使用变量的条件

　　1.4 提升代码的兼容性

　　　疑难19 程序的兼容性体现在哪些方面

　　　　※ 操作系统对VBA的影响

　　　疑难20 如何让程序适应不确定对象

　　　　※ 使用动态区域引用让代码具有更强的通用性

　　　疑难21 如何让程序兼容Excel多版本

　　　　※ 识别Excel的版本号

　　　疑难22 如何让程序兼容英文和中文系统

　　　　※ 利用API函数识别简体、繁体中文与英文

　　　疑难23 如何让程序兼容简体与繁体中文

　　　　※ 让代码适应简体与繁体系统

　　1.5 练习与思考

　第2章 查找引用

　　2.1 本表查找

　　　疑难24 如何查找不及格学生姓名并突出显示

　　　　※ 利用Union方法合并多区域

　　　疑难25 如何一次性罗列表中三省员工的姓名

　　　　※ Find方法的使用技巧

　　　疑难26 如何在输入时逐步查找

　　　　※ 通过KeyUp事件自动执行查询

　　　疑难27 如何按指定的格式查找

　　　　※ FindFormat的使用技巧

　　　疑难28 如何实现字体格式替换

　　　　※ 替换格式的条件

　　　疑难29 如何查找所有“#”并标为上标

　　　　※ 区分上标、下标的应用对象

　　　疑难30 如何找出还款时间超过一年及未还款的客户信息

　　　　※ 日期函数Datedif的特性

　　　疑难31 可以将查找到的所有数据串连并写入剪贴板中吗

　　　　※ 引用“Microsoft Forms 2.0 Object Library”的两种方法

　　　疑难32 可以创建一个工具栏来方便查找吗

　　　　※ 设置lookat参数实现模糊查找

　　　疑难33 如何快速罗列出每个产品最新报价

　　　　※ Collection对象的应用技巧

　　　疑难34 如何在具有合并单元格的区域中多条件逐步查找

　　　　※ 通过“MergeArea”属性返回合并区域

　　　疑难35 如何查找成绩并分批发邮件

　　　　※ VBA中发编写邮件正文时的换行符的表示法

　　2.2 跨表及多表查找

　　　疑难36 如何引用数据表创建多级下拉菜单

　　　　※“ActionControl”对象的功能与限制

　　　疑难37 如何将所有表中查找的完成数汇总到总表

　　　　※ 利用SpecialCells定位实现快速查找

　　　疑难38 在窗体中罗列每月产量冠军名单

　　　　※ 不采用循环，一次性找出最大值所在行

　　　疑难39 如何将具有外部数据引用的单元格转换成值

　　　　※ 通过“[]”和“’！”定位具有外部链接的公式

　　　疑难40 如何让链接到其他表中隐藏单元格的超链接生效

　　　　※ 通过xlSheetVisible属性切换工作表显示状态

　　　疑难41 如何实现多部门电话资料模糊查询

　　　　※ Target与Activecell的区别

　　　疑难42 如何实现所有未收货款者在状态栏随机显示

　　　　※ 利用OnTime定时执行程序

　　2.3 文件查找与转换

　　　疑难43 如何判断指定文件是否存在

　　　　※ 利用DIR函数判断文件是否存在

　　　疑难44 如何进行深度查找且创建文件目录

　　　　※ FileDialog对象的应用

　　　疑难45 如何查找并备份所有“3月生产表”

　　　　※ CopyFile方法对文件复制

　　　疑难46 如何将所有Excel文件转换成XPS或PDF文件

　　　　※ 利用PrintOut方法将工作表转换成XPS文件

　　　疑难47 如何在网上邻居的共享盘中查找并打开“单价表”

　　　　※ 利用FileExists方法判断文件是否存在

　　　疑难48 如何实现全盘查找“上海滩.MP3”，有则自动翻放

　　　　※ 播放音乐的三种方式

　　　疑难49 如何在网上自动搜索与当前单元格同名的歌曲并播放

　　　　※ 利用网页地址索引歌曲并自动播放

　　2.4 图片查找与引用

　　　疑难50 如何瞬间删除当前表中所有图片

　　　　※ DrawingObjects与Shape对象的区别

　　　疑难51 可以将签名图片复制到表中所有签名处吗

　　　　※ 复制图形对象与复制数据的区别

　　　　※ Selection代表什么

　　　疑难52 如何像vlookup引用数据一样引用图片

　　　　※ 对图片设置公式引用其他图片

　　　疑难53 如何通过窗体预览指定目录中的所有图片

　　　　※ 通过LoadPicture函数加载图片

　　2.5 练习与思考

　第3章 数据处理

　　3.1 定位的技巧

　　　疑难54 如何选择当前表0～100之外的数据

　　　　※ 使用定位技术减少循环语句的循环次数

　　　疑难55 如何定位奇数行

　　　　※ MOD配合SpecialCells定位奇数行

　　　疑难56 可以瞬间定位并隐藏所有错误值吗

　　　　※ 通过SpecialCells定位错误值

　　　疑难57 如何在输入数据时自动定位下一行的目标单元格

　　　　※ 限制删除单元格的数据时不触发工作表的Change事件

　　　疑难58 可以将标题以外的区域转换成“万”为单位吗

　　　　※ VBA中如何处理双引号

　　　疑难59 如何定位当前表最大值和最小值

　　　　※ 调用工作表函数并配合Find方法查找最大值

　　　疑难60 能定位并标识高于平均值的单元格吗

　　　　※ VBA中数字、汉字的大小关系

　　　疑难61 如何反向选择工作表区域

　　　　※ 辅助区的重要性

　　3.2 数据处理及格式转换

　　　疑难62 如何将单词在大写、小写与首字母大写间任意切换

　　　　※ 利用StrConv函数对英文进行大写、小写和首字母大写转换

　　　疑难63 如何将二维的入库表转换成一维排版方式

　　　　※ 利用数组提升代码执行效率

　　　疑难64 能否不用循环对选区进行横向与纵向汇总

　　　　※“R1C1”引用方式的优点

　　　疑难65 如何批量地将字符串中的字母、数字和汉字分离出来

　　　　※ 利用Like运算符区别汉字、数字和字母

　　　疑难66 可以将表达式转换成运算结果吗

　　　　※ 通过Evaluate计算表达式

　　　疑难67 如何快速填充所有空单元格

　　　　※ 利用Intersect引用区域提升代码通用性

　　　疑难68 如何将产品销售地区瞬间转换成下拉列表

　　　　※ 利用代码设置有效性序列

　　　疑难69 数据有效性可以设置三级关联下拉列表吗

　　　　※ 利用Dictionary对象获取唯一值

　　　疑难70 可以对职员信息表按学历排序吗

　　　　※ 新旧版本中Sort的差异

　　　疑难71 可以不打开工作簿而提取其数据吗

　　　　※ VBA中调用公式实现从未打开的工作表中取值

　　　疑难72 如何保护所有公式不能修改

　　　　※ 切换Locked 属性实现公式保护

　　　疑难73 如何实现金额数据分解

　　　　※ MID取文本的特点

　　　疑难74 VBA可以破解工作表密码吗

　　　　※ 表的分类

　　　疑难75 如何对分段编号进行合并转换

　　　　※ 减少数组变量空间分配次数的方法

　　　疑难76 如何将5个大小相同选区的数据互换

　　　　※ Areas与CurrentRegion的区别

　　　疑难77 如何取得1000之内的质数

　　　　※ 质数的特性

　　　疑难78 可以生成指定范围的不重复随机数吗

　　　　※ Collection对象的优势

　　　疑难79 如何利用VBA对工作簿进行减肥

　　　　※ 正确删除单元格，减少文件体积

　　　疑难80 如何让数字在文本与数值之间快速切换

　　　　※ 在文本与数值间切换的VBA思路

　　　疑难81 如何将“/”分隔的数据进行汇总

　　　　※ 以“/”为分隔符取其左右字符的思路优化

　　　疑难82 可以对指定区域进行自动更正吗

　　　　※ 利用Replace方法实现限定区域的自动更正

　　　疑难83 可以对包括“星期”的所有工作表同时添加公式吗

　　　　※ VBA在单表和多表中输入公式的区别

　　　疑难84 在VBA中如何控制字符朗读

　　　　※ 利用Speech朗读字符

　　　疑难85 能实现粘贴数据时跳过隐藏区吗

　　　　※ 如何确定单元格是否隐藏

　　　疑难86 如何对相同值进行标识着色

　　　疑难87 如何根据工资计算零钞数量

　　　　※ 获取选区第一列及已用区域的交集

　　　疑难88 如何批量实现区域数据真正四舍五入

　　　　※ 通过round解决数据显示的假象

　　　疑难89 如何优化具有大量公式引用的数据计算

　　　　※ 公式与VBA在计算上的区别

　　　　※ ClearContents与Clear的区别

　　3.3 单元格合并技巧

　　　疑难90 可以在表格中合并同类项吗

　　　　※ 利用DisplayAlerts属性关闭合并单元格的提示及加快执行速度

　　　疑难91 如何实现按产品合并产量数据表

　　　　※ 利用变量暂存数据，代替辅助区

　　　疑难92 如何实现合并时保留所有数据，而拆分时可以还原

　　　　※ 看不见的特殊字符的应用

　　　疑难93 可以选择当前表所有合并单元格吗

　　　　※ 定位合并单元格

　　　疑难94 如何取消所有合并区域并且对所有单元格填充数据

　　　　※ 合并区域的赋值方式

　　　疑难95 合并单元格后仍然可以正常引用区域中的所有值吗

　　　　※ 复制合并属性

　　　疑难96 如何将指定单元格合并链接到一个选区

　　　　※ 对一个区域追加链接

　　　疑难97 跨页合并单元格可以重新合并从而适应分页打印吗

　　　　※ 判断合并单元格是否跨页

　　　疑难98 可以让合并单元格自动换行吗

　　　　※ 工作表事件代码与普通过程的区别

　　3.4 报表合并与拆分

　　　疑难99 如何合并所有工作表到一个表中

　　　　※ 让复制数据时既去除公式又不影响数值的显示状态

　　　疑难100 如何实现多表合并汇总

　　　　※ 利用相对引用公式批量合并数据，避免使用循环

　　　疑难101 如何将多个工作簿中的所有工作表合并到一个工作表中

　　　　※ 通过禁用工作簿重算提升代码效率

　　　疑难102 如何将多个工作簿数据合并到一个工作簿中

　　　　※ 利用变量作为辅助进行条件判断

　　　疑难103 如何实现报表拆分

　　　　※ 利用复制格式和复制数值实现完美复制，避免复制后显示错误

　　　疑难104 如何将工作簿中每个工作表转换为独立工作表

　　　　※ 根据版本号决定文件格式

　　3.5 单元格颜色的综合应用

　　　疑难105 Excel不同版本在颜色处理方面有分别吗

　　　　※ 不同版本中颜色差异对程序的影响

　　　疑难106 可以对Excel 2010的按颜色筛选再做扩展吗

　　　　※ CurrentRegion与Usedrange对程序的影响

　　　疑难107 如何让按颜色排序可以在Excel 多版本间通用

　　　　※ 借用辅助和调用老版本的Sort功能提升程序的通用性

　　　疑难108 如何将颜色分类重排且通用于Excel多个版本

　　　　※ 将颜色属性转换成数据，辅助程序执行

　　　疑难109 可以按颜色对选区数据分类汇总吗

　　　　※ 修改数据源与修改颜色在VBA事件中的差异

　　　疑难110 如何用函数对数据背景和字体按颜色汇总

　　　　※ 通过Volatile让函数声明为易失性函数

　　3.6 重复数据处理

　　　疑难111 如何清空重复值单元格并标识

　　　　※ Countif函数在去重复值中的应用

　　　　※ Countif函数的限制

　　　疑难112 可以对重复出现的数据进行圈释吗

　　　　※ 利用CircleInvalid对单元格加圈，以及CircleInvalid的限制

　　　疑难113 如何筛选唯一值

　　　　※ 使用错误处理语句配合Collection取唯一值

　　　疑难114 可以在输入重复值时提示用户吗

　　　　※ 通过EnableEvents提高程序的执行效率

　　　疑难115 如何对两列数据提取相同项与不同项

　　　　※ 利用Transpose函数实现区域转数组

　　　疑难116 如何将多行多列相同者保留最后一个数据

　　　　※ 双层Transpose配套Join实现横向区域转字符串

　　3.7 数据透视

　　　疑难117 如何按职务或部门进行工资数据的透视分析

　　　　※ 利用Excel 2003的透视表代码提升程序兼容性

　　　疑难118 如何实现多重数据透视

　　　　※ 利用Array嵌套创建多重透视

　　　疑难119 如何实现同时透视多工作簿中的多工作表数据

　　　　※ 解决VBA创建透视表名称冲突的两种方法

　　3.8 练习与思考

　第4章 报表打印

　　4.1 打印设置

　　　疑难120 如何一次性设置“总表”以外工作表的页脚

　　　　※ 选择工作表数量对页脚的影响

　　　疑难121 如何设置所有工作表的已用区域为打印区域

　　　　※ 设置打印区域对数据打印的影响

　　　疑难122 可以记录工作簿的打印次数吗

　　　　※ 借用文件自定义属性记录打印次数

　　4.2 特殊打印格式设计

　　　疑难123 如何设计工资条打印格式

　　　　※ 借用辅助列提升程序的容错性

　　　疑难124 如何打印工资卡

　　“Excel 疑难千寻千解”丛书是由Excel技巧网（ExcelTip.Net技术社区）的负责人、微软最有价值专家（MVP）黄朝阳先生策划并组织编写的一套系列书籍。

　　Excel技巧网旨在重点推广Excel 2010及今后更高版本的应用，并为广大的Excel爱好者提供一个内容充实、分类清晰、经典实用、精彩纷呈、互惠学习、友好交流的平台。社区成立不久便吸引了众多微软MVP和有志于推广电子表格应用技术的高手驻足，长期为网友免费解答疑难问题，并勤于将精彩的答疑帖子按其所涉及的知识和应用两个维度，整理成为原创技术文章。

　　本丛书由黄朝阳、王建发、陈国良、荣胜军、陈树青、李懿等微软MVP，以及罗刚君、李术彬、林盘生、章兰新、薛宇锋等多位社区资深版主联手打造，得益于多年来在社区答疑中的磨砺，作者们将丰富的实战经验付诸笔端，精心设计了上千案例，将Excel方方面面的知识点融入其中。每个案例都采用一般用户遇到疑难时最可能的提问方式和应用场景对问题进行描述，提供具有针对性的解决方案和详尽的操作步骤，并配合以原理分析和知识扩展环节，既授人以鱼，又授人以渔。丛书采用“疑难”加“知识点”的特色目录索引，方便读者根据需要快速地查找。对于渴望学习和掌握新知识的Excel用户来说，与其千百次地找寻问题答案，不如静心地读此丛书一卷。

　　本丛书将Excel细分门类，包括函数与公式、操作与技巧、数据透视表、SQL、VBA编程等，为了更加方便读者，将基础应用部分三本合为普及版，包括《Excel 2010函数与公式》、《Excel 2010操作与技巧》、《Excel 2010数据透视表大全》，适合各个层次的Excel用户，即可作为初学者的入门指南，又可作为中、高级用户的参考手册，将进阶提高部分两本合为提高版，包括《Excel 2010 VBA编程与实践》、《Excel 2010 SQL完全应用》，主要为Excel高级应用，帮助读者进阶提高。