I have the following code in a callback module. When I select an item from the dropdown control the code runs fine, seemingly invalidating the control without issue. If I try to select the same item again from the dropdown nothing happens, leading me to believe the invalidation did not occur. Any expertise in this area will be greatly appreciated.

Ken

Public Sub onDropDownSelection(control As IRibbonControl, _


selectedId As String, _
selectedIndex As Integer)
On Error GoTo PROC_ERROR
Select Case control.ID
Case "ddViewTables"
Select Case selectedId
Case "itmDD1"
DoCmd.OpenForm FormName:="frmViewTPS_Data"
Case "itmDD2"
DoCmd.OpenForm FormName:="frmViewTPS_Matrix"
Case "itmDD3"
DoCmd.OpenForm FormName:="frmViewTRAX_Data"
Case "itmDD4"
DoCmd.OpenForm FormName:="frmViewTRAX_IFM_Projects"
Case "itmDD5"
DoCmd.OpenForm FormName:="frmViewForecast_vs_Actual"
End Select
gobjRibbon.InvalidateControl "ddViewTables"
End Select


PROC_EXIT:
Exit Sub
PROC_ERROR:
Call ShowError("modRibbonCallbacks", "onDropDownSelection", Err.Number, Err.Description, Err.Source)
Resume PROC_EXIT
End Sub