Excel VBA范例大全与Excel 2002/2003版本兼容PDF电子书下载

第1部分　单元格选择技巧与选区统计 2

第1章　单元格与区域选择技巧 2

实例1　选择A列最后一个非空单元格 3

实例2　基于指定位置的偏移量的选取 5

实例3　选择当前列最大值 6

实例4　选择负数单元格 8

实例5　选择单元格所在区域及工作表已用区域 10

实例6　选择数组公式区域 12

实例7　返回单元格合集与交集 13

实例8　选择背景色为黄色的单元格 14

实例9　选择字体为蓝色之单元格 16

实例10　选择粗线边框之单元格 17

实例11 反向选择工作表 19

实例12　选择单元格区域但排除首行标题 20

实例13　每隔三行选一行 21

实例14　选择奇数列 22

第2章　多表单元格选择 24

实例15　同时选择三个表的B2:B11区域 25

实例16　选择本表以外所有工作表的B2:B11区域 25

实例17　选中名字包含“星期”的工作表的已用区域 26

第3章　对选区进行基本统计 28

实例18　提取选区地址并计数 29

实例19　判断选区隐藏的单元格个数 30

实例20　列出隐藏的单元格地址 31

实例21　统计空白单元格个数 32

实例22　统计公式个数 33

实例23　计算已用行列数 34

实例24　统计带批注之单元格个数 35

实例25　统计选区格式为“常规”之单元格个数 36

实例26　分别统计选区中文本与字母、数字个数 37

实例27　统计选区中负数个数 39

本部分小结 41

第2部分　单元格数据处理的技巧 44

第4章　选区数据转换 44

实例28　将选区公式转换成数值 45

实例29　将当前区域公式转换成数值 47

实例30　将数字转换为文本 49

实例31 自动将小写转换为大写 49

实例32　将英文转换为首字母大写 50

第5章　修改选区格式 52

实例33　修改日期格式 53

实例34　将零值替换为空 53

实例35　将区域数据改成以“万”为单位 54

实例36　将“＃”号以上标显示 55

实例37　修改任意字符为上标 57

实例38　为任意字符添加下划线 58

实例39　在任意字符上方添加着重符 60

实例40　数据重排 61

第6章　修改选区数据 63

实例41 区域数据互换 64

实例42　填充空白单元格 65

实例43　填充公式 66

实例44　批量填充单元格数据 67

实例45　删除“不采用”建议字符所在行 69

实例46　瞬间删除空白行 70

实例47　瞬间删除空白单元格所在行 71

实例48　瞬间删除选区空格 72

实例49　行列之隐藏与取消 73

实例50　符合三个条件则汇总数据 74

实例51　汇总行列值 76

第7章　控制选区的不重复值 78

实例52　统计字符在选区中的重复次数 79

实例53　报告重复数据的地址 80

实例54　检查重复数据的重复次数 81

实例55　统计选区中不重复数据个数 82

实例56　提取单列数据之不重复值 83

实例57　提取多列数据之不重复值 84

实例58　单列中不允许输入重复值 86

实例59　双列不允许输入重复值 87

实例60　跨工作表控制不重复值 88

第8章　链接功能的使用 90

实例61　单元格链接 91

实例62　工作表链接 92

实例63　删除工作表中数据链接 93

实例64　删除工作表自动添加的网址及Mail地址链接 94

第9章　批注功能的使用 96

实例65　快捷键添加日期批注并自动缩放 97

实例66　批量添加批注 98

实例67　批量删除批注 99

实例68　为指定列数据添加批注 100

实例69　添加图片背景批注 101

实例70　添加个性化批注 102

实例71　批量修改批注外观 107

实例72　为公式添加标注 109

第10章　合并单元格相关操作 111

实例73　全选合并单元格 112

实例74　将所有合并单元格加上背景 113

实例75　取消所有合并单元格之合并属性 114

实例76　取得合并单元格的首个和末尾地址 114

实例77　合并数据并居中 115

实例78　合并数据并粘贴 116

实例79　批量合并单元格 118

实例80　指定列取消合并同时恢复数据 118

实例81　取得合并单元格数目 119

实例82　报告合并单元格地址 120

实例83　对所有合并单元格添加批注并标示序数 121

实例84　将已用区域合并取消且填充空白单元格 122

第11章　数据查询与替换 124

实例85　查找单价 125

实例86　多表成绩搜索 126

实例87　电话簿查询 127

实例88　循环嵌套进行工号查询 129

实例89　将工作表中“PC”批量替换成电脑 130

实例90　将大于等于60的考分替换成“合格” 130

第12章　处理名称 132

实例91　对区域及图片、图表命名 133

实例92　显示与隐藏名称 134

实例93　将包含指定名称的对象隐藏 135

实例94　利用名称动态求和 136

第13章　其他应用 137

实例95　发邮件及开启网址 138

实例96　放大单元格数据 139

实例97　产生不重复随机数 140

实例98　将含有分隔符之数据转为下拉列表 141

实例99　生成带圈之编号 141

实例100　单元格动态显示时间 143

实例101　根据指定最大值和最小值求所有数据之和 145

实例102　根据勾股定理求弦长 145

实例103　输入三边长求三角形面积 146

实例104　指定时间出现“会议时间到”的提示 147

本部分小结 149

第3部分　条件格式及数据突显方式 152

第14章　条件格式及其他数据突显方式 152

实例105　利用字体颜色突出显示当前行 153

实例106　利用特殊字体突显男生成绩 154

实例107　灰色底纹显示优异成绩之成员 155

实例108　对区域中最大值添加下划线 156

实例109　对区域中超过平均值之数据加粗倾斜 157

实例110　用彩色条标示区域值的大小 158

实例111　用三色交通灯图标标示成绩 159

实例112　将重复值加上虚框 161

实例113　圈释目标 162

第15章　管理条件格式规则 164

实例114　在已有条件格式区域增加条件 165

实例115　删除条件格式 165

实例116　修改工作表中的条件格式 166

实例117　提升第三个条件优先级为1 167

本部分小结 169

第4部分　排序 172

第16章　对数字和文本排序 172

实例118　对选区数字以升序排序 173

实例119　对选区文本以字母顺序升序排序 174

实例120　对选区文本以笔画顺序降序排序 175

实例121　对选区数据按拼音排序并区分大小写 176

实例122　对选区数据按笔画排序并区分大小写 177

第17章　按颜色排序 179

实例123　按单元格背景颜色对当前列排序 180

实例124　按单元格字体颜色对当前列排序 181

实例125　按字体颜色扩展排序 182

第18章　多条件排序 184

实例126　双条件排序：首列数值升序、次列笔画降序 185

实例127　背景色和拼音单列双条件排序 186

本部分小结 187

第5部分　数据筛选 190

第19章　单条件筛选 190

实例128　筛选大于60分之成绩 191

实例129　筛选小于等于60分之数据 192

实例130　筛选高于平均值之数据 192

实例131　筛选前五个最大值 194

实例132　筛选不包含指定字符之数据 195

实例133　按颜色筛选数据 196

第20章　双条件筛选 197

实例134　排除大于90和小于60之数据 198

实例135　筛选出小于等于90的数据但不包括70 198

实例136　限定长度且排除某字符之筛选 199

实例137　限定长度且排除某字符之筛选 200

第21章　清除筛选 201

实例138　去除当前区域中的筛选状态 202

实例139　去除单列筛选条件 202

本部分小结 204

第6部分　处理图形和艺术字 206

第22章　图形的基本操作 206

实例140　生成椭圆图形 207

实例141　修改图形边框色与宽度 208

实例142　旋转图形 209

实例143　图形的批量删除 210

实例144　隐藏与显示图形 211

实例145　移动图形并填充 212

实例146　批量导出图形至硬盘 213

实例147　将单元格区域转换成图片 214

实例148　检测哪些单元格被图形覆盖 214

第23章　使用艺术字 216

实例149　插入艺术字 217

实例150　修改艺术字外形及样式 218

第24章　图形的综合运用 220

实例151　将所有图形垂直与水平翻转 221

实例152　复制签名 222

实例153　动态旋转图形 223

实例154　制作风扇 225

实例155　取得指定文件夹下图片名称 226

实例156　批量调整图片适合单元格大小 227

实例157　旋转艺术字 228

实例158　让图片跟随鼠标 229

实例159　根据名称显示图形 230

实例160　批量修改复选框的值 231

实例161　按姓名插入图片 232

第25章　图片在窗体中的运用 234

实例162　将工作表填充至窗体 235

实例163　加载窗体图片 236

实例164　在窗体中预览图片 237

实例165　随机更换图片 239

本部分小结 240

第7部分　处理图表 242

第26章　编辑图表 242

实例166　显示／隐藏标签和网格线 243

实例167　编辑标题 244

实例168　用图片填充背景墙 245

实例169　动态显示当前列数据之图表 246

实例170　利用名称动态显示图表内容 247

实例171　利用图表制作进度条 248

实例172　批量修改数据标签 249

实例173　随心所欲显示图表类型 251

第27章　图表至图片之转换 253

实例174　将图表转换成图片 254

实例175　让图表显示在窗体中 254

本部分小结 256

第8部分　控制工作表 258

第28章　工作表的建立、删除、改名与排序 258

实例176　新建工作表 259

实例177　批量新建工作表 260

实例178　禁止新增工作表 261

实例179　不同工作簿间移动工作表 262

实例180　启用宏方可进入指定工作表 262

实例181　禁止进入工作表 263

实例182　禁止查看某表以外的工作表 265

实例183　判断工作簿中是否包含指定的工作表 266

实例184　删除汇总表以外的所有分表 266

实例185　删除工作簿中所有空白工作表 267

实例186　禁止修改工作表表名 268

实例187　禁止工作簿另存 269

实例188　恢复所有工作表的默认名称 270

实例189　工作表表名排序 271

实例190　语音提示工作表表名 272

第29章　保存与备份工作表 274

实例191　定时保存 275

实例192　保存时自动备份文件 276

第30章　工作表显示 277

实例193　工作表批量显示与隐藏 278

实例194　全屏及最小化工作表 280

实例195　根据分辨率调整视图 281

第31章　工作表导入与导出 283

实例196　后台打开Excel文件 284

实例197　调用文件打开对话框 285

实例198　向其他工作表追加数据 286

实例199　打开数据库 287

实例200　打开文本文件 288

实例201　导出工作表到Txt文件 290

实例202　调用最近打开过的文件 292

实例203　每次进入同一工作表 292

第32章　工作表目录 294

实例204　建立菜单式工作表目录 295

实例205　在工作表中建立目录 297

实例206　在单个单元格中建立工作表目录 299

实例207　返回工作表目录 301

第33章　用工作表播放音乐 302

实例208　工作表播放MP3 303

实例209　播放背景音乐 304

第34章　工作表事件的运用 305

实例210　右键单击事件的运用 306

实例211 工作表激活事件的运用 308

实例212　双击事件的运用 309

实例213　改变事件的运用 310

实例214　工作表事件综合运用 311

本部分小结 313

第9部分　多工作表操作 316

第35章　多表数据运算与透视 316

实例215　多表数据录入 317

实例216　多表求和 319

实例217　多表数据透视之一 320

实例218　多表数据透视之二 322

第36章　工作表拆分 324

实例219　工作表拆分（乱序） 325

实例220　工作表拆分（升序） 326

实例221　将多工作表拆分成多工作簿 327

第37章　工作表合并 330

实例222　多表数据合并 331

实例223　多工作簿数据合并到本工作簿 332

实例224　多工作簿合并到本工作表 334

本部分小结 336

第10部分　工作表页面设置与打印 338

第38章　页面设置 338

实例225　取得当前工作表页数 339

实例226　页面设置 341

实例227　按条件插入分页符 342

实例228　将单元格数据转化为页脚 343

实例229　分页小计与累计 345

第39章　打印 349

实例230　一次打印多个工作表 350

实例231　打印当前光标所在页 350

实例232　禁止打印当前工作表 352

本部分小结 354

第11部分　工作簿安全处理 356

第40章　文件加锁 356

实例233　指定用户名方可开启本工作簿 357

实例234　只有本电脑方可打开本工作簿 359

实例235　工作表反向加密 360

实例236　不用密码锁定编辑区域 362

实例237　锁定鼠标移动范围 363

实例238　批量保护工作表 364

第41章　文件与代码自我删除 366

实例239　文件定时自杀 367

实例240　文件只能使用三次 367

实例241　VBA代码自杀 369

实例242　删除指定字符则工作簿自杀 370

本部分小结 372

第12部分　文件与目录 374

第42章　创建与管理文件 374

实例243　批量创建工作簿 375

实例244　文件复制并命名 376

实例245　获取与修改文件创建日期 377

实例246　生成桌面快捷方式 380

第43章　获取文件属性 383

实例247　判断文件大小及文件修改时间 384

实例248　取得文件路径 385

实例249　判断文件夹中指定文件是否存在 386

实例250　列举指定文件夹下所有Excel文件 387

实例251　报告指定文件夹下隐藏文件个数 388

第44章　管理文件夹 390

实例252　查看与修改目录属性 391

实例253　列出D盘所有目录 392

实例254　枚举磁盘名及数目 392

实例255　建立与删除目录 393

实例256　打开指定网上邻居与桌面 394

实例257　删除空文件夹 395

实例258　获取磁盘卷标和可用空间 397

本部分小结 398

第13部分　窗体与控件 400

第45章　窗体基本属性 400

实例259　枚举窗体属性 401

实例260　窗体基本属性设置 402

实例261　窗体之装载与卸载 403

第46章　窗体显示模式 405

实例262　窗体显示在屏幕中央 406

实例263　窗体全屏显示 406

实例264　为窗体添加最大化、最小化按钮 407

实例265　为窗体添加图标 408

实例266　去除窗体标题与边框 409

实例267　将窗体置于上层 410

实例268　去除与复位窗体的关闭按钮 411

实例269　让窗体在指定时间逐渐退出 412

第47章　窗体事件的运用 414

实例270　运行窗体时隐藏程序 415

实例271　单击修改背景、双击修改标题 415

实例272　鼠标移过时隐藏图片控件 416

实例273　右击窗体循环显示艺术字 417

实例274　移动窗体时报告窗体坐标 418

实例275　将Alt+F4键关闭窗体改用Esc键 419

实例276　关闭窗体时报告窗体中控件数目 420

实例277　单击拖动窗体 421

实例278　移动窗体中的控件并显示控件坐标 422

第48章　文本框 423

实例279　控制文本框的层次 424

实例280　设置文本框的密码样式 425

实例281　强制用户输入数字 425

实例282　批量锁定／解除文本框 426

实例283　文本框输入完毕后自行执行命令 427

实例284　利用滚动条控制文本框数字 428

实例285　通过文本框向工作表添加不重复订单号 430

第49章　列表框 432

实例286　列表框数据之导入与导出 433

实例287 向列表框追加数据 435

实例288　两个列表框之间的内容转移 436

实例289　用列表框调用动态数据 438

实例290　利用列表框查询成绩 439

实例291　用列表框控件打造增强型数据有效性 441

第50章　组合框 443

实例292　用组合框打造增强型数据有效性 444

实例293　添加不重复值到组合框 445

第51章　网页控件 447

实例294　在窗体中调用网页 448

实例295　在窗体中建立网页 449

实例296　窗体中使用滚动文字 450

实例297　窗体中显示G1F动画 451

第52章　Flash控件 453

实例298　在窗体中嵌入Flash时钟 454

实例299　控制Flash的播放 455

第53章　图像控件 457

实例300　图片的缩放与排列 458

实例301　用复合框控制图片显示 459

实例302　让图片循环滚动 460

实例303　用图像控件打造动态按钮 461

第54章　窗体与控件的综合运用 463

实例304　利用日历控件输入日期 464

实例305　一个按钮执行两个不同程序 466

实例306　让控件适合窗体的缩放 467

实例307　设计密码验证登录框 468

实例308　制作百叶窗效果的欢迎画面 470

实例309　利用圆窗体与网页打造时钟 472

本部分小结 474

第14部分　自定义函数 476

第55章　数值运算类 476

实例310　按字体色求和 477

实例311　分数型数据转换求和 479

实例312　求前N位数据和 481

实例313　按业绩与工龄计算提成额 481

实例314　N次方和 482

实例315　去首尾求平均 483

实例316　根据边长求三角形周长和面积 484

实例317　对指定范围求和与求积 485

第56章　引用类 487

实例318　引用区域唯一值 488

实例319　获取单元格格式 488

实例320　引用区域中非空值 489

实例321　枚举工作表名 490

实例322　返回列号对应之英文字母 491

第57章　文本处理类 493

实例323　按分割符取数 494

实例324　分离数字 495

实例325　字符连接 495

实例326　从右向左查找字符在某字符串中的位置 496

实例327　返回单元格之批注 497

实例328　根据身份证号返回性别 498

实例329　人民币大写 499

本部分小结 500

第15部分　设置界面与菜单 502

第58章　定义Excel显示方式 502

实例330　屏蔽Excel部分显示功能 503

实例331 自定义状态栏进度条 504

实例332　打造增强型状态栏 505

实例333　状态栏滚动显示日期 507

第59章　定义功能区菜单 509

实例334　枚举所有菜单 510

实例335　在功能区建立自己的工具按钮 511

实例336　添加工作表标签菜单 514

实例337 自定义按钮图标 515

实例338　制作三级菜单 517

实例339　禁用与隐藏自定义菜单项 520

实例340　生成图表专用菜单 522

第60章　定义快捷键 525

实例341　禁用与启用快捷键 526

实例342　制作七彩文字并指定快捷键 527

实例343　用F4键重复执行——批量添加批注 528

第61章　定义右键菜单 531

实例344　禁用右键前三个选项 532

实例345　在右键中建立工作表目录 533

实例346　为右键赋予新功能——选区缩放 535

实例347　添加“返回首页”功能于右键中 536

本部分小结 538

第16部分　加载宏 540

第62章　工作簿转换为加载宏 540

实例348　手工转换工作簿为加载宏 541

实例349　用代码转换工作簿为加载宏 542

第63章　加载宏的加载与卸载 546

实例350　加载宏的加载与卸载 547

本部分小结 549

第17部分　综合实例运用 552

第64章　多功能通讯簿 552

本部分小结 581

附录A　VBA常用内部函数及其参数 582

第65章　人事资料管理 567

附录B　VBA数据类型说明及其标识符 586