QTP not selecting appropriate webelement from the webtable..Need Solution

[satishkumarm]

when i use the above script then it is highlighting entire table..


I have modified the script as below and tried again but still not selecting appropriately

Code:

Set AdmissionRequests = Browser("BN").Page("Inpatient").Frame("Admission Requests")
r = AdmissionRequests.WebTable("Requested Admission Date").GetRowWithCellText("AR1100000113")
PRINT r
Set oWebElement=Description.Create()
oWebElement("micclass").value="WebElement"
oWebElement("innertext").value = "AR1100000113"
Set oElem = AdmissionRequests.WebTable("Requested Admission Date").ChildObjects(oWebElement)
obj = oElem.count
PRINT obj
res = abs(obj - r)
res1 = abs(obj - res) - 1
If AdmissionRequests.WebTable("Requested Admission Date").Exist(1) Then
    oElem(res1).Click
End if