Please provide example of how to call MWInitAppl​icationWit​hMCROption​s from Access VBA.

Please provide example of how to call MWInitApplicationWithMCROptions from Access VBA. The documentation implies to call it as Call MWInitApplicationWithMCROptions(Empty)

but this throws run-time error 424 Object required

Option Compare Database

Option Explicit

Public gMagicDemo As magicdemo.magicdemoclass

Public gMCUtil As MWComUtil.MWUtil

Sub test()

Dim y As Variant

If gMCUtil Is Nothing Then

Set gMCUtil = New MWUtil

Call gMCUtil.MWInitApplicationWithMCROptions(Empty)

End If

If gMagicDemo Is Nothing Then

Set gMagicDemo = New magicdemoclass

End If

Call gMagicDemo.makesquare(1, y, 5)

End Sub