Example of an Excel VBA application using the mooAwAttach function:
Public Sub mooAwAttach() 'Attach Analytic Workspaces
Dim boo As Boolean
If Not oregistered Then: boo = regQ:
If Not o.connected Then
boo = o.connect
boo = o.connected
Else
boo = True
End If
If boo = True Then
boo = o.mooAwAttach("GLOBAL.GLOBAL", "FIRST")
boo = o.mooAwAttach("GLOBAL.GLOBAL", "AFTER EXPRESS")
Else
Debug.Print "Unable to Connect" Debug.Print o.getlastmooerr
End If
End Sub
Attaches an Analytic Workspace in the specified position if it exists.
mooAWAttach [aw name] [position]
where [aw name] is the fully referenced analytic workspace name
[postion] is the position the referenced aw should be attached.
FIRST makes the aw you are attaching the current one.
LAST makes the aw you are attaching the last in the list excluding the express aw.
BEFORE puts the aw you are attaching before an aw which is already in the list.
AFTER puts the aw you are attaching after an aw which is already in the list.
Syntax
Microsoft®, WINDOWS®, Microsoft Excel®, Microsoft Office® are registered trademarks of Microsoft Corporation.
ORACLE® is a registered trademark of ORACLE Corporation.
® SDMC Consulting Limited 2010
