Add own VBA Addin (.xla) to BEx Analyzer

Question

Hi,
I created an XLA add-in, which I activated in my Office Excel. When opening Excel my add-in works fine (I can see it in my VB-Editor below BExAnalyzer.xla and it is possiblöe to use the makros.
Unfortunately this add-in is not aktivated when opening BEx Analyzer. In this case the new add-in is not listed below the BExAnalyzer.xla, whereas it is marked to be active at the office options Special / Add-ins (extras / Add-dins in german office version).
Office 2003
BEx Front End Patch 501
Does anybody know, how to implement own xla add-ins to BEx Analyzer?
Best Regards,
Helge

Answer 1

I guess it's because of the way the BExAnalyzer loads Excel - it's an OLE call or something alike. In other words Analyzer loads BEx addin alone. I see two possible workarounds.
One is to find some command line parameter for BExAnalyzer.exe to make it load the addin you want. The problem is I do not know if there are any such parameters.
The other way is to load the addin after the BExAnalyzer.xla is loaded. You can easily check this way by opening your addin manually. However, doing it programmatically becomes a problem since the only piece of VBA code loaded is BExAnalyzer.xla itself. Therefore you have to modify BExAnalyzer.xla to load the stuff you want when it's opened by BExAnalyzer.exe. But it may be (and I'm sure it is) prohibited by the license agreement and by the way you will lose this file's digital signature trying to save the modified BEx addin (don't hesitate to make the backup first).
This is the code to insert to ThisWorkbook module of BExAnalyzer.xla if you dare:
Private Sub Workbook_Open()
    On Error Resume Next
        Application.Workbooks("YourAddin.xla").Saved = Application.Workbooks("YourAddin.xla").Saved
        ' If YourAddin.xla addin is not loaded (and we get an error in the line above), then open it
        ' and run addin automacros because the event doesn't fire when opening addin this way:
        If Err.Number = 9 Then
            Application.Workbooks.Open(Application.UserLibraryPath & "YourAddin.xla").RunAutoMacros (xlAutoOpen)
    On Error GoTo 0
End Sub
The YourAddin.xla is supposed to be in standard addin folder (%AppData%\Microsoft\AddIns)