1、首先，打开WPS表格，注意你的WPS表格已经正确安装了VBA控件才能进行操作，如果你的WPS表格没有安装VBA控件，使用Excel表格进行操作也一样可以。然后点击“开发固嗟喹账工具”，点击“命令按钮”，在工作表空白的地方点击一下。如图，出现名称为CommandButton1的命令按钮。
2、双击CommandButton1的命令按钮，进入VB编辑器后台进行操作。
3、为了更好地演示此经验，下面使用实例说明。如我想在工作表名称为“工时统计”里查找“李四”所在的行，需要在Private Sub CommandButton1_Click()与End Sub之间添加以下代码：Dim x As String, xr As Integerx = "李四" '输入搜索变量Sheets("工时统计").Cells(1, 1).Select '确定搜索开始节点，一般选择第一个单元格Set C = Range("A:A").Find(x, After:=Selection, LookIn:=-4176, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=True, MatchByte:=True, SearchFormat:=True)If Not C Is Nothing Then C.Select xr = Selection.Row '输出变量x所在的行End If
4、确认了“李四”所在的行xr后，假如我们要在第2列“李四”所在行输入李四的工时，我们这里假设为8小时，在End If前添加下列代码即可Cells(xr, 2).Value = 8 '姓名为x的员工工时为8小时
5、关闭VB编辑器，我还需要点击“退出设计”，然后保存WPS表格。
6、点击一下名称为CommandButton1的命令按钮，演示效果：查找“李四”所在的行，并在工时这一栏填写“8”小时的新数据，我们需要的功能实现啦！
