excel里用如何函数实现自动筛选的功能

2024-12-23 00:46:06

推荐回答（5个）

回答1：

用高级筛选可以达到你的目的条件区域你设置一下，上一行为1表的标题，下一行是要查询的数据两行组成一个条件区域要做到输入要查询的内容就自动出结果。

一、Microsoft Excel是微软公司的办公软件Microsoft office的组件之一，是由Microsoft为Windows和Apple Macintosh操作系统的电脑而编写和运行的一款试算表软件。

二、Excel可以进行各种数据的处理、统计分析和辅助决策操作，是微软办公套装软件的一个重要的组成部分，被广泛地应用于管理、统计财经、金融等众多领域。Excel电子表格软件历经22年的发展，从一款小软件成为人们日常工作中必不可少的数据管理、处理软件。

三、1985年，第一款Excel诞生，它只用于Mac系统。1987年，第一款适用于Windows系统的Excel也产生了。此后大约每两年，Microsoft就会推出新的版本来扩大自身的优势，Excel的最新版本为Microsoft Office Excel 2013。

回答2：

用高级筛选可以达到你的目的
条件区域你设置一下，上一行为1表的标题，下一行是要查询的数据两行组成一个条件区域
要做到输入要查询的内容就自动出结果，用VBA中的单元格事件来处理即可，你可把文件发sm100e@qq.com

已经给你处理好了，发你的邮箱中了。请查收。

回答3：

假设表一数据在A1：E100，表二B2中输入
=INDEX(Sheet1!A:A,SMALL(IF(Sheet1!$B$1:$B$100=$C$1,ROW($1:$100),4^8),ROW(A1)))&""
同时按下CTRL+SHIFT+回车，输入数组公式，右拉，下拉。
表二B列单元格格式设置为日期。

回答4：

函数做不到，用VBA可以
把下列代码拷贝到你要实现功能的工作表的VBA窗口轴
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i, j As Integer
j = 0
If Target = [c1] Then
Rows("2:100").EntireRow.Hidden = False
If [c1].Value <> "" Then
For i = 2 To 100
If Cells(i, 1).Value = [c1].Value Then
j = i
End If
Next
If j > 0 Then
Rows("2:" & j - 1).EntireRow.Hidden = True
Rows((j + 1) & ":100").EntireRow.Hidden = True
End If
End If
End If
End Sub
改变C1的数据，则只显示A列匹配的哪行，若无匹配或C1为空，则全部显示

回答5：

如图一中是自动筛选到三十二次的动作如图二中是自动筛选后的结果现在我想得到函数做不到，用VBA可以把下列代码拷贝到你要实现功能的工作表的VBA窗口轴