Q：工作表中有很多同名人员的信息，想要在用户窗体中设置查询，输入人员姓名后，显示其有多少条信息，并且可以逐条显示这些信息 。
文章插图
A：下面是详细的实现过程 。
在VBE中插入“用户窗体”并命名为UInfo，在窗体中放置“标签”、“文本框”和“按钮”控件，并分别给这些控件命名，如下图所示 。
文章插图
在用户窗体模块中输入下列代码：
文章插图
说明：
声明模块级变量
用来传递已找到的全部单元格，以及当前显示的单元格
文章插图
说明：
初始化用户窗体
使用查找到的第一条记录填充用户窗体中的相应控件
文章插图
说明：
设置前一条按钮和后一条按钮
在用户窗体控件中填充相应的记录
同时显示记录数
文章插图
说明：
当显示的记录在第1条或者在最后一条时，禁用相应的按钮；在中间时，启用相应的按钮 。
在VBE中插入一个标准模块，输入下列代码：
文章插图
说明：
首先使用Find方法根据查找条件查找到满足条件的全部记录，并将其赋值给相应的Range变量 。然后，创建用户窗体并将代表找到的全部记录的变量传递给用户窗体 。
为了确保引用的记录区域与工作表中出现的顺序相同，在Find方法中使用了参数After并将其值设置为搜索区域的最后一个单元格，即从搜索区域的第一个单元格开始查找 。
【怎么找到工作表中满足条件的所有记录并逐条显示？】在《Excel VBA解读（41）：藏得再好也能找到——使用Find方法实现查找》中详细解了Find方法的语法及应用示例 。在《经典代码解析2：查找并获取所查找内容的全部单元格》中，详细解了使用Find方法获取满足相同条件的所有单元格的原理及代码 。
至此，用户窗体及相应的代码全部制作完成 。
运行ShowInfo过程，弹出下列对话框，要求输入查找的姓名：
文章插图
输入完后，单击“确定”，即显示下图所示的用户窗体：
文章插图
可以看到查找的记录数，当前在第几条，单击按钮即可逐一显示记录信息 。
推荐阅读
- excel怎么创建变化的选项卡，即不同用户在功能区中有不同的选项卡？
- 怎么在不同的页中打印每个学生的成绩？
- 怎么在打开工作簿后只显示用户细分？
- 保温碗吸住了怎么打开
- 大蒜炒猪肝怎么炒好吃窍门
- 怎么炒芦荟
- 抖音打赏等级怎么清零？抖音荣誉等级是什么意思？
- 表单 怎么设置窗体控件的格式？
- 怎么限定用户只能操作工作表中指定区域？
- 怎么查找包含通配符的文本？