使用宏添加两个数字无法执行

使用宏添加两个数字无法执行

如何使用宏将 2 个数字相加?我尝试了以下方法,但无法执行。

Sub auto_open()
       n1 = InputBox("enter fiest number")
     n2 = InputBox("Enter 2nd number")
      Range("a1").Value = n1 + n2
End Sub

答案1

有趣的是:我刚刚检查过它并且它有效:-)

是否存在实际的错误信息或者您只是没有看到任何效果?

您到底将代码放在哪里了?

您之前没有指定工作表,Range("a1").Value因此结果可能会写入您意想不到的位置。

编辑/PS:如果您想将它们添加为数字,您可能需要提供n1数字n2数据类型(即使 VB 允许您执行几乎任何未经检查的操作),否则在这里它们似乎被连接为字符串。

相关内容