The Name property of the Measure interface contains the name of the measure object.
String
Read/write (Objects can be renamed after their initial creation.)
Use the following code to create a cube measure object and name it MyMeasure:
'Assume an object (dsoCube) of ClassType clsCube exists
Dim dsoMeasure As DSO.Measure
Set dsoMeasure = dsoCube.Measures.AddNew("MyMeasure")