I'm having trouble getting the FindText method to work.

My code:

WITH ThisForm

  cTextToFind = ALLTRIM(cTextToFind)

  oList = .pgfPages.Pages(.pgfPages.ActivePage).oleList

  FOR nColumn = 1 TO oList.ColumnCount
    nIndex = oList.FindText(cTextToFind, -1, nColumn, TRUE, FALSE)
  ENDFOR

ENDWITH

The FindList method never finds the data.

Anyone see what I'm doing wrong?

Thanks