PDA

View Full Version : Solved: Arithmetic problems with DOCVARIABLES in Word 2003



scrubbed
11-06-2006, 11:01 AM
I am having trouble doing addition (arithmetic) with DOCVARIABLES in Word 2003. My code results in concatenation, not addition. I?m not having any trouble doing multiplication or division with DOCVARIABLES. I am new to VBA and I?m probably making a very simple mistake. Here is my code:

Private Sub DOCVARIABLEArithmetic()
'Compare addition with DOCVARIABLES and VBA variables
ActiveDocument.Variables("dvNum1").Value = 1
ActiveDocument.Variables("dvNum2").Value = 2
ActiveDocument.Variables("dvNumTotal1") = _
ActiveDocument.Variables("dvNum1").Value + _
ActiveDocument.Variables("dvNum2").Value
Dim iNum1 As Integer
Dim iNum2 As Integer
iNum1 = ActiveDocument.Variables("dvNum1").Value
iNum2 = ActiveDocument.Variables("dvNum2").Value
ActiveDocument.Variables("dvNumTotal2") = iNum1 + iNum2
MsgBox "1 plus 2 equals " & _
ActiveDocument.Variables("dvNumTotal1").Value
MsgBox "1 plus 2 equals " & _
ActiveDocument.Variables("dvNumTotal2").Value
End Sub

The result is that dvNumTotal1 = 12 (concatenation) and dvNumTotal2 = 3 (addition). How can I get DOCVARIABLES to add instead of concatenate?

Thanks for your help.
Bill

Norie
11-06-2006, 11:23 AM
Try using Val.

ActiveDocument.Variables("dvNumTotal1") = _
Val(ActiveDocument.Variables("dvNum1").Value) + _
Val(ActiveDocument.Variables("dvNum2").Value)

scrubbed
11-06-2006, 11:34 AM
Hi Norie, Val works great - Thanks! Bill