   End If
         End If
      Next
      
      If (iCount = 0) Then
         ' Re-enable all items with recursion level -1
         Dim ctl As vbalCommandBar
         For Each cTrailItem In m_colPopupTrail
            If (cTrailItem.RecursionLevel = cThisTrailItem.RecursionLevel - 1)
             Then
               If ControlFromhWnd(cTrailItem.hWnd, ctl) Then
                  ctl.Enabled = True
               End If
               If ControlFromhWnd(cTrailItem.hWndSource, ctl) Then
                  c