利用宏录制，打造Excel简易查询小系统，轻轻松松搞定数据筛选！

2023-10-11 16:13:44

在数据处理的江湖里，查询可谓是一门必修课。面对浩瀚如海的数据，如何快速、准确地从中筛选出所需信息，一直是困扰着不少职场侠客的难题。如果你还在每次筛选都手忙脚乱地捣鼓着筛选功能，那不妨试试宏录制这一招，轻松打造你的Excel简易查询小系统，分分钟搞定数据筛选！

什么是宏录制？

宏录制，顾名思义，就是将一系列操作步骤录制下来，并保存为一个宏命令。当需要重复执行这些操作时，只需运行宏命令即可。这就好比在Excel中请了一位“自动化小助手”，帮你把繁琐重复的工作一网打尽。

如何录制宏？

打开需要录制宏的Excel工作簿。
在“开发工具”选项卡中，找到“录制宏”按钮。
在弹出的“录制宏”对话框中，为宏命名，选择存储位置，然后点击“确定”按钮。
开始执行需要录制的操作，例如：筛选数据、复制粘贴、格式化单元格等。
完成操作后，点击“停止录制”按钮。

如何使用录制好的宏？

在“开发工具”选项卡中，找到“宏”按钮。
在弹出的“宏”对话框中，选择需要运行的宏，然后点击“运行”按钮。
宏命令就会自动执行所录制的操作。

打造Excel简易查询小系统

利用宏录制，我们可以轻松打造一个Excel简易查询小系统，实现以下功能：

单条件查询： 输入查询条件，即可筛选出符合条件的数据。
多条件查询： 同时输入多个查询条件，进行复合筛选。
结果展示： 将筛选结果显示在指定区域。

具体操作步骤如下：

创建查询条件区域： 在Excel工作簿中，创建一块区域作为查询条件的输入区域。
录制宏： 按照上述步骤录制宏，并将宏命令命名为“查询”。
宏中添加代码： 在录制好的宏中，添加以下代码：

' 定义查询条件区域
Dim critRange As Range
Set critRange = Range("A1:C10")

' 获取查询条件
Dim critArr() As String
critArr = critRange.Value

' 进行筛选
Dim dataRange As Range
Set dataRange = Range("A1:E20")

dataRange.AutoFilter critArr, xlAnd