Problem with access ribbon

Question

Hi All,

I am having a problem with getenabled (Enable/dissable a control/button). Opening the form doesn't disable the button but I just can't spot a problem with what I have. I have checked and double checked all names. Any help would be appreciated.

In the xml I have:

<button id="MaintClientRegion" label="Regions"

            tag="frmMaintClientRegion" onAction="ribOpenForm"  getEnabled="ControlEnabled"

              size="normal" supertip="Maintenance - Regions"/>

In a module I have:

Public Sub ControlEnabled(control As IRibbonControl, ByRef enabled)

   Select Case control.id

        Case "MaintClientRegion"

            If CurrentProject.AllForms("frmMaintClientRegion").IsLoaded Then

                enabled = False

            Else

                enabled = True

            End If

        End Select

End Sub

And on the form.. form code... I have:

Private Sub Form_Close()

If Not globalRibbon Is Nothing Then

            globalRibbon.InvalidateControl ("MaintClientRegion")

    End If

End Sub

Private Sub Form_Load()

    If Not globalRibbon Is Nothing Then

            globalRibbon.InvalidateControl ("MaintClientRegion")

    End If

End Sub

Answer 1

Stupid me.... after wasting a lot of time trying to work out the problem I realised what the problem was as soon as I posted the question... for any one interested I somehow dropped out onLoad="OnRibbonLoad" from the opening line

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="OnRibbonLoad" loadImage="onLoadImage">

I'm not sure how to mark the question as answered..