Excel VBA典型实例大全 通过368个例子掌握PDF电子书下载

第1章 宏的应用技巧 1

1.1 创建宏 1

例001 在Excel 2003中录制宏 1

例002　打开Excel 2007的录制宏功能 3

例003 在Excel 2007中录制宏 4

例004　使用Visual Basic创建宏 5

1.2　管理宏 6

例005　运行宏 7

例006　编辑宏 8

第2章 VBE使用技巧 10

2.1 设置VBE操作环境 10

例007 停靠VBE子窗口 10

例008 定制VBE环境 12

2.2　工程管理 13

例009　增加模块 13

例010　删除模块 15

例011 导出模块 16

例012　导入模块 17

2.3　管理代码 18

例013　属性／方法列表 18

例014　常数列表 19

例015　参数信息 20

例016 自动完成关键字 21

第3章 程序控制流程技巧 23

3.1　常用输入／输出语句 23

例017　九九乘法表（Print方法的应用） 23

例018　输入个人信息（Inputbox函数的应用） 24

例019　退出确认（Msgbox函数的应用） 25

3.2　分支结构 27

例020　突出显示不及格学生 27

例021　从身份证号码中提取性别 29

例022　评定成绩等级 30

例023　计算个人所得税 32

3.3　循环结构 34

例024 密码验证 34

例025　求最小公倍数和最大公约数 36

例026　输出ASCII码表 37

例027　计算选中区域数值之和 39

例028　换零钱法（多重循环） 40

3.4　使用数组 42

例029　数据排序 42

例030　彩票幸运号码 44

例031　 用数组填充单元格区域 46

第4章　Range对象操作技巧 48

4.1　获取单元格的引用 48

例032　使用A1样式引用单元格 48

例033 使用索引号引用单元格 49

例034　引用多个单元格区域 50

例035　合并单元格区域 51

例036 引用合并区域的子区域 52

例037　动态选中单元格区域 53

例038 引用相对其他单元格的单元格 54

例039　扩展单元格区域 55

例040 引用单元格交叉区域 56

例041 引用当前区域 57

例042　获取已使用区域 58

例043 引用区域内的单元格 59

例044　设置标题行格式 61

例045　选取条件格式单元格 62

例046　选择数据列末单元格 63

例047　获取某列连续数据区域 64

例048　获取多个不同长度的非连续列 65

例049 当前单元格的前后单元格 65

例050　获取三维区域 66

4.2　获取单元格信息 67

例051 获取标题行和数据行 67

例052　获取当前区域信息 68

例053　单元格区域是否有公式 69

例054　追踪公式单元格 70

例055　获取单元格地址 71

4.3　操作单元格 72

例056　合并相同值单元格 72

例057　删除指定字符后的内容 73

例058　给单元格设置错误值 75

例059　活动单元格错误类型 76

例060 自动设置打印区域 77

例061　按设置长度换行 77

例062　选择不含公式的单元格 79

例063 生成不重复随机数 80

例064　拆分单元格 82

例065　添加超链接 83

例066　删除超链接 84

例067 限制单元格移动范围 85

例068　插入批注 86

例069　隐藏／显示批注 87

例070　删除批注 87

例071 复制单元格区域 88

例072　给单元格设置公式 90

例073　复制公式 90

例074　查找并填充空白单元格 91

例075　清除单元格 92

例076　删除单元格区域 93

4.4　设置单元格格式 94

例077　按颜色统计单元格数量 94

例078　获取单元格底纹和图案 95

例079　设置页眉为单元格值 96

例080　设置日期格式 97

例081 生成大写金额 98

例082　格式化当前区域的数据 100

例083　设置自动套用格式 101

例084 突出显示当前位置 101

例085　设置边框线 103

例086　设置文本对齐格式 104

例087　单元格文本缩排 105

例088　设置文本方向 107

例089　设置自动换行格式 108

例090　设置缩小字体填充 108

例091　设置条件格式 109

例092　设置单元格图案 111

例093　合并单元格 112

第5章 Worksheet对象操作技巧 114

5.1　控制工作表集合 114

例094　增加工作表 114

例095　窗体方式新增工作表 115

例096　窗体方式删除工作表 118

例097　批量新建工作表 119

例098　获取工作表数 120

例099　循环激活工作表 121

例100　选择工作表 121

例101 选取前一个工作表／后一个工作表 122

例102　选中工作表的名称 123

例103　保护工作表 124

例104　撤销工作表的保护 126

例105　判断工作表是否存在 127

例106　工作表排序 129

例107　复制工作表 130

例108　移动工作表 131

例109　删除工作表 132

例110　删除空工作表 133

例111 密码控制删除工作表 134

例112　隐藏／显示工作表 135

例113　工作表移至最前／最后 136

例114　工作表打印页数 137

例115　重命名工作表 138

例116　设置工作表标签颜色 140

例117　导出工作表 141

5.2　操作工作表的行和列 144

例118　删除空行 144

例119　插入行 145

例120　插入多行 146

例121　插入列 147

例122 隐藏／显示行 148

例123 隐藏／显示列 149

例124　设置行高 149

例125　设置列宽 151

5.3　操作工作表 152

例126　合并工作表数据 152

例127　工作表是否被保护 153

例128　制作工作表目录 154

例129 删除图片 155

例130　修改工作表的代码名 156

5.4　控制工作表事件 158

例131　为输入数据的单元格添加批注 158

例132 自动填充相同值 159

例133　记录同一单元格多次输入值 160

例134　禁止选中某个区域 161

例135　禁止输入相同数据 162

例136　设置滚动区域 163

例137 自动添加边框线 164

例138　限制在数据区域下一行输入数据 165

例139　增加快捷菜单 166

例140　限制选择其他工作表 168

例141 自动隐藏工作表 169

例142　将原数据作批注 170

例143　输入编码 171

第6章 Workbook对象操作技巧 173

6.1　操作工作簿集合 173

例144　批量新建工作簿 173

例145　设置背景音乐 174

例146　打开工作簿 176

例147　保存工作簿 177

例148　更名保存工作簿 178

例149　将工作簿保存为Web页 180

例150　打开文本文件 181

例151　设置工作簿密码 182

例152　保护工作簿 184

例153　查看文档属性 185

例154 理命名单元格区域 187

例155　判断工作簿是否存在 190

例156　判断工作簿是否打开 191

例157　备份工作簿 192

例158　获取关闭工作簿中的值（方法1） 194

例159　获取关闭工作簿中的值（方法2） 196

例160　多工作簿数据合并 197

6.2　控制工作簿事件 199

例161 自动打开关联工作簿 199

例162　禁止拖动单元格 200

例163　设置新增工作表为固定名称 201

例164　退出前强制保存工作簿 202

例165 限制打印 203

例166　限制保存工作簿 204

例167　限制工作簿使用次数 205

例168 限制工作簿使用时间 207

例169　设置应用程序标题 207

例170　根据密码打开工作簿 209

例171 打开工作簿禁用宏 210

例172　用VBA删除宏代码 212

第7章 Application对象操作技巧 214

7.1 自定义Excel外观 214

例173 显示／关闭编辑栏 214

例174　设置状态栏 215

例175　控制鼠标指针形状 217

例176　全屏幕显示 218

例177 最大化Excel窗口 219

例178　查询计算机信息 219

7.2　设置Excel操作选项 220

例179　关闭屏幕刷新 220

例180　禁止弹出警告信息 222

例181　复制／剪切模式 223

例182　获取系统路径 224

7.3　控制应用程序 225

例183　激活Microsoft应用程序 225

例184　控制最近使用文档 226

例185　文件选择器 228

例186　快速跳转 230

例187　激活Excel 2007的功能区选项卡 232

7.4 Application对象事件处理 234

例188　工作表上显示时钟 234

例189　整点报时 235

例190 自定义功能键 236

第8章 Window对象操作技巧 238

8.1 控制窗口 238

例191 创建窗口 238

例192　调整窗口大小 239

例193 获取窗口状态 242

例194　拆分窗格 243

例195　并排比较窗口 244

例196　排列窗口 245

例197 窗口显示比例 246

8.2　控制工作表的显示选项 248

例198　工作簿显示选项 248

例199　工作表显示选项 249

例200　工作表网格线 250

例201 获取指定窗口选中的信息 252

第9章　Chart对象操作技巧 254

9.1　创建图表 254

例202　创建图表工作表 254

例203　创建嵌入图表 255

例204　转换图表类型 257

例205　删除图表 258

9.2　控制图表对象 260

例206　获取嵌入图表的名称 260

例207　获取图表标题信息 260

例208　获取图例信息 262

例209　获取图表坐标轴信息 263

例210　获取图表的系列信息 264

例211　判断工作表的类型 265

例212　重排嵌入图表 266

例213　调整图表的数据源 268

例214　为图表添加阴影 269

例215　显示数据标签 271

例216 将图表保存为图片 273

例217　设置图表颜色 274

例218　按值显示颜色 276

例219　修改嵌入图表外形尺寸 277

例220　修改图表标题 279

例221　修改坐标轴 280

例222 图表插入到Word文档 282

9.3 图表事件 283

例223　激活图表工作表 283

例224　显示图表各子对象名称 284

例225　捕获嵌入图表事件 285

第10章　用户界面设计技巧 288

10.1　使用内置对话框 288

例226　显示打开对话框（使用GetOpenFilename方法） 288

例227　显示保存文件对话框（使用GetSaveAsFilename方法） 290

例228　显示内置对话框 291

例229 用VBA调用Excel 2007功能区功能 293

10.2　创建自定义窗体 294

例230　制作Splash窗口 294

例231　控制窗体显示 295

例232　列表框间移动数据 297

例233　通过窗体向工作表添加数据 302

例234　制作多页窗体——报名登记 305

例235　通过窗体设置单元格格式 307

例236 用窗体控制工作表显示比例 308

例237　调色板窗体 311

例238　在窗体中显示图表 312

例239　制作向导窗体 314

例240　拖动窗体上的控件 317

例241　制作交通信号灯 318

例242　制作进度条 320

第11章 命令栏和功能区操作技巧 322

11.1　控制命令栏 322

例243　显示内置菜单和工具栏的ID 322

例244　创建自定义菜单 323

例245　删除自定义菜单 325

例246　创建快捷菜单 326

例247　禁止工作表标签快捷菜单 328

例248　屏蔽工作表标签部分快捷菜单 329

11.2 Excel 2007的功能区 330

例249　创建功能区选项卡 330

例250 禁用Office按钮的菜单 332

例251　在“Office按钮”中新建菜单 333

例252　重定义“Office按钮”菜单项功能 335

例253　为内置选项卡增加功能 336

第12章　Excel处理工作表数据技巧 339

12.1 处理公式 339

例254　判断单元格是否包含公式 339

例255 自动填充公式 340

例256　锁定和隐藏公式 341

例257　将单元格公式转换为数值 342

例258　删除所有公式 343

例259 用VBA表示数组公式 345

12.2　数据查询 346

例260　查找指定的值 346

例261 带格式查找 349

例262　查找上一个／下一个数据 349

例263　代码转换 351

例264　模糊查询 353

例265 网上查询快件信息 354

例266　查询基金信息 357

例267　查询手机所在地 358

例268　使用字典查询 360

12.3　数据排序 361

例269 用VBA代码排序 362

例270　乱序排序 363

例271 自定义序列排序 364

例272　多关键字排序 366

例273　输入数据自动排序 367

例274　数组排序 369

例275 使用Small和Large函数排序 370

例276　使用RANK函数排序 372

例277　姓名按笔画排序 374

12.4　数据筛选 376

例278 用VBA进行简单筛选 377

例279　用VBA进行高级筛选 378

例280 筛选非重复值 380

例281 取消筛选 381

第13章　Excel处理数据库技巧 383

13.1　用ADO访问Excel工作表 383

例282　使用ADO连接数据库 383

例283　从工作表中查询数据 384

例284　使用ADO导出数据 386

例285　汇总数据 387

例286　不打开工作簿获取工作表名称 388

13.2　处理Access数据库 390

例287　从Access中获取数据 390

例288　添加数据到Access 391

例289　创建Access数据库 393

例290　是否存在指定表 395

例291 列出数据库的表名 396

例292　列出数据表的字段信息 398

例293　修改记录 399

例294　删除记录 401

第14章　创建加载宏技巧 404

14.1　创建加载宏的方法 404

例295　创建Excel加载宏 404

例296　创建COM加载宏 408

例297 系统加载宏列表 413

14.2　常用加载宏示例 414

例298　时间提示 414

例299 大写金额转换 416

例300　计算个人所得税 418

例301 加盖公章 419

第15章　文件和文件夹操作技巧 422

15.1 用VB语句操作文件和文件夹 422

例302　显示指定文件夹的文件 422

例303　判断文件（文件夹）是否存在 424

例304　新建文件夹 425

例305　复制文件 426

例306　重命名文件或文件夹 427

例307　删除文件 429

例308　查看文件属性 430

15.2　用FSO操作文件和文件夹 432

例309　判断文件是否存在（FSO） 432

例310　分离文件名和扩展名 434

例311 新建和删除文件夹（FSO） 435

例312　复制文件（FSO） 437

例313 复制文件夹（FSO） 439

例314 列出文件夹名称 440

例315　显示文件属性 441

例316　删除所有空文件夹 442

例317　显示驱动器信息 444

第16章　文本文件操作技巧 446

16.1　用VB语句操作文本文件 446

例318　创建文本文件 446

例319　读取文本文件数据 448

例320　工作表保存为文本文件 450

例321 导出批注到文本文件 451

例322　从文本文件导入批注 453

16.2　用FSO操作文本文件 455

例323 创建文本文件（FSO） 455

例324 添加数据到文本文件（FSO） 456

例325　读取文本文件数据（FSO） 458

第17章　用Excel控制其他程序技巧 460

17.1　控制Office应用程序 460

例326　打开Word文档 460

例327　从Word文档中获取数据 462

例328　生成成绩通知书 464

例329　在Excel中打开PPT 469

例330　在Excel中创建PPT 470

例331　使用SendMail发送邮件 473

例332　用Outlook发送邮件 474

例333　导入Outlook中的邮件 476

例334　保存Outlook中的附件 478

17.2　调用其他程序 479

例335　运行系统自带程序 479

例336　在Excel中打开控制面板 481

第18章 VBE工程实用操作技巧 483

18.1　显示工程相关信息 483

例337　显示工程信息 483

例338　列出工程所有组件 485

例339　显示工作簿中VBA的过程名 486

例340　导出VBA过程代码 488

例341 列出工程引用的外部库 489

18.2　动态创建组件 490

例342　重命名组件 490

例343　导出／导入模块代码 492

例344　删除指定子过程代码 494

例345　查找代码 496

例346　增加模块 498

例347　增加类模块 500

例348　控制VBE的子窗口 501

例349　工作表中动态增加按钮 502

例350　创建动态用户窗体 504

第19章　VBA程序调试优化技巧 507

19.1 VBA程序调试技巧 507

例351　设置断点 507

例352　使用本地窗口 508

例353 使用立即窗口 510

例354　单步执行 510

例355　运行选定部分代码 512

例356　调用堆栈 513

例357　使用监视窗口 514

例358　使用条件编译 515

例359　错误处理语句 517

19.2 VBA程序优化技巧 518

例360　使用VBA已有功能 518

例361　避免使用变体 520

例362　使用对象变量 521

例363　使用数组处理单元格 522

例364　检查字符串是否为空 522

例365　优化循环体 523

例366　使用For Each循环 525

例367　关闭屏幕刷新 526

例368　使用内置函数 527