作者：乔山办公网日期：
返回目录：excel表格制作
万能的vba可以实现。
例如姓名在每个工作表的A列。读百取后放在特定工作表（假度设：工作表名=“结果表”，需要查知找的姓名=“张三”）
第一步：进入visual basic。插入模块。
第二步：写入代码道。代码如下：（注：未版进行测试）
SUB TEST()
CONST CZXM="张三"
DIM JGARR(1 TO 100，1 TO 2) '1-工作表名 2-行号
DIM ZZ AS INTEGER '记录查找到的个数
FOR EACH MYS IN ACTIVEWORKBOOK.SHEETS
FOR I=1 TO MYS.CELLS(1000000，1).END(XLUP).ROW
IF MYS.CELLS(I,1).TEXT=czxm then
zz=zz+1
jgarr(zz,1)=mys.name
jgarr(zz,2)=i
endif
NEXT I
NEXT MYS
'输出结果
sheets(“结果”）.activate
range("a1:b1000").clear
cells(1,1).resize(zz,2)=jgarr
END SUB
可以自己试一权下哦。
能否上个知图或发个样表说明下？这样的话由于不知道你表的具体形式不好给你写公式，如果发样表的话可以发到我邮箱，发的时候道写明下要求就好了。我邮箱是：
现在这样只能版给你一个大致的公式。
假设你的名字都在A列，你要找出重复的名字，那你就在B列里输入：
“=if(countif(a:a,a1)>1,"重名权","")”然后向下拉动，筛选出B列内容为“重名”的即可