目的:使用vba编写最简单的程序 |
---|
效果:单元格有两个数据5和6(数据可变),按运算按钮后直接显示他们的和为11 |
结果:点击按钮可以使VBA进行运算 |
过程:
1、 了解单元格cells,如果需要指定单元格,需要的不是A1单元格,但是cells(行号,列号)统一以数字代替;
2、 和excel的运算方式一致,运算结果在前,具体写法是运算结果=数据(运算符号)数据
3、 算不清ABCD的数值位置,可以将ABC改成123,改法为:菜单栏—工具—选项—设置:R1D1引用样式(勾选)
具体做法:
1、 确定需要输入数据的单元格,如7,3和7,5作为运算数据单元格,7,7为运算结果单元格。
2、 打开控件:工具条右击——窗体工具箱,插入按钮,新建出现宏窗口即可出现VBA编辑器窗口
3、 输入命令
Sub command1() ‘名称不一定,以跳出的为准
Cells(7,7)=cells(7,3)+cells(7,5)
End sub
4、 延伸:
(1) 修改vba代码名字的名称可以直接在vba编辑器中修改,如修改为单元格运算;
(2) 修改vba按钮名称,右击按钮编辑文字——编辑,修改即可。
目的:使用vba编写最简单的程序 |
---|
效果:运算符号点击加法显示加法,并且计算,点击减法显示减法并计算 |
结果:点击按钮可以使VBA进行运算 |
过程:
1、 确认需要运算的单元格位置:cells(6,3)<显示运算符>cells(6,5)=cells(6,7)<显示数据>
2、 建立两个命令按钮,加法、减法(亦可以其他符号),指定宏窗口取消
3、 VBA编辑器中插入模块,输入命令代码
sub 加法() '第一个命令代码
cells(6,4)=”+” '定义6,4单元格显示运算符号为加号,加引号代表它是名称数据
cells(6,7)=cells(6,3)+cells(6,5) '进行公式运算
end sub
sub 减法() '第二个命令代码
cells(6,4)=”-”
cells(6,7)=cells(6,3)-cells(6,5)
end sub
4、将命令指定到按钮上,右击按钮