WPS自动化的实现:[4]命令按钮
1、首先我们制作一个简单的学生成绩统计表:插入,表格,插入表格,设置好表格的行数和列数
![WPS自动化的实现:[4]命令按钮](https://exp-picture.cdn.bcebos.com/1f03436b04d14929a99b5aa763e5eceeacbc7eab.jpg)
3、我们的目标是点击“统计”按钮,李四的总成绩自动显示在相应的单元格里:双击命令按钮,显示代码编辑器,在其中添瑕铆幌约加如下代码:Dim a As Integer Dim s As Stringa = Val(Tables(1).Cell(2, 4).Range.Text) + Val(Tables(1).Cell(2, 5).Range.Text) + Val(Tables(1).Cell(2, 6).Range.Text)s = Str(a)Tables(1).Cell(2, 7).Range.Text = s
![WPS自动化的实现:[4]命令按钮](https://exp-picture.cdn.bcebos.com/46315818dfdae43b06956195c457935652bb74ab.jpg)
5、我们删除李四的所有成绩,保存WPS文字,退出。再次打开,当我们输入李四单科的成绩,点击“统计”,WPS就给我们显示出李四的总成绩
![WPS自动化的实现:[4]命令按钮](https://exp-picture.cdn.bcebos.com/974a2f21056104a31dfae01a63d7592ae2ef6bab.jpg)
6、思考:能否不添加控件而实现统计的功能,例如直接单击总成绩的单元格就自动将总成绩显示出来呢?这在后续经验中会有说明