使用Excel VBA for Mac添加两个单元格时出错
我正在尝试用Excel VBA for Mac编写我的第一个代码。我只想加两个数字。听起来很难,对吧?我不断地发现这个错误: 编译错误:属性的使用无效 然后会打开一个调试器窗口,突出显示第一行使用Excel VBA for Mac添加两个单元格时出错,excel,vba,macos,Excel,Vba,Macos,我正在尝试用Excel VBA for Mac编写我的第一个代码。我只想加两个数字。听起来很难,对吧?我不断地发现这个错误: 编译错误:属性的使用无效 然后会打开一个调试器窗口,突出显示第一行 Sub abbas() 'adds two numbers 'from e2 and e3 and puts the result in e4 Sheets("SHEET 1").Select Range("e2").Select A = ActiveCell.Va
Sub abbas()
'adds two numbers
'from e2 and e3 and puts the result in e4
Sheets("SHEET 1").Select
Range("e2").Select
A = ActiveCell.Value
Range("e3").Select
B = ActiveCell.Value
Range("e4").Select
ActiveCell.Value = A + B
Range ("e5")
End Sub
错误
该错误由该行引发
射程e5
您没有将任何操作与此范围关联。你想选择它吗?你想清除它吗?编译器不明白
变码命题
我将向您推荐2个没有错误的简化代码
代码1
阿巴斯副主席
'加上两个数字
'并将结果放入e4
附活页1
A=.range2
B=.range3
.范围4=A+B
以
端接头
代码2
笔记
尽量避免使用Select和ACTIVE命令行,您不需要它们,您可以直接参考工作表上的值,如我的示例代码所示。
最好在子功能/功能的顶部添加。
考虑一下这个子函数。
Sub abbas2()
'adds two numbers
'from e2 and e3 and puts the result in e4
With Sheets("SHEET 1")
.Range("e4") = .Range("e2") + .Range("e3")
End With
End Sub