Sub testset v=ActiveDocument.Variables(SumRows)MsgBox v
Sub test set Name1 = ActiveDocument.Variables("SumRows") Q = Name1.GetContent.StringMsgBox Q