Example of an Excel VBA application using the connect function:
'Example Using the connect Function
Sub MooConnectExample()
If addIn Is Nothing Then
Set addIn = Application.COMAddIns("MooXL")
Set mooAutoObj = addIn.Object
End If
Call mooAutoObj.Connect
If Not mooAutoObj.Connected() Then
'Check if we connected ok
Debug.Print "Could Not Connect"
Else
MsgBox "Connected"
End If
End Sub
myObjectiveOLAP provides a function that can be incorporated into a client VBA application to handle the connection to an Oracle OLAP instance.
connect takes no additional arguments and will automatically read a valid XML connection file and connect to the Oracle OLAP instance specified.
Microsoft®, WINDOWS®, Microsoft Excel®, Microsoft Office® are registered trademarks of Microsoft Corporation.
ORACLE® is a registered trademark of ORACLE Corporation.
® SDMC Consulting Limited 2010
