如何在诸多Excel中精准搜索人名?

如题所述

第1个回答  2019-12-26
不同的excel表格么?可用vba
dim rng as range
name = inputbox("请输入所需查找姓名!")
set exl = createobject("excel.application")
exl.visible = false
'以下需要设置条件啊,不知道你excel怎么命名的,最好有规律的excel(1),excel(2)···
'如果没有规律的话,应该要用到File System Object了吧,或者用dir遍历了
set wj = exl.workbooks.open(thisworkbook.path &···)
for each rng in worksheet
if rng = name then

wj.rng.select

exl.visible = true

end if
next
以上代码不全,仅提供种思路,大佬勿喷···追问

是多个Excel表格在文件夹里,搜索总是出现包含某个字的表格都会出来

追答

这个我正好也需要用到,vba代码我测试完了给你,就是怎么输出的问题了,查找到人名后你是需要以什么形式输出呢?多个excel表格是否有多个相同人名?给你的意见是,文件夹内全部excel查询完后,将查到的人名以文本形式给出,比如:1.张三,excel(1).sheets(1);2.张三,excel(8).sheets(2)···,文本形式给出,或者像ctl+f一样以窗口形式给出,查到后,自动打开excel并选中显示,点击下一个自动打开并选中显示,直至显示对话框无此数据,后面那种更适合操作习惯啊。
对了还有个,win8系统以上应该有搜索框,可以查找吧?

本回答被网友采纳
第2个回答  2019-12-26
按ctrl与F键,输入姓名,回车即可。
相似回答