Finding WebElements

[mv8167]

I am trying to get the WebElement of a WebTable that has 7 columns. I need the page numbher found in the 5th column.My code below returns no data. I can not figure why.

Any thoughts?

Code:

Set TableObj = Browser("Wisdom").Page("Wisdom IA_2").Frame("parent").WebTable("Select All")

rNumber = 1
RowCount = TableObj.RowCount

For r = 1 to RowCount
    If r <> 2 Then
            ColCount = TableObj.ColumnCount(r )
           For c = 1 to ColCount
               'msgbox ColCount
                    ChildCountPage = TableObj.ChildItemCount(r, c, "WebElement")
                    'msgbox ChildCountPage
                     If ChildCountPage >  0 Then
                            For k = 0 to ChildCountPage - 1
                                        rNumber = rNumber +1
                                        Set WebObj = TableObj.ChildItem(r, c, "WebElement", k)
                                        NumPages = WebObj.GetROProperty("innertext")

                                        If c = 5 Then
                                      'Retrieve the column index
                                        objExcel.Cells(rNumber, 6).Value = NumPages
                                         End If
                                                

                            Next
                    End If
          Next
    End If
Next