Excel VBA ---之公式说明

2025-10-25 17:55:27

1、功能说明:

实现表格数据求和。

1、原始数据如下:

Excel VBA ---之公式说明

2、在VBE中编写如下代码:

Sub noFormatSub()

Dim i%

For i = 2 To 6

    Range("d" & i) = Range("b" & i) + Range("c" & i)

Next i

End Sub

Excel VBA ---之公式说明

3、在Excel界面中插入宏,选定刚刚的宏noFormatSub;

4、执行宏,得到如下结果;

即:得到总分数;

Excel VBA ---之公式说明

1、接下来,利用公式的表达方式对列进行求和;

1、原始数据为:

Excel VBA ---之公式说明

2、在VBE中编写如下代码:

Sub formatSub()

Dim i%

For i = 2 To 6

    Sheet1.Cells(i, 5) = "=b" & i & "+c" & i

Next i  

End Sub

Excel VBA ---之公式说明

3、在Excel界面中插入宏,选定刚刚的宏FormatSub;

4、执行宏,得到如下结果;

即:得到总分数;

5、对比可知,利用公式计算得到的结果与常用计算方式得到的结果一致。

Excel VBA ---之公式说明

Excel VBA ---之公式说明

Excel VBA ---之公式说明

4、综上所述,在VBE中也可以利用公式来进行计算。

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢