Return value from dropdown in ribbon

I have a ribbon created in ms-project VBA and the ribbon as such works just fine, but I can get no return values from dropdown boxes, buttons etc. works as they should.
I have made a
Option Explicit
Public SRibbon As IRibbonUI

But when calling the ribbon via the Onload sub the ribbon fails so I inserted the "Optional" obtion
Sub OnLoad(Optional Ribbon As IRibbonUI)
Set SRibbon = Ribbon
End Sub
However this changes nothing naturally as the SRibbon is never set.

So I am back to square one, why will the SRibbon not set and why can't I get a responce value from the dropdown box?

Does anyone have an example file or an explanation?
Kind regards

Herman
Say no to macros

Herman
Say no to macros