VBA: Load custom ribbion at runtime with access - vba

Question

I try to load and display a ribbon out of a textfile in microsoft access via VBA at runtime.
So I call this code:
Dim strGUID As String
strGUID = "RadToolRibbons"
Const RadToolRibbonFile = "c:\Temp\Ribbons.xml"
Dim XMLText As String
With CreateObject("Scripting.FileSystemObject")
XMLText = .OpenTextFile(RadToolRibbonFile, 1).ReadAll
End With
Application.LoadCustomUI strGUID, XMLText
But it does not show the ribbon. When I call the code again I get an error:
#32609 " this customization already loaded..."
The xml looks like this:
<?xml version="1.0"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon startFromScratch="true">
<tabs>
<tab id="tab1" label="MyNew">
<group id="StartHelp" label="Help">
<button id="Test" label="Test" size="large" imageMso="AcceptTask" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>
What Im doing wrong?

Answer 1

By default, if a VSTO Add-in attempts to manipulate the Microsoft Office user interface (UI) and fails, no error message is displayed. However, you can configure Microsoft Office applications to display messages for errors that relate to the UI. You can use these messages to help determine why a custom ribbon does not appear, or why a ribbon appears but no controls appear.
To show VSTO Add-in user interface errors
Start the application.
Click the File tab.
Click Options.
In the categories pane, click Advanced.
In the details pane, select Show VSTO Add-in user interface errors, and then click OK.
Read more about that in the How to: Show Add-in user interface errors article.