Question

vba宏 实现 excel查询系统

sheet2作为源数据表，在sheet1 B10中输入查找值 点击查找后在下面显示相应的整行数据

Answer 1

软件版本：Office2007

一个简易的类似Excel查询功能的窗体，实现方法：

1.Alt+F11，打开VBE界面，插入用户窗体，再在窗体上插入一个textbox和一个commandbutton：

2.双击Commandbutton，输入代码如下：

3.选择窗体，点击执行后，回到Excel中，文本框输入内容，点击查找，就可以找到包含这个内容的单元格：

Answer 2

这个不用宏，用VLOOKUP或INDEX函数都能轻松实现。

追问

vlookup只能返回查找到的第一行数据，而我有多条

追答

具体要看你的表和数据是怎么样的，用用VLOOKUP或INDEX函数都能实现的，很容易。你可以对你的表格sheet1、sheet2分别截图上传来看一下吗？看到就能设计解决方案了。需要返回多行数据用INDEX函数就非常方便，只要符合条件的内容都会自动返回。

追问

事实上我是想实现一个查询功能如图为源数据表，编码是唯一的，但是名称有很多是相同的

所以当按编码查询时可以利用vlookup范围唯一的值，但是查询名称时便做不到，以下是查询页面，求大神指教

追答

可以把附件发给我吗？我直接帮你做好后再传给你。光看图片说不清楚。我的邮箱631919563@qq.com。我可以设计为按表中任何一列的值来进行查询的，符合条件所有内容都能自动显示出来，可以精确查询，也可以模糊查询，用名称查询时甚至不必输入完整的名称，只要输入关键字就可以进行查询。下面是我做好的附件的截图加说明：

另，做好的附件已发到你的邮箱，请注意查收。欢迎继续交流，互相学习，共同提高。

Answer 3

不用宏，vlookup也可以的

追问

vlookup只能返回查找到的第一行数据，而我有多条

Answer 4

LISTBOX控件？