excel 查找后如何只显示需要的结果其他不需要的数据隐藏呢

2024-11-18 02:14:06

推荐回答（4个）

回答（1）：

复制以下内容到VBA编辑器.
说明:在弹出的窗口输入你要查找的数字,点击确定就可以只显示着个数字所在的行.如果在弹出的窗口不输入任何内容点击确定或者点击取消.显示所有的内容.
代码如下:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
Dim AA As Range, Endcol, Endrow As Long
Range("A:A").EntireRow.Hidden = False
Endcol = [iv1].End(xlToLeft).Column
Endrow = Range("A65536").End(xlUp).Row
For i = Endrow To 1 Step -1
Rows(i).Hidden = True
Next
stra = InputBox("请输入你要查找的数字:", "A")
If stra = "" Then
For i = Endrow To 1 Step -1
Rows(i).Hidden = False
Next
Else
Set AA = Range(Cells(1, 1), Cells(Endrow, Endcol)).Find(what:=stra, lookat:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext)
If Not AA Is Nothing Then
firstAddress = AA.Address
Do
If Rows(AA.Row).Hidden = True Then
Rows(AA.Row).Hidden = False
Else

End If

Set AA = Range(Cells(1, 1), Cells(Endrow, Endcol)).FindNext(AA)
Loop While Not AA Is Nothing And AA.Address <> firstAddress
Range("A1").Activate
End If
End If
Application.EnableEvents = True

End Sub

回答（2）：

这个功能只能用VBA实现。
变通的办法是查找→查找全部，按Ctrl+A 全选查找结果，填充背影色高亮，这样比较简单。
使用完成后全选，取消背影填充即可。

回答（3）：

可以选用筛选功能的

回答（4）：

使用筛选功，把你需要的数据筛选出来就可以了