tems - 1

   ' Binary search
   iResult = 0
   lRow = plBinSearch(vItems, tRows, lItems, iStartRow, iEndRow,
    lIndentMatchLevel, iResult)

   If (bRemoveTempSort) Then
      m_iSortIndexCount = m_iSortIndexCount - 1
      ReDim Preserve m_tSort(1 To m_iSortIndexCount) As tSortInfo
   End If
   
   FindInsertLocation = lRow
   
End Function

Private Function plBinSearch( _
      ByRef vItems() As tGridCell, _
      ByRef tRows() As tRowPosition, _
      ByVal lMatchFor As Long, _
      ByVal lStart As Lon