colPopups Is Nothing) Then
      Dim vlhWnd As Variant
      Dim lhWnd As Long
      Dim ctl As vbalCommandBar
      For Each vlhWnd In m_colhWnd
         lhWnd = vlhWnd
         If (ControlFromhWnd(lhWnd, ctl)) Then
            ctl.fCloseMenus True
         End If
      Next vlhWnd
   End If
   
End Sub

Public Property Get NewInstance() As vbalCommandBar
   
   ' Either use an existing cached control instance, or
   ' request a new control instance from one of the
   ' controls that's connected to me.
   