Excel VBA经典代码应用大全PDF电子书下载

绪论 1

第一篇 VBA基础 2

第1章 Excel 2016中VBA的工作环境 2

1.1使用【开发工具】选项卡 2

1.2使用宏功能的其他方法 4

1.2.1【视图】选项卡中的【宏】按钮 4

1.2.2状态栏上的按钮 4

1.3保存宏代码的文件格式 5

1.4宏安全性设置 6

1.5启用工作簿中的宏 6

1.6受信任位置 8

1.7录制宏代码 10

1.7.1录制新宏 10

1.7.2录制宏的局限性 11

1.8运行宏代码 11

1.8.1快捷键 11

1.8.2功能区中的【宏】按钮 12

1.8.3图片按钮 12

第二篇 操作Excel对象 15

第2章 窗口和应用程序 15

2.1设置Excel窗口状态 15

2.2设置Excel全屏显示 15

2.3限定工作簿窗口大小 17

2.4隐藏Excel主窗口 18

2.4.1设置Visible属性 18

2.4.2将窗口移出屏幕 19

2.5利用状态栏显示提示信息 20

2.6 Excel中的“定时器” 21

2.6.1显示一个数字时钟 21

2.6.2实现倒计时功能 22

2.7精美的数字秒表 23

2.8暂停宏代码的运行 25

2.8.1使用Wait方法 25

2.8.2使用Sleep API函数 25

2.9防止用户干预宏代码的运行 26

2.10调用变量名称指定的宏过程 26

2.11利用OnKey方法捕捉键盘输入 28

2.11.1禁止使用〈F11〉功能键插入图表工作表 28

2.11.2捕捉〈Ctrl＋V〉组合键 29

2.12使用SendKeys方法模拟键盘输入 30

2.13巧妙捕获用户中断 31

2.14使用Application级别事件 33

第3章 工作簿和工作表 35

3.1引用工作表 35

3.1.1使用工作表名称 35

3.1.2使用工作表索引号 35

3.1.3使用工作表代码名称 35

3.1.4使用ActiveSheet引用活动工作表 36

3.2添加新工作表 37

3.3防止更改工作表的名称 38

3.4判断工作簿中是否存在指定名称的工作表 39

3.5按名称排序工作表 39

3.5.1按常规文本排序 39

3.5.2按数字部分排序 40

3.6限制工作表滚动区域 41

3.7操作受保护的工作表 42

3.8在指定单元格区域中禁止显示右键菜单 44

3.9选中所有工作表 45

3.9.1带参数的Select方法 45

3.9.2使用集合 45

3.10在VBA中使用工作表函数 45

3.11判断是否存在指定名称的工作簿 46

3.11.1循环判断 46

3.11.2错误陷阱处理 47

3.12引用工作簿 47

3.12.1使用ThisWorkbook属性 47

3.12.2使用代码名称引用 47

3.12.3使用ActiveWorkbook属性 47

3.12.4使用工作簿名称引用 48

3.12.5使用工作簿索引号 48

3.13新建工作簿 48

3.14导入文本文件中的数据 49

3.15保存工作簿 51

3.15.1使用Save方法 51

3.15.2使用SaveAs方法 51

3.15.3使用SaveCopyAs方法 51

3.16保存指定工作表到新的工作簿文件 52

3.16.1将单个工作表保存为工作簿文件 52

3.16.2将指定的多个工作表保存为新工作簿文件 53

3.16.3保存不确定数量的多个工作表 53

3.17禁止工作簿文件另存 53

3.18关闭工作簿不显示保存对话框 54

3.18.1通过代码关闭工作簿 54

3.18.2通过事件过程控制 55

3.19限制工作簿只能通过代码关闭 55

3.20打开启用宏的工作簿时禁用宏 56

3.21打开工作簿时禁止更新链接 57

3.22定义隐藏的名称 58

3.23实现工作簿“自杀”功能 59

3.24限制工作簿的使用次数 60

第4章 使用Range对象 62

4.1引用单元格区域 62

4.1.1使用A1样式引用 62

4.1.2使用行列编号 63

4.1.3使用快捷记号 64

4.1.4使用Rows和Columns属性 64

4.1.5使用Offset属性 64

4.1.6使用Resize属性 65

4.1.7使用CurrentRegion属性 65

4.1.8使用Areas属性 66

4.2取得最后一个非空单元格 66

4.3随心所欲复制单元格区域 68

4.4仅复制数值到另一区域 69

4.4.1使用选择性粘贴 70

4.4.2直接赋值 70

4.5对行进行快速分组 71

4.6获取两个单元格区域的交叉区域 71

4.7联合多个单元格区域 72

4.8判断一个区域是否包含在另一个区域中 73

4.8.1利用Application.Intersect方法 73

4.8.2利用Application.Union方法 74

4.9设置字符格式 74

4.9.1设置单元格文本字符格式 74

4.9.2设置图形对象文本字符格式 75

4.10单元格区域添加边框 75

4.11高亮显示单元格区域 78

4.11.1使用Worksheet_SelectionChange事件 78

4.11.2使用条件格式和定义名称 79

4.12动态设置单元格数据验证序列 81

4.13将单元格公式转换为数值 84

4.13.1使用选择性粘贴 84

4.13.2使用Value属性 84

4.13.3使用Formula属性 84

4.14判断单元格公式是否存在错误 84

4.15批量删除所有错误值 85

4.16返回指定列的列标 87

4.17判断单元格是否存在批注 87

4.18为单元格添加批注 88

4.19编辑批注文本 89

4.20修改批注外观 90

4.21显示图片批注 90

4.22设置批注字体 91

4.23快速判断单元格区域是否存在合并单元格 92

4.24合并单元格时连接每个单元格内容 93

4.25取消合并时在每个单元格中保留内容 93

4.26合并内容相同的单列连续单元格 94

4.27查找包含指定字符串的所有单元格 95

4.28合并计算多个工作表的数据 97

4.29合并计算多个工作簿的工作表 99

4.30按指定条件自动筛选数据 100

4.31多条件筛选 101

4.32获取符合筛选条件的记录数 102

4.33判断筛选结果是否为空 103

4.34复制自动筛选后的数据区域 104

4.35使用删除重复项获取不重复记录 104

4.36删除空行 105

4.37判断是否选中整行 106

4.38工作表中一次插入多行 106

4.38.1使用循环的方法 107

4.38.2使用引用多行的方法 107

4.39控制插入单元格区域的格式 107

4.40批量删除奇数行 109

4.40.1在区域中由下而上逐行删除 109

4.40.2联合区域的方法 109

4.41数据排序 110

4.42多关键字排序 111

4.42.1 Range对象的Sort方法 111

4.42.2 Worksheet对象的Sort方法 113

4.43自定义序列排序 114

4.44创建数据透视表 115

第5章 使用Chart对象 119

5.1自动创建图表 119

5.1.1创建图表工作表 119

5.1.2创建嵌入图表 121

5.2创建线柱组合图表 122

5.2.1修改数据系列方法 123

5.2.2添加数据系列方法 125

5.3获取数据系列的引用区域 127

5.4自动添加平均值参考线 128

5.4.1添加数据系列 129

5.4.2绘制线条方法 130

5.5自定义数据标签文本 132

5.6动态图表 133

5.6.1动态显示图表 133

5.6.2动态绘制数据系列 134

5.7使用嵌入图表事件 136

5.8条件格式化数据标记 138

5.9将图表保存为图片 140

第6章 使用Shape对象 142

6.1遍历工作表中的Shape对象 142

6.2在工作表中快速添加Shape对象 146

6.3组合多个Shape对象 149

6.4将Shape对象另存为图片 151

6.5编辑Shape对象的文本 152

6.6制作图片产品目录 154

第三篇 交互设计 158

第7章 使用消息框 158

7.1显示简单的信息提示 158

7.2定制个性化的消息框 158

7.3获取消息框的返回值 160

7.4自动延时关闭的消息框 161

7.4.1使用WshShell.Popup方法显示消息框 161

7.4.2使用API函数显示消息框 162

第8章 简单的数据输入 163

8.1简单的输入界面 163

8.2更安全的密码输入界面 164

8.3轻松获取单元格区域地址 166

8.4防止用户输入错误数据 167

第9章 Excel内置对话框 169

9.1使用Excel的内置对话框 169

9.2获取用户选择的文件名 170

9.3获取用户选择的文件夹名 172

第10章 菜单和工具栏 174

10.1禁用右键快捷菜单 174

10.2列出所有命令栏控件 175

10.3自定义菜单命令组 177

10.4自定义工具栏组 178

10.5自定义单元格右键快捷菜单 180

10.6使用自定义右键快捷菜单输入数据 182

10.7快速列出操作系统中所有字体 184

第11章 Ribbon功能区 186

11.1自定义功能区界面 186

11.2编写VBA代码处理回调 190

11.3使用自定义图片和内置图标 193

11.4动态自定义功能区控件的属性 194

11.4.1动态禁用和启用控件 194

11.4.2隐藏指定的选项卡 196

11.5自定义功能区提示信息和加速键 199

11.6自定义内置选项卡 201

11.7使用VBA操作功能区 202

11.7.1使用CommandBars对象 202

11.7.2隐藏功能区 203

11.8重置功能区内置控件 204

11.9自定义快速访问工具栏 205

11.10自定义【文件】选项卡 207

11.11自定义上下文选项卡 210

11.12使用对话框启动器 211

11.13使用组合框 212

11.14使用动态菜单 215

11.15使用库控件 217

第12章 控件的应用 221

12.1限制文本框的输入 221

12.2自动换行的文本框 222

12.3自动选择文本框内容 223

12.4制作游走字幕 225

12.5在组合框和列表框中添加列表项 226

12.5.1使用RowSource属性添加列表项 226

12.5.2使用ListFillRange属性添加列表项 227

12.5.3使用List属性添加列表项 228

12.5.4使用Addltem方法添加列表项 228

12.6移动列表框的列表项 229

12.7允许多项选择的列表框 231

12.8设置多列组合框和列表框 233

12.8.1为多列组合框和列表框添加列表项 233

12.8.2将多列列表框的数据写入工作表 234

12.9二级组合框 235

12.10输入时逐步提示信息 236

12.11使用控件输入日期 241

12.11.1使用DTP控件输入日期 241

12.11.2使用MonthView控件查看日期 243

12.12使用RefEdit控件获取单元格区域 245

12.13使用多页控件 245

12.14使用TabStrip控件 246

12.15使用ListView控件 248

12.15.1使用ListView控件显示数据 248

12.15.2在ListView控件中使用复选框 250

12.15.3调整ListView控件的行距 252

12.15.4在ListView控件中排序 254

12.15.5 ListView控件的图标设置 255

12.16使用TreeView控件显示层次 257

12.17使用WebBrowser控件显示GIF动态图 260

12.18使用ShockwaveFlash控件播放Flash文件 261

12.19制作进度条 264

12.19.1使用ProgressBar控件制作进度条 264

12.19.2使用标签控件制作进度条 265

12.20不打印工作表中的控件 267

12.20.1工作表中的表单控件 267

12.20.2工作表中的ActiveX控件 268

12.21遍历控件的多种方法 269

12.21.1使用名称中的变量遍历控件 269

12.21.2使用对象类型遍历控件 270

12.21.3使用程序标识符遍历控件 271

12.21.4使用FormControlType属性遍历控件 272

12.22使用代码在工作表中添加控件 273

12.22.1使用AddFormControl方法添加表单控件 273

12.22.2使用Add方法添加表单控件 274

12.22.3使用Add方法添加ActiveX控件 275

12.22.4使用AddOLEObject方法添加ActiveX控件 276

第13章 用户窗体的应用 278

13.1调用用户窗体 278

13.1.1调用模态用户窗体 278

13.1.2调用非模态用户窗体 279

13.2制作欢迎界面窗体 279

13.3在用户窗体标题栏上添加最大化和最小化按钮 281

13.4禁用用户窗体标题栏的关闭按钮 282

13.4.1利用QueryClose事件禁止关闭窗体 282

13.4.2利用API函数实现禁止关闭窗体 283

13.5在用户窗体上添加菜单 284

13.6在用户窗体上添加工具栏 288

13.7在用户窗体上添加状态栏 291

13.8透明的用户窗体 294

13.9调整用户窗体的显示位置 295

13.9.1设置用户窗体的显示位置 295

13.9.2由活动单元格确定显示位置 297

13.10在用户窗体上显示图表 299

13.11打印用户窗体 300

13.12全屏显示用户窗体 301

13.12.1设置用户窗体为应用程序的大小 302

13.12.2根据屏幕分辨率设置 302

13.13用户窗体运行时拖动控件 303

13.14使用自定义颜色设置用户窗体颜色 305

13.15自定义用户窗体的鼠标指针类型 306

13.16使用代码添加用户窗体及控件 307

第四篇 文件系统操作 314

第14章 目录和文件操作 314

14.1判断文件或文件夹是否存在 314

14.2重命名文件、文件夹 316

14.3获取文件信息和属性 317

14.4获取驱动器信息 319

14.5使用FSO对象操作文件夹 321

14.6使用FSO对象操作文件 323

14.7使用FSO对象查找文件 324

14.8打开和关闭指定的文件夹 326

14.9获取常用路径 327

第15章 文件的输入输出 330

15.1读写文本文件 330

15.1.1用Write和Print语句写入数据 330

15.1.2以Append方式追加写入数据 332

15.1.3使用Input函数 332

15.2使用FSO对象读写文本文件 335

15.2.1写入数据 335

15.2.2追加写入数据 337

15.2.3读取数据 337

15.3保存指定区域内容到一个文本文件 339

15.4读写文本文件的指定行 340

15.5操作注册表 341

第五篇 数据库应用 348

第16章 ADO应用 348

16.1创建数据库连接 348

16.1.1 Microsoft Ace OLE DB 350

16.1.2 OLE DB Provider for ODBC 352

16.2创建查询记录集 352

16.2.1 Recordset对象的Open方法 352

16.2.2 Connection对象的Execute方法 354

16.3动态创建Access数据库文件 356

16.4获取数据库所有表的信息 358

16.4.1 ADOX.Catalog对象 358

16.4.2 OpenSchema方法 359

16.5动态创建数据表 361

16.5.1创建数据库的数据表 361

16.5.2创建Excel工作表 363

16.6 动态创建链接表 364

16.6.1链接Excel文件 365

16.6.2链接Access文件 366

16.6.3链接“标准格式”文本文件 368

16.7在数据库中创建视图 370

16.8向数据表添加、删除、修改字段 372

16.9创建多数据库查询 373

16.10将工作表、数据表或查询生成新的数据表 374

16.11批量删除数据表中的记录 376

16.12从表或查询中批量向数据表添加记录 378

16.13批量修改数据表中的记录 380

16.14从Excel工作表向数据表添加新记录、更新旧记录 382

16.15在数据库中存储照片 383

16.16制作带照片的档案表 385

16.17查询不重复的记录 389

16.18查询前n条最大值记录 390

16.19分组聚合查询 392

16.19.1聚合函数 392

16.19.2分组聚合 393

16.20从字段不完全相同的多个工作簿提取数据 395

16.21使用内、外连接实现字段配对 397

16.22比较两表提取相同项和不同项 399

16.23使用SQL查询创建数据透视表 401

16.24查询文本文件中的数据 404

16.24.1查询“标准格式”文本文件 404

16.24.2查询“非标准格式”文本文件 405

16.25多类型表内连接关联查询 408

16.26TRANSFORM交叉表查询 410

16.27在数组中存储查询结果 412

16.28生成各种统计报表 414

16.29员工管理系统 416

16.29.1新建数据库 416

16.29.2员工管理系统模块设计 417

16.29.3员工照片管理模块设计 426

第六篇 高级编程 432

第17章 Excel与Internet 432

17.1创建和打开超链接 432

17.1.1批量创建超链接 432

17.1.2使用Follow方法打开超链接 435

17.1.3使用FollowHyperlink方法打开超链接 436

17.2使用Lotus Notes发送邮件 437

17.3使用MailEnvelope发送邮件 439

17.4网抓基础知识概要 441

17.4.1初步了解HTTP 441

17.4.2 HTML语言简介 442

17.4.3 HTML DOM 446

17.5 Fiddler的安装、设置与使用 448

17.6获取百度查询结果 451

17.6.1抓取百度查询结果的个数 451

17.6.2抓取百度前5页查询结果 454

17.7使用有道翻译实现英汉互译 455

17.8获取当当网图书数据 458

17.9了解IE对象 461

17.10使用IE自动登录网页 464

17.11制作简易的网页浏览器 466

17.12解析JSON文档 470

17.12.1 JSON的对象和数组 470

17.12.2使用VBA执行JavaScript语句 471

17.12.3获取和讯网融资融券交易详情 472

17.13获取网页中的表格数据 474

17.13.1使用QueryTable获取网页表格数据 474

17.13.2使用HTMLFILE对象获取网页表格数据 476

17.13.3借助剪贴板获取网页表格数据 478

17.14下载网页中的图片等文件 479

17.14.1下载图片文件 479

17.14.2下载压缩文件 482

17.15对非UTF-8编码的数据进行编码转换 482

17.16 WinHttp对象和处理防盗链 485

17.16.1模拟Referer获取上海证券交易所数据 485

17.16.2伪造Cookie获取QQ空间说说数据 487

第18章 Excel操作XML 492

18.1快速创建XML文件 492

18.2定制自己的Excel RSS阅读器 495

第19章 操作其他Office应用程序 502

19.1前期绑定与后期绑定 502

19.1.1注册动态链接库 502

19.1.2前期绑定 504

19.1.3后期绑定 504

19.1.4两种方式的优缺点 505

19.2将电子表格数据通过Outlook邮件发送 505

19.3将Excel数据输出到PowerPoint演示文稿 509

19.4将Excel数据输出到Word新文档 512

19.4.1在Excel中创建Word报告 512

19.4.2在Excel中创建Word邮件合并 516

第20章 使用类模块 519

20.1创建和使用自定义对象 519

20.2设置类的默认属性和为类添加说明 522

20.3捕获应用程序事件和嵌入图表事件 525

20.4设置屏幕分辨率 526

20.5使用类实现控件数组 529

20.6捕获单元格值的改变 530

20.7利用接口实现类的多态 532

20.8创建自定义的集合 535

20.9跨工程使用类 536

20.10使用.NET Framework中的类 538

20.11监控Shape对象 540

第21章 VBE相关操作 545

21.1设置信任对VBA工程对象模型的访问 545

21.1.1 Excel界面中操作 545

21.1.2修改注册表 546

21.1.3编程方式自动设置 546

21.2引用VBA扩展对象库 548

21.2.1通过手动方式添加引用 548

21.2.2通过编程方式添加引用 549

21.2.3查询已添加的引用 550

21.3列出工程中所有部件信息 551

21.4自动添加模块和代码 552

21.5快速列出模块中的所有过程 555

21.6自动为对象添加事件过程和代码 557

第22章 数组与字典 559

22.1利用数组完成数据交换 559

22.2罗列符合条件的信息 561

22.3按指定字符拆分字符串 563

22.4以指定分隔符连接字符串 565

22.4.1使用Array函数对数组赋值 565

22.4.2使用单元格直接对数组进行赋值 566

22.5以指定条件连接字符串 567

22.6多表查询 570

22.7两列数据对比重复 571

22.8精确查找数组数据 573

22.9按条件拆分工作表 574

22.10利用数组制作工资条 576

22.11冒泡排序法 578

22.12字典的前期绑定与后期绑定 579

22.12.1前期绑定 579

22.12.2后期绑定 580

22.13字典对象的常用方法与属性 580

22.13.1 Add方法 580

22.13.2 Key属性与Item属性 581

22.13.3 Remove方法和Exists方法 582

22.14利用字典实现条件查询 583

22.15利用字典实现分类汇总 584

22.16利用字典制作二级下拉菜单 585

22.17利用字典与数组实现多条件查询 587

第七篇 代码调试与优化 590

第23章 代码调试 590

23.1断点调试 590

23.1.1程序状态 591

23.1.2异常运行状态 592

23.1.3设置断点 593

23.1.4清除断点 593

23.1.5 Stop语句设置断点 593

23.1.6单步调试 594

23.2使用Debug对象 595

23.2.1 Print方法 595

23.2.2 Assert方法 596

23.3使用【立即窗口】 596

23.4使用【本地窗口】 599

23.5使用【监视窗口】 600

23.5.1添加监视 601

23.5.2编辑监视 604

23.5.3删除监视 605

第24章 错误处理 606

24.1捕捉错误 606

24.2处理错误 608

24.3退出错误处理过程 611

24.4生成错误 612

24.5强制声明变量 614

第25章 代码优化与高效编程 616

25.1避免使用Variant类型 616

25.2减少引用符号的数量 617

25.3用数组代替引用Range对象 618

25.4让代码“专注”运行 618

25.5快速输入代码 619

25.5.1编辑器设置 619

25.5.2使用“编辑”工具栏 621

25.5.3导入代码 622

25.5.4录制宏快速获取代码 622

25.5.5代码缩进 622

25.6编写高效的VBA代码 624

25.6.1强制要求变量声明 624

25.6.2变量与常量命名 625

25.6.3声明函数返回值类型 626

25.6.4合理使用循环 626

25.6.5使用名称 627

25.6.6限制GoTo语句的使用 627

25.6.7尽量避免省略 627

25.6.8模块或窗体功能单一化 627

25.6.9使用错误处理技术，让代码更健壮 627

25.6.10善于使用代码注释 627

附录 高效办公必备工具——Excel易用宝 629