Help required in VB macro in Business Objects XI3.1 Report

Hi All,

I'm trying to create a VB macro to split the Data into separate tabs if the Row limit exceeds 65000, so that we can save that in a xls document.

In that i have created a Report Level variable (not a Universe Object. Just a report level variable). I'm trying to assign this Variable to my macro variable. I need the correct syntax for assigning my Report variable to macro variable. The sample code is as below

Report Variable is a measure variable.

Code:

Dim Doc as Document

Dim DocVar as DocumentVariable

Set Doc = ThisDocument

Set DocVar = Doc.DocumentVariables("Report Variable")

Now, when i try to get the value of DocVar in MsgBox (MsgBox DocVar), it is giving the below error

Run-time error '438' : Object doesn't support this property or method.

However, when i execute (MsgBox DocVar.Name), the name of the Report Variable is displaying correctly in the message box.

Anyone please help in getting the correct syntax for setting report variable's value to a macro variable.