For i=1 to 100
For j=1 to 500
s=Browser("B1").page("p1"). Webtable("t1").GetCellData(i, j)
If s="abcde" Then
found=1
print "abcde is found in cell :"&i&","&j
Exit for
End If
Next
If found=1 Then
Exit for
End If
Next
For j=1 to 500
s=Browser("B1").page("p1").
If s="abcde" Then
found=1
print "abcde is found in cell :"&i&","&j
Exit for
End If
Next
If found=1 Then
Exit for
End If
Next
No comments:
Post a Comment