Calculates a mathematical expression within a range or selection. Returns the result as a Single.
expression.Calculate
expression Required. An expression that returns a Range or Selection object.
Example
This example inserts a mathematical expression at the beginning of the active document, calculates the expression, and then appends the results to the range. The result is "1 + 1 = 2".
Set myRange = ActiveDocument.Range(0, 0)
myRange.InsertBefore "1 + 1 "
myRange.InsertAfter "= " & myRange.Calculate
This example calculates the selected mathematical expression and displays the result.
MsgBox "And the answer is... " & Selection.Calculate