Selection.Calculate (Word)

Calculates a mathematical expression within a selection. Returns the result as a Single.

MsgBox "And the answer is... " & Selection.Calculate