Example of an Excel VBA application using the mooClearErr function:
Public Sub mooClearErr() 'Clear Errors
If Not oregistered Then: boo = regQ:
Debug.Print o.getlastmooerr 'Show the last Error
Debug.Print o.mooClearErr 'Clear all error messages
Debug.Print o.getlastmooerr 'show that all error messages have been cleared
End Sub
Clears the last error trapped by the myObjectiveOLAP library.
Subsequent calls to getLastMooErr would result in a NULL being returned until the next error.
Syntax
mooclearerr ()
Microsoft®, WINDOWS®, Microsoft Excel®, Microsoft Office® are registered trademarks of Microsoft Corporation.
ORACLE® is a registered trademark of ORACLE Corporation.
® SDMC Consulting Limited 2010