Highlight the Found text in Word/notepad

[BadrinarayananR]

Hi,

You can try the following code,

Code:

Set obj=Browser("creationtime:=0").page("title:=.*").WebTable(oWT).childobjects
cnt=obj.count
For i=0 to cnt-1
If obj(i).getroproperty("micclass")="Link" Then
        msgbox "The foll object has link:- "obj(i).getroproperty("Name")
        else
        msgbox  "The foll object does not has link:- "obj(i).getroproperty("Name")
    End If
Next