Excel主要功能--计算，应用过程中会有许多各种各样的公式进行计算。
有些情况下设置自动计算，有时需要手动进行计算。这也是Excel的一个十分强大的功能。
那么如何对更改后的表格数值进行计算呢！
下面介绍一个方法，可以对表格内的公式进行特定计算。
计算方法是基于Worksheet对象之下。
此方法应用也很简单，不需要更多的参数，只需要对计算的范围进行确定即可。
其方法介绍如下图：
举一个例子来对这个方法进行演示。
如下图，对一些公式进行参数赋值后自动计算。
其实，在Excel默认设置中，公式会自动计算，某些情况下设置表格为手动计算。这个可以视特定情况对Excel应用进行设置。
下面介绍一下代码。
全部计算
Private Sub CommandButton1_Click()
Dim w As Worksheet
Set w = ThisWorkbook.ActiveSheet
Dim s As Long
s = Range("G1").Value
Dim r As Range
Set r = Range("E3:E14")
r.Value = s
Set r = Range("G3:G14")
w.Calculate
End Sub
选择计算
Private Sub CommandButton2_Click()
Dim s As Long
s = Range("G1").Value
Dim r As Range, Rs As Range, Rx As Range
Set Rs = Range("A3:A14")
For Each Rx In Rs
If Rx.Value = "是" Then
Rx.Offset(0, 4).Value = s
Rx.Offset(0, 6).Calculate
End If
Next Rx
End Sub
全部计算就是对整个选择表内公式进行计算，部分计算即可对所选择的单元格公式进行计算。
这样就提供了一个自主解决方法，对于希望要进行的公式进行计算。
Worksheet.Calculate方法对计算是十分有用的一个方法，对于具有数值计算的表格必须要掌握一个方法。
---END---
欢迎关注、收藏。
