不用VBA,用函数就可以解决。
在一张原始表(假定为SHEET1)上输入好全部资料(工号、姓名、账号在ABC三列中),在另一张表(SHEET2)的A列输入工号,BC列自动填充该工号对应的姓名和账号,假定第一行均为表头,请在SHEET2工作表的B2单元格输入公式:
=IF(ISERROR(VLOOKUP($A$2,SHEET1!$A:$C,COLUMN(),0)),"查无此人",VLOOKUP($A$2,SHEET1!$A:$C,COLUMN(),0))
将公式向右复制到C2单元格。
两个公式可向下复制。
首先需要有一个包含所需查询内容的信息表,例如包含工号,姓名,个人帐号的表。
然后可以使用VLOOKUP函数以相关关键字(例如工号)进行查找匹配取值。
VLOOKUP函数语法:
VLOOKUP(参数一,参数二,参数三,参数四)
VLOOKUP函数参数:
参数一:要查找的关键字。
参数二:查询的范围。
参数三:找到相应值后,返回目标行第几列的内容。
参数四:查找参数,0代表精确查找;1代表模糊查找;可省略,省略代表精确查找。