MethodCatalog
DescriptionReturns the ADOMD.Catalog object of the cube object. This catalog contains all the information about the cube metadata. See Microsoft's documentation about the catalog object.
Return typeADOMD.Catalog
Parameters
Example Dim m_ctActiveCatalog As Object
 Set m_ctActiveCatalog = CreateObject("ADOMD.Catalog")
 Set m_ctActiveCatalog = Cube1.Catalog
 call msgBox( _
  "m_ctActiveCatalog.CubeDefs(0).Name")
ExplanationCreates an ADOMD.Catalog object from the current control connection and prints its first cube name.
See also
NotesYou can use a reference in your VB project to the library Microsoft ActiveX Data Objects (Multidimensional)" and use:
Dim m_ctActiveCatalog as new ADOMD.Catalog