疑难千寻千解丛书 Excel 2013 VBA编程与实践【2025|PDF下载-Epub版本|mobi电子书|kindle百度云盘下载】

疑难千寻千解丛书 Excel 2013 VBA编程与实践PDF格式电子书版下载

注意：本站所有压缩包均有解压码： 点击下载压缩包解压工具

第1章 基础理论1

1.1变量、常量与数据类型1

疑难1正确地定义变量和数据类型有何优势1

数据类型与对象类型5

疑难2公共变量和静态变量都有何用处6

公共变量与静态变量的特点8

1.2程序防错要点8

疑难3常见的代码错误由哪些原因造成8

查阅VBA帮助的方法12

疑难4如何侦测代码出错，并将运行代码的错误原因发给作者12

程序出错的类型13

疑难5如何开发完善的程序14

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

1.3练习与思考18

第2章 数据查找技巧19

2.1快速查找19

疑难6能否按范围批量查找数值19

疑难7能否将符合多条件之一的所有数据提取到新表中22

判断工作表是否存在的方法23

疑难8可否按格式查找单元格，然后替换其格式25

FindFormat的使用技巧26

疑难9如何找出A线的不达标人员信息27

单列多条件与多列多条件筛选的区别29

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

定位单元格任意字符的方法30

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

日期函数Datedif的特性32

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

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

如何区分精确匹配与模糊匹配37

疑难14能否按相似度查找所有的数据37

利用Array向区域中一次性写入多个常量39

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

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

疑难16如何查找成绩并分批发送邮件42

VBA中邮件正文的换行符表示法43

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

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

2.2跨表查找内容47

疑难18能否将所有表中的完成目标者汇总到“总表”47

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

疑难19查找每月产量冠军名单，并在窗体中显示49

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

疑难20如何找出工作簿中所有的外部链接且将它们转换成值51

如何获取工作簿中的外部链接52

疑难21可否模糊查找所有部门的电话信息52

Target与Activecell的区别54

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

利用OnTime定时执行程序56

疑难23可否在单元格中创建多级下拉菜单56

ActionControl对象的功能与限制60

疑难24可否在文件夹的所有文件中查找特定信息并汇总到新表60

疑难25如何统计文件夹中所有的成绩工作簿中不及格人数64

调用工作表函数时应如何书写区域引用型参数65

2.3文件查找与转换66

疑难26如何判断指定的文件是否存在66

判断文件是否存在的函数67

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

疑难28可否在工作表中列出所有大于5MB的文件70

疑难29如何将所有的Word文件转换成PDF文件72

疑难30如何将xlsm和xlsx格式的所有文件转换成xls格式76

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

疑难32如何实现全盘查找且播放音乐文件79

疑难33能否在文件夹的所有工作簿中执行批量替换81

疑难34能否根据成绩表和模板生成Word成绩通知单84

2.4图片查找与引用87

疑难35如何瞬间删除当前表中艺术字和图表等以外的图片87

DrawingObjects与Shapes对象的区别89

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

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

Selection代表什么90

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

循环弹出对话框直到用户正确操作为止的编程思路93

疑难38能否对材料表分页且调用材料图片94

2.5练习与思考97

第3章 数据处理98

3.1按条件定位的技巧98

疑难39如何一次性定位产量大于1000的所有单元格98

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

疑难40可否全选至少三科不及格的学生姓名100

通过SpecialCells定位错误值103

疑难41工作表中所有的错误值是否可隐藏起来102

疑难42能否定位数值区域并转换成以“万”为单位104

VBA中如何处理双引号105

疑难43如何定位当前表的最大值或最小值105

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

疑难44能否定位并标识高于平均值的单元格107

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

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

辅助区的重要性110

3.2数据处理及格式转换111

疑难46能否一键对选区横向、纵向汇总111

“R1C1”引用方式的优点112

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

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

疑难48如何将二维的材料表转换成一维表115

使用数组函数Array简化代码116

疑难49如何开发一个通用的一维表转二维表的工具117

对数组和区域中的值去除重复值时的区别120

疑难50如何开发一个通用的二维表转一维表的工具121

疑难51可否将字符串中的字母、数字和汉字分离到多单元格中124

利用Like运算符区分汉字、数字和字母125

疑难52能否一键转换表达式为计算结果126

通过Evaluate方法转换表达式127

疑难53数据有效性可以设置为关联的三级下拉选单吗127

疑难54能否将职工信息按自定义序列排序130

新旧版本中Sort的差异131

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

在VBA中调用公式实现从未打开的工作簿中取值134

疑难56可否一键保护所有的公式134

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

疑难57如何实现发票金额分解136

MID提取文本的特点137

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

表的分类139

疑难59如何将不规范的时间统一为“hh：mm：ss.00”格式139

Format与Text函数的相同点和不同点141

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

Collection对象的优势142

疑难61如何对工作簿减肥143

文件虚胖的常见原因144

疑难62可否让数字在文本与数值之间快速切换145

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

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

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

疑难64可否一键删除工作表中所有的空白行148

SpecialCells方法的限制150

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

如何确定单元格是否被隐藏153

疑难66可否让单元格的值真正地四舍五入153

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

ColorIndex属性的限制对VBA代码的影响157

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

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

疑难69可否将职工资料表一键转换成打印格式160

如何计算图片所在单元格的地址162

3.3单元格合并技巧162

疑难70能否一键合并相同且相邻的所有单元格162

利用DisplayAlerts属性关闭合并单元格时的提示加快代码执行速度164

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

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

疑难72能否改进“跨越合并”，使其居中保留所有的数据166

Merge方法的真正功能167

疑难73可以合并同类项且分类汇总吗168

通过选择性粘贴格式实现合并单元格170

需要频繁操作单元格时的提速方法170

疑难74如何实现合并时保留所有的数据，而拆分时还原数据171

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

疑难75如何一键选择所有合并的单元格174

定位合并单元格175

查找设置对下一次查找结果有何影响175

疑难76如何取消所有的合并区域，并对所有的单元格填充数据175

合并区域的赋值方式176

疑难77能否实现撤销合并后能还原所有数据的多单元格合并177

合并单元格后再取消合并不丢失数据的思路178

疑难78如何将指定的单元格合并到一个选区178

将指定单元格链接到一个选区180

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

工作簿事件过程与普通过程的区别182

3.4报表合并与拆分183

疑难80如何合并所有工作表的数据到一个表中183

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

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

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

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

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

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

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

疑难84如何实现按条件将单个工作表拆分成多个工作表194

Range.AutoFilter方法的特殊性198

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

在不同的Excel版本中如何选择文件格式200

3.5单元格颜色的综合应用201

疑难86不同版本的Excel在颜色处理方面有区别吗201

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

疑难87可以在Excel 2013中按颜色筛选再做扩展吗203

CurrentRegion与Usedrange对程序的影响206

疑难88如何实现将颜色排序207

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

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

修改颜色不触发公式重算和任何VBA事件211

疑难90如何用函数对单元格的背景和字体按颜色汇总212

如何声明可选参数214

IIF函数与IF语句的区别214

3.6重复数据处理214

疑难91可否清空重复值所在单元格并以背景色标示214

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

Countif函数的限制216

疑难92可用红圈标示重复出现的数据吗217

Worksheet.CircleInvalid方法的限制218

疑难93如何提取两列数据中的相同项与不同项219

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

疑难94可否一键删除重复行221

Range.RemoveDuplicates方法中Columns参数的限制222

3.6练习与思考223

第4章 报表打印224

4.1打印设置224

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

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

疑难96可否将所有工作表的打印区域设置为有数据的区域225

更新打印区域设置的限制227

疑难97可否将订单表转换成每10行打印一页228

全自动批量插入分页符229

疑难98如何让跨页的合并单元格在打印后能完整显示229

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

4.2特殊打印格式设计231

疑难99如何制作工资条232

疑难100如何打印工资卡234

借用加载宏提升模板数据的安全性237

疑难101 VBA可以实现对工作表分页小计吗237

利用宏表函数Get.Document（50）获取工作表页数241

疑难102如何同时打印顶端标题和底端标题241

计算第一个分页符所在的行号248

疑难103可以借用图片实现底端标题打印吗248

Export与API方式将区域转换成图片的差异251

疑难104可否将订单表转换成适合针式多联打印的报表格式251

修改CopyObjectsWithCells属性实现复制数据时忽略图形对象254

疑难105如何实现双面打印254

手动中断程序与禁止中断程序255

疑难106可以只打印活动单元格所在页吗255

如何计算分页符位置和当前页的序号257

4.3思考与练习257

第5章 借用事件让程序自动化258

5.1工作表事件258

疑难107录入M2和M3时可自动将2或3显示为上标吗258

Target与ActiveCell的相同点与不同点259

疑难108可否在录入产品规格时自动在右边显示表达式的值260

修改EnableEvents属性避免事件的连锁反应261

疑难109可否实时记录指定区域的修改记录262

让批注框自动调整大小的必要步骤264

疑难110能否双击首行或首列时弹出工作表目录264

工作表事件与工作簿事件的分别265

5.2工作簿事件266

疑难111能否在启动工作簿时自动创建工作表目录266

Workbook_Open事件与Auto_open宏的相同点和不同点267

疑难112进入包含“货款”的工作表时可语音提示未收款客户名称吗268

DateDiff函数与DateDif函数的相同点和不同点269

疑难113能否自动记录工作簿的已打印次数270

BeforePrint事件的缺陷271

疑难114输入重复的工号时能否提示“已重复”271

创建让用户指定执行方式的对话框的三种方法273

疑难115能否在状态栏显示选区中的最大值和最小值地址273

工作表函数Counta的参数应如何对待Range对象的默认属性值275

5.3应用程序事件275

疑难116可否让新建的工作簿包含“进库”、“出库”和“异常统计”三个工作表275

借助类实现应用程序级的事件277

安装加载宏的两种方法278

疑难117可否新建图表时默认显示为圆角加阴影效果279

工作簿级与应用程序级的图表事件差异280

疑难118可否选择单元格时整行与整列自动着色280

引用活动窗口的可见区域282

5.4思考与练习283

第6章 开发自定义函数284

6.1自定义函数基础284

疑难119如何开发自定义函数284

如何跨工作簿调用自定义函数288

疑难120自定义函数在不同的版本中有何差异288

颜色对自定义函数的影响289

函数参数的数量上限291

疑难121如何对自定义函数添加功能描述与参数说明291

通过Application.MacroOptions方法为自定义函数添加参数说明292

6.2开发自定义函数293

疑难122如何对区域内混杂字符串中的数字求和293

Excel公式对“＋”的处理方式294

疑难123如何分离字符串中的数值、英文和汉字294

正则表达式在字符处理中的优势295

疑难124如何将文本混杂字符串及表达式转换为值296

正则表达式中如何表示数字、字母和汉字范围297

疑难125如何按时间段汇总金额298

根据计算对象的规范性决定函数参数的个数300

疑难126如何对具有分隔符的数据分类汇总300

Split函数产生的数组的特点302

疑难127超过15位的数字如何求和302

Excel对数据计算的长度限制304

疑难128如何根据身份证号码获取出生日期、年龄和性别304

身份证号码所包含的个人信息306

疑难129可否将发票格式的数字金额合并且转换为大写金额307

声明正确的函数类型，从而优化函数的执行效率308

疑难130如何突破Rank函数排名的限制308

去除重复值的常用方法310

疑难131如何实现按数据出现次数排序310

Collection与字典的区别312

疑难132可以用函数改变引用区域的值吗312

利用自定义函数修改引用区域的值的两种方法314

疑难133如何对两个以逗号分隔的乱序字符串比较异同315

将Split函数嵌套应用从字符串中分别获取品名与数量316

6.3开发具有可选参数的自定义函数317

疑难134可以扩展Vlookup函数实现返回所有符合条件的值吗317

利用Find替代工作表函数Vlookup实现多个数据查找318

疑难135可以用一个函数将人民币大小写相互转换吗319

通过拆分法理解代码321

疑难136可以让函数的两个参数全是可选参数吗322

将单个参数声明为可选参数的方法323

疑难137可以用函数连接内存数据和区域中所有的文本吗324

利用ParamArray声明不确定个数的函数参数325

6.4思考与练习326

第7章 文件与文件夹管理327

7.1文件管理327

疑难138能否在打开文件时自动备份文件327

将过程命名为“Auto_Open”使其自动执行328

疑难139如何让文件打开一次后就自我销毁328

文件“自杀”的条件329

疑难140如何一键删除3年前创建的所有文件329

DATEDIF与DATEDIFF的区别330

疑难141可以删除18个月没有打开过的文件吗331

用DATEDIF计算文件闲置时间的技巧331

疑难142可以在收藏夹中对当前工作簿创建快捷方式吗332

获取收藏夹地址的方法333

7.2文件夹管理334

疑难143如何瞬间删除D盘中所有的空文件夹334

将代表磁盘的字符串转换成磁盘对象的方法334

疑难144如何获取指定目录下的文件列表335

Dir函数查找子文件夹的注意事项337

疑难145安装多个版本的Excel时可以随心所欲地选择打开方式吗338

将Excel快捷方式导入“Sendto”文件夹339

疑难146如何批量创建以本月每日的日期命名的文件夹341

利用DateSerial的纠错功能计算本月天数342

7.3思考与练习342

第8章 VBA操作图表343

8.1利用VBA批量修改图表格式343

疑难147如何批量修改图表标签343

操作图表标签的条件347

疑难148如何批量移位标签347

手工位移图表标签的限制350

疑难149如何对图表系列设置条件格式350

填充图表系列的两种方法354

疑难150可否一键统一图表大小并对齐354

图表名称的特点356

8.2思考与练习356

第9章 VBA操作图形对象357

9.1图形对象的批量操作357

疑难151如何删除E列存放的图表以外的图形对象357

通过TopLeftCell和BottomRightCell定位图片位置358

疑难152如何让所有的图形对齐所在单元格左边框359

通过统一Left属性对齐图片359

疑难153如何一键导入工作簿所在路径下的家具图片360

录制“批量插入图片”的宏的缺陷361

9.2批注的高级应用362

疑难154如何将指定列的数据批量追加到批注中362

疑难155如何批量导入图片到单元格的批注中365

在“打开”对话框中筛选文件格式的方法366

疑难156可以对批注进行替换吗367

Unload Me、End和Exit Sub的区别370

疑难157如何在所有的批注末尾追加日期370

通过设置AutoSize属性使批注框自动调整大小371

疑难158如何批量修改批注的外观372

声明正确的变量类型及防错374

9.3图形对象综合应用374

疑难159如何创建图片目录与批量插入图片374

单元格的行高与列宽限制378

疑难160如何实现输入品名时查看当前路径下的同名图片378

通过修改图像控件的Picture属性更新图片379

疑难161如何实现批量导入图片且自动排版打印380

利用FSO技术中的Getextensionname获取文件后缀名384

疑难162可否以模糊匹配方式批量导入图片384

借用通配符“＊”实现模糊匹配文件名称387

疑难163如何开发批量删除指定类型的图形对象的工具387

如何遍历控件集合390

9.4练习与思考390

第10章 窗体控件应用391

10.1 ActiveX控件应用391

疑难164可以利用列表框强化数据有效性吗391

列表框相较数据有效性的灵活性393

疑难165如何利用复合框引用区域的唯一值394

复合框调用数据的两种方法及各自的优势396

疑难166能否利用复合框和列表框打造二级选单396

利用MouseMove事件获取组合框的值的技巧399

10.2窗体设计技巧400

疑难167如何用一个窗体展现多项不同的内容400

分页显示的两种方法403

疑难168如何实现利用快捷键启用和关闭窗体403

借用命令按钮的Cancel属性快捷关闭窗体405

疑难169如何用一个按钮执行多个功能406

利用PasswordChar属性隐藏敏感字符408

疑难170如何让日期输入器窗体紧随活动单元格409

影响窗体Left、Top属性的因素411

疑难171 VBA可以设计彩蛋吗412

MouseUp事件中的Button与Shift参数的作用414

疑难172如何通过窗体控制实现工作表隔行插入行415

通过Shift参数控制Insert方法的单元格移动方向418

疑难173如何在窗体中开发鼠标右键快捷菜单419

创建自定义菜单的基本思路420

疑难174在窗体Show状态下可以调整控件大小吗421

通过鼠标指针的坐标变化同步更新控件的宽度和边距423

疑难175在窗体Show状态下如何调整控件的位置423

MouseMove事件中Button参数的应用技巧425

疑难176如何检测窗体中文本框的数据有效性426

对文本框设置数据有效性检验的优势427

疑难177能否通过代码生成窗体及控件和代码428

用代码操作代码的必要条件430

10.3窗体与工作表之数据交互431

疑难178可否将多工作表中符合条件的值显示在窗体中431

列表框的ColumnHeads属性的特点434

疑难179如何实现通过窗体向多工作表中录入数据434

疑难180如何开发日历工具箱438

类的主要应用领域442

Excel对日期计算的限制442

疑难181如何实现多条件电话查询442

TextBoxl_Change事件与TextBoxl_Exit事件的异同444

疑难182如何开发复选框批量管理工具445

区分三种复选框控件447

疑难183如何让窗体控件自适应工作表数据变化448

用代码创建新控件450

疑难184可以让拆分工作簿的列表框具有拖放功能吗451

控件拖放相关的事件454

疑难185如何设计对文件批量重命名的工具箱454

10.4练习与思考460

第11章 功能区菜单与backstage视图设计461

11.1创建功能区菜单461

疑难186如何创建新选项卡及子菜单461

创建功能区菜单的语法与代码结构463

疑难187如何在“开始”选项卡中插入弹出式菜单466

创建弹出式菜单的语法467

疑难188如何创建对话框启动器469

在标签控件中让多段文字换行的技巧471

疑难189如何在“视图”选项卡中插入“阅读模式”的切换按钮472

切换按钮与命令按钮的区别474

疑难190如何将常用却又未显示在功能区中的按钮显示在“插入”选项卡中475

如何查看Excel内置命令的id476

疑难191如何制作功能区代码模板477

模板的功能与制作技巧479

11.2 backstage视图设计481

疑难192如何在“文件”菜单中添加命令按钮481

如何调用外部程序483

疑难193能否在“文件”菜单中创建多组命令按钮483

11.3思考与练习486

第12章 用VBA访问网络资源487

12.1导入网页列表487

疑难194如何一键导入最近三个月人民币与美元的历史汇率487

通过QueryTables.Add方法和QueryTable.Refresh方法导入网页数据488

疑难195可否录入城市名称后自动列出火车票信息489

让Worksheet_Change事件仅作用于固定区域的技巧491

12.2导入不规范的网页数据491

疑难196能否批量计算手机号码的归属地、区号与卡类型491

分析网页源代码的基本思路493

疑难197可否读取网页的天气预报数据496

查看网页源代码的方法497

12.3练习与思考499

第13章 设计Excel通用工具500

13.1开发Excel插件500

疑难198如何开发定位工具箱扩展Excel定位的功能500

Excel定位的限制506

疑难199可以利用插件一键录入常用VBA代码吗507

计算当前代码的行号511

疑难200如何开发带功能区菜单的中英文互译插件512

用公式实现中英文互译514

13.2封装代码515

疑难201如何将已编好的两段代码封装为COM加载项515

安装COM加载项的三种方法522

疑难202如何封装包含工作簿事件的代码522

封装事件过程的基本思路525

疑难203如何将自定义函数封装为COM加载项525

VBA中调用COM加载项中的函数的方法528

13.3设计安装程序529

疑难204如何将COM加载项封装为EXE格式的安装程序529

InnoSetup软件的参数说明533

疑难205可否开发具有撤销功能且可单击卸载的插件533

使用回调函数动态更新菜单的指定属性537

13.4练习与思考538

第14章 开发送货单套打程序539

14.1罗列需求539

14.2设计表格540

14.2.1工作表职能分配540

14.2.2设计“配置”工作表540

14.2.3设计“打印界面”工作表541

14.2.4设计“明细表”工作表543

14.3编写代码543

14.3.1为品名、品牌和型号创建下拉列表543

14.3.2开发小写金额转大写金额的函数546

14.3.3生成送货单号546

14.3.4打印并保存数据547

14.3.5批量打印历史数据548

14.3.6保存并清空数据550

14.3.7创建数据透视表550

14.3.8功能说明551

14.4设计菜单551

14.5测试功能552

14.5.1测试“生成送货单号”553

14.5.2测试品名、品牌与型号的录入方式553

14.5.3测试“打印当前货单”554

14.5.4测试“打印历史记录”555

14.5.5测试“创建透视表”556

14.5.6测试对话框启动器557

14.5.7总结557