Excel VBA 两个表中查询相同的记录、不同的记录 例程
本文将详细介绍如何使用 Excel VBA 在两个表中查询相同的记录、不同的记录。这个程序可以帮助用户快速地查询出两个表中的共同记录和不同记录，从而提高工作效率。
我们需要了解程序的基本结构。这个程序主要包括四个部分：Sheet1、Sheet2、Sheet3 和 VBA 代码。其中，Sheet1 和 Sheet2 是数据存放表，Sheet3 是查询结果显示表。VBA 代码是程序的核心，它负责连接数据库、执行查询语句和显示查询结果。
在 VBA 代码中，我们首先需要连接数据库。这里使用了 ADO 连接，需要对 ADO 进行引用，否则会出现错误提示。连接串的格式如下：
`conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties='Excel 12.0 Macro;HDR=YES';Data Source=" & ThisWorkbook.FullName`
接着，我们需要编写查询语句。查询语句的格式如下：
`sql = "select [Sheet1$].num_id from [Sheet1$],[Sheet2$] where [Sheet1$].num_id=[Sheet2$].num_id"`
这个查询语句将查询出两个表中相同的记录，並将结果显示在 Sheet3 中。
如果我们想查询出两个表中的不同记录，可以使用以下查询语句：
`sql = "select * from [Sheet1$] where [Sheet1$].num_id not in (select [Sheet2$].num_id from [Sheet2$])"`
这个查询语句将查询出 Sheet1 中存在但 Sheet2 中不存在的记录。
类似地，我们可以使用以下查询语句查询出 Sheet2 中存在但 Sheet1 中不存在的记录：
`sql = "select * from [Sheet2$] where [Sheet2$].num_id not in (select [Sheet1$].num_id from [Sheet1$])"`
我们可以使用以下查询语句查询出两个表中的所有不同记录：
`sql = "select num_id from [Sheet1$] where [Sheet1$].num_id not in (select [Sheet2$].num_id from [Sheet2$]) union select num_id from [Sheet2$] where [Sheet2$].num_id not in (select [Sheet1$].num_id from [Sheet1$])"`
这个查询语句将查询出两个表中的所有不同记录，並将结果显示在 Sheet3 中。
本文详细介绍了如何使用 Excel VBA 在两个表中查询相同的记录、不同的记录。这个程序可以帮助用户快速地查询出两个表中的共同记录和不同记录，从而提高工作效率。
2024-08-16 14:43:42
46KB
1
通过excel vba辅助背单词，实现一键获取音标、解释，可进行英美音的发音。适用于中学生、大学生、考研等上班族需要进行单词背诵的相关人员。
也可帮助对excel 宏、vba
技术感兴趣的人员，通过vba对json接口调用、音频播放等
2024-06-19 10:33:29
111KB
1
在Excel VBA平台下进行测绘数据处理自定义函数的开发,不仅高效便捷,而且还可以与工作表单元格(区域)之间进行数据的输入与输出,以实现动态化运算,提高数据处理的工作效率。文中结合具体案例,较详细地介绍了基于Excel VBA自定义函数开发的语法格式、使用方法及其主要代码实现,以方便开发人员参考借鉴。
2024-03-02 17:22:59
169KB
1
Excel VBA程序开发自学宝典是Excel VBA初学者的基础教材，讲述了VBA语言的基础语法与常见对象的综合应用。以及数组、正则表达式、自定义函数、设计窗体、FSO、类模块知识、注册表、功能区设计等知识点。附件是其中的一些案例文件，希望能帮助到大家。
2023-11-29 23:56:08
19.36MB
1