[软件] 电子表格查询多结果显示

[复制链接]
查看93 | 回复0 | 2022-1-22 08:25 | 显示全部楼层 |阅读模式
问题:
电子表格查询多结果显示

excel工作表记录了姓名,时间,电话,证号,记录中肯定有重名的,做一个查询表,查询时同时显示所有整行结果,意思就是,只要包含查询内容的行都显示在这个查询表上

推荐答案:
一是最简单的办法就是筛选。点击筛选后,下拉菜单发现重复项,选择就找到了
二是在表格内,点击数据,里面有个重复项检查,版本不同,重复项的名字也有所差异




其他答案:
这个如果不想用自带的筛选功能,可以用VBA写代码来完成,代码如下:
Sub myfind()
Dim ar, cr(1 To 1000, 1 To 4)
Dim i&, j&, n&
m = Range("d65536").End(3).Row
ar = Range("a2:d" & m)
If Range("g2") = "" Then
    MsgBox "请输入查询对象名称!"
    Exit Sub
End If
For i = 1 To UBound(ar)
    If ar(i, 1) = Range("g2") Then
        n = n + 1
        For j = 1 To 4
            cr(n, j) = ar(i, j)
        Next j
    End If
Next i
Range("g4:j1000") = ""
Range("g4").Resize(n, 4) = cr
End Sub

代码效果如下:
【玉璞集 YUPUG.COM】