在本文中,您将学习如何使用VBA代码在Excel中执行计算。

[.underline]#让我们看一个例子:#我们有一些随机数,我们想要相乘并为每个像元加一些数。

img1

如果必须对选定的单元格执行计算,则需要执行以下步骤:

单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”

img2

单击插入,然后单击模块

img3

这将创建新的模块。

在模块

中输入以下代码===子计算()

x = InputBox(“乘以什么?”,默认值:= 1)

y = InputBox(“添加什么?”,默认值:= 0)

===

对于选择中的每个单元格

cell.Value = cell.Value * x + y

下一个单元格

结束子

img4

按ALT + F8快捷键打开“宏”窗口,然后选择宏。

img5

或者,您可以按F5键在VBA屏幕中运行代码。

执行完宏后,我们将获得以下输入框,以输入数字“乘以什么”

img6

输入值(在我们的示例中为2)后,下一个输入框将出现在您的前面,以输入要添加的数字(在本示例中为2)。

请参考下面的快照

img7

我们将获得输出。请参考下面的快照

img8

这样,我们可以根据用户要求进行计算。