Excel VBA与数据库整合应用范例精讲PDF电子书下载

第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-21 改变字段的长度（Access） 268

实例6-20 改变字段的长度（DAO） 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-1 从工作簿的某个工作表中查询获取数据（ADO） 329

第9章 将Excel工作簿当作数据库来操作 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