作者：乔山办公网日期：
返回目录：excel表格制作
好吧。扣
你这个挺简单的。
需要你的源文件，以及更进一步了解你的意图。
得空给你弄吧。
或者直接邮扣扣邮件
文件见附件。
i=inputbox(" XXXXX :")
a
= WorksheetFunction.Match(Trim(i), Sheet142.Range("a:a"),
False)
用这zd个找出位置以后，专你就知道。属。。。。
我刚才也写了一个，你下载解压出来（共2个文件）。
然后打开VBA编辑器，在工程资源管理窗口内点鼠标右键，
再点“导入文件……”，把UserForm1导入你要实现查找功能的那个文档中。
运行就行了。