ExcelVBA与数据库整合应用范例精讲

周晗露

给一好东西大家分享！望大家喜欢，我也是在网上找来的。

Fae

哈哈，先占个位置好好学习！

来生缘

基本上是代码，没有讲解

LAOMALIN

谢谢分享,慢慢研究下,说不定我已经有这个了

cyano

楼主说得详细点嘛，起码有个目录呀

赵国辉

very good，大体浏览了一下工作簿名称，一看就知道是好东西了

hanter007

好东西,如果能有讲解就更加好了..呵呵

alzeng

如果书的章节目录会更好，书籍内容就不奢望了，^_^

alzeng

So了个章节目录，大家参照：
第1章  动态创建Access数据库和数据表 1
实例1-1  利用DAO创建数据库和数据表 1
实例1-2  利用ADOX创建数据库和数据表 6
实例1-3  利用SQL语句创建数据库和数据表 10
实例1-4  在已有的数据库中创建数据表（DAO） 13
实例1-5  在已有的数据库中创建数据表（ADOX） 14
实例1-6  在已有的数据库中创建数据表（SQL，Command对象） 16
实例1-7  在已有的数据库中创建数据表（SQL，Recordset对象） 17
实例1-8  利用Access对象创建数据库和数据表 18
实例1-9  利用Access对象在已有的数据库中创建数据表 23
实例1-10  利用工作表数据创建数据表（ADOX） 25
实例1-11  利用工作表数据创建数据表（ADO+SQL） 28
实例1-12  利用工作表数据创建数据表（DAO） 30
实例1-13  利用已有的数据表创建新数据表（ADO） 33
实例1-14  利用已有的数据表创建新数据表（DAO） 36
实例1-15  利用已有的数据表创建新数据表（Access） 37
第2章  获取Access数据库信息 40
实例2-1  检查数据表是否存在（ADO） 40
实例2-2  检查数据表是否存在（ADOX） 47
实例2-3  检查数据表是否存在（DAO） 48
实例2-4  检查数据表是否存在（Access） 49
实例2-5  获取数据库中所有表的名称和类型（ADO） 51
实例2-6  获取数据库中所有表的名称和类型（ADOX） 52
实例2-7  获取数据库中所有的表名称（DAO） 53
实例2-8  获取数据库中所有数据表名称（ADO） 55
实例2-9  获取数据库中所有数据表名称（ADOX） 56
实例2-10  获取数据库中所有数据表名称（DAO） 57
实例2-11  获取数据库中所有数据表名称（Access） 58
实例2-12  检查某字段是否存在（ADO） 59
实例2-13  检查某字段是否存在（ADOX） 61
实例2-14  检查某字段是否存在（DAO） 62
实例2-15  检查某字段是否存在（Access） 63
实例2-16  获取数据库中某数据表的所有字段信息（ADO） 64
实例2-17  获取数据库中某数据表的所有字段信息（ADOX） 67
实例2-18  获取数据库中某数据表的所有字段信息（DAO） 68
实例2-19  获取数据库中某数据表的所有字段信息（Access） 70
实例2-20  获取数据库的所有查询信息（ADOX） 72
实例2-21  获取数据库的所有查询信息（DAO） 73
实例2-22  获取数据库的模式信息（OpenSchema） 75
实例2-23  获取表的创建日期和最后更新日期（ADOX） 76
实例2-24  获取表的创建日期和最后更新日期（DAO） 78
第3章  查询获取Access数据库记录数据 81
实例3-1  将数据库记录数据全部导入到Excel工作表（ADO，之一） 82
实例3-2  将数据库记录数据全部导入到Excel工作表（ADO，之二） 85
实例3-3  将数据库记录数据全部导入到Excel工作表（ADO，之三） 87
实例3-4  将数据库记录数据全部导入到Excel工作表（DAO，之一） 89
实例3-5  将数据库记录数据全部导入到Excel工作表（DAO，之二） 90
实例3-6  将数据库记录数据全部导入到Excel工作表（QueryTable集合） 92
实例3-7  将数据库的某些字段的记录数据导入到Excel工作表（ADO） 95
实例3-8  将数据库的某些字段记录数据导入到Excel工作表（DAO） 97
实例3-9  查询前面的若干条记录（全部字段）（TOP） 98
实例3-10  查询前面的若干条记录（部分字段）（TOP） 100
实例3-11  查询不重复的字段记录（DISTINCT） 102
实例3-12  利用Like运算符进行模糊查询 103
实例3-13  查询某一区间内的记录（BETWEEN） 106
实例3-14  查询存在于某个集合里面的记录（IN） 108
实例3-15  将查询结果进行排序（ORDER BY） 110
实例3-16  进行复杂条件的查询（WHERE） 112
实例3-17  利用合计函数进行查询（查询最大值和最小值） 114
实例3-18  利用合计函数进行查询（查询合计值和平均值） 115
实例3-19  将一个查询结果作为查询条件进行查询 118
实例3-20  将查询结果进行分组（GROUP BY） 120
实例3-21  将查询结果进行分组（HAVING） 122
实例3-22  通过计算列进行查询 124
实例3-23  使用IS NULL运算符进行查询 127
实例3-24  使用COUNT函数进行查询 128
实例3-25  使用FIRST函数与LAST函数查询第一条记录和最后一条记录的字段 130
实例3-26  使用Parameters参数动态查询记录（DAO）：指定单个参数 131
实例3-27  使用Parameters参数动态查询记录（DAO）：指定多个参数 134
实例3-28  使用Parameters参数动态查询记录（ADO）：指定单个参数 136
实例3-29  使用Parameters参数动态查询记录（ADO）：指定多个参数 138
实例3-30  使用别名查询数据库 140
实例3-31  将查询结果作为窗体控件的源数据 142
实例3-32  通过窗体控件查询浏览数据库记录 146
实例3-33  多表查询（WHERE连接） 161
实例3-34  多表查询（内连接INNER JOINT） 163
实例3-35  多表查询（左外连接LEFT OUTER JOINT） 165
实例3-36  多表查询（右外连接RIGHT OUTER JOINT） 167
实例3-37  多表查询（子查询WHERE，ANY，SOME） 169
实例3-38  多表查询（子查询EXISTS，NOT  EXISTS） 171
实例3-39  从两个数据表中查询出都存在的记录 173
实例3-40  从两个数据表中查询出只存在于某个数据表的记录 176
实例3-41  将查询结果生成一个数据表 178
实例3-42  将查询结果保存为一个XML文件 179
实例3-43  利用工作表实现记录的分页显示 181
实例3-44  利用窗体实现记录的分页显示 187
第4章  编辑Access数据库数据 193
实例4-1  添加新记录（ADO+AddNew） 193
实例4-2  添加新记录（ADO+SQL） 195
实例4-3  添加新记录（DAO+AddNew） 196
实例4-4  添加新记录（DAO+SQL） 198
实例4-5  添加新记录（Access+SQL） 199
实例4-6  修改更新特定记录（ADO+SQL） 201
实例4-7  修改更新特定记录（DAO+SQL） 202
实例4-8  修改更新特定记录（Access+SQL） 203
实例4-9  修改更新全部记录（ADO+SQL） 203
实例4-10  修改更新全部记录（DAO+SQL） 205
实例4-11  修改更新全部记录（Access+SQL） 206
实例4-12  删除特定记录（ADO+SQL） 207
实例4-13  删除特定记录（DAO+SQL） 208
实例4-14  删除特定记录（Access+SQL） 209
实例4-15  删除全部记录（ADO+SQL） 209
实例4-16  删除全部记录（DAO+SQL） 210
实例4-17  删除全部记录（Access+SQL） 211
实例4-18  通过窗体编辑记录 212
第5章  将Excel工作表数据导入到Access数据库 217
实例5-1  将整个工作表数据都保存为新Access数据库（Access） 218
实例5-2  将工作表的某些区域数据保存为新Access数据库（Access） 221
实例5-3  将工作簿的所有工作表数据分别保存为不同的数据表（Access） 222
实例5-4  将多个工作簿的某个工作表数据汇总为新Access数据库（Access） 224
实例5-5  将多个工作簿的某个工作表数据保存为不同的数据表（Access） 227
实例5-6  将工作表数据保存到已有的Access数据库（循环方式）（ADO） 229
实例5-7  将工作表数据保存到已有的Access数据库（循环方式）（DAO） 232
实例5-8  将工作表数据保存到已有的Access数据库（数组方式）（ADO） 234
实例5-9  将工作表数据保存到已有的Access数据库（数组方式）（DAO） 236
实例5-10  将工作簿的所有工作表数据分别保存为不同的数据表（ADO） 238
实例5-11  将工作簿的所有工作表数据分别保存为不同的数据表（DAO） 240
第6章  操作Access数据表 242
实例6-1  打开数据库和数据表（GetObject函数） 242
实例6-2  打开数据库和数据表（CreateObject函数） 245
实例6-3  删除数据表（ADO） 246
实例6-4  删除数据表（ADOX） 247
实例6-5  删除数据表（DAO+DELETE） 248
实例6-6  删除数据表（DAO+SQL） 249
实例6-7  删除数据表（Access） 250
实例6-8  为数据表增加字段（ADO） 251
实例6-9  为数据表增加字段（ADOX） 253
实例6-10  为数据表增加字段（DAO） 254
实例6-11  为数据表增加字段（Access） 256
实例6-12  删除字段（ADO） 257
实例6-13  删除字段（ADOX） 259
实例6-14  删除字段（DAO） 260
实例6-15  删除字段（Access） 262
实例6-16  改变字段的类型（ADO） 264
实例6-17  改变字段的类型（DAO） 265
实例6-18  改变字段的类型（Access） 266
实例6-19  改变字段的长度（ADO） 266
实例6-20  改变字段的长度（DAO） 268
实例6-21  改变字段的长度（Access） 268
实例6-22  重命名数据表（Access） 269
实例6-23  复制数据表（Access） 270
实例6-24  复制数据表（ADO） 272
实例6-25  复制数据表（DAO） 273
实例6-26  通过窗体维护数据库 274
第7章  操作SQL Server数据库 291
实例7-1  判断SQL Server数据库是否存在（ADO） 291
实例7-2  检查数据表是否存在（ADOX） 292
实例7-3  创建新的SQL Server数据库和数据表（ADO） 294
实例7-4  在已有的SQL Server数据库中创建数据表（ADO） 298
实例7-5  从SQL Server数据库服务器中删除数据库（ADO） 299
实例7-6  从SQL Server数据库中删除数据表（ADO） 300
实例7-7  将SQL Server数据库中的数据导入到Excel工作表（ADO） 301
实例7-8  将SQL Server数据库中的数据导入到Excel工作表（DAO） 303
实例7-9  查询获取SQL Server数据库的数据（ADO） 305
实例7-10  查询获取SQL Server数据库的数据（DAO） 307
实例7-11  将工作表数据导入到SQL Server数据库（ADO） 308
实例7-12  向SQL Server数据库中添加记录的一般方法 311
实例7-13  将SQL Server数据库转换为Access数据库 313
实例7-14  将Access数据库转换为SQL Server数据库 315
第8章  操作FoxPro数据库 319
实例8-1  将FoxPro数据库全部数据导入到Excel工作表 319
实例8-2  查询获取FoxPro数据库数据 321
实例8-3  将Excel工作表数据保存到FoxPro数据库 323
实例8-4  判断FoxPro数据库的字段是否存在 325
实例8-5  获取FoxPro数据库的字段信息 326
第9章  将Excel工作簿当作数据库来操作 329
实例9-1  从工作簿的某个工作表中查询获取数据（ADO） 329
实例9-2  从工作簿的全部工作表中查询获取数据（ADO） 331
实例9-3  利用DAO从工作表中查询数据 333
实例9-4  查询其他工作簿的数据（ADO） 335
实例9-5  获取其他工作簿中的工作表名称清单（ADOX） 336
实例9-6  利用ADO对工作表数据进行多重排序 337
实例9-7  利用ADO按照字符的长度对数据进行排序 339
实例9-8  比较两张表，将两个表中相同的行数据抓取出来 341
实例9-9  比较两张表，将只存在于某个表中的行数据抓取出来 343
实例9-10  删除工作表数据区域内的所有空行 346
第10章  将文本文件当作数据库来操作 349
实例10-1  利用ADO导入文本文件的全部内容 349
实例10-2  利用DAO导入文本文件的全部内容 351
实例10-3  利用ADO导入文本文件的部分内容 353
实例10-4  利用DAO导入文本文件的部分内容 354
实例10-5  利用ADO获取文本文件的行数和列数 356
实例10-6  利用ADO将超过65536行的文本文件数据导入到Excel工作表 358
实例10-7  将工作表全部数据保存为文本文件（SaveAs） 360
实例10-8  将工作表全部数据保存为文本文件（循环） 361
实例10-9  将数据库数据导出为文本文件 362
实例10-10  将文本文件保存为Access数据库（Access） 364
实例10-11  将文本文件保存为Access数据库（ADO+ADOX） 367
第11章  Excel VBA开发数据库管理系统 370
11.1  固定资产管理系统的总体设计 370
11.1.1  固定资产管理系统功能模块 370
11.1.2  固定资产管理系统数据库和数据表的设计 371
11.1.3  设计系统工作簿 373
11.1.4  设计系统的自定义菜单 374
11.1.5  引用对象库 377
11.2  系统管理模块设计 377
11.2.1  用户名和密码的保存 378
11.2.2  “用户登录”窗口结构设计 378
11.2.3  “用户登录”窗体程序代码设计 378
11.2.4  “修改用户名”窗体结构设计 381
11.2.5  “修改用户名”窗体的程序代码设计 381
11.2.6  “修改密码”窗体结构设计 382
11.2.7  “修改密码”窗体的程序代码设计 382
11.3  基础资料管理模块设计 383
11.4  固定资产日常管理模块设计 384
11.4.1  固定资产日常管理窗体的结构设计 384
11.4.2  固定资产日常管理窗体的程序代码设计 386
11.4.3  “固定资产查询”窗体的结构设计 393
11.4.4  “固定资产查询窗体”的程序代码设计 394
11.4.5  固定资产日常管理模块的应用 402
11.5  报表输出模块设计 404
11.5.1  固定资产折旧计算方法 404
11.5.2  生成固定资产卡片子模块的设计 407
11.5.3  生成统计报表子模块的设计 413
11.5.4  生成固定资产折旧表子模块的设计 421
11.5.5  编制折旧费用分配表子模块的设计 423
11.6  系统菜单转换模块的设计 427
11.6.1  恢复Excel系统菜单 427
11.6.2  恢复固定资产管理系统自定义菜单 428
11.7  为工作簿指定Open和BeforeClose事件 429
11.7.1  为工作簿指定Open事件 429
11.7.2  为工作簿指定BeforeClose事件 429

周晗露

alzeng谢谢汇总！