Hi,
Please check if the below mentioned logic works for you -
iCol = 'Column Number
iTotalRows = Br.Pg.WebTable.GetROProperty("rows")
iNonBlankRows = 0
For i=0 to iTotalRows-10
If Br.Pg.WT.GetCellData(i,iCol) <> "" Then
iNonBlankRows = iNonBlankRows + 1
Else
Exit For
End If
Next
msgbox "Total Non Blank Rows " & iNonBlankRows
*Regards,
Anish Pillai
[Automation Repository] <http://www.automationrepository.com/>
[Subscribe via
Email]<http://feedburner.google.com/fb/a/mailverify?uri=automationrepository/feeds>
[RSS Feed] <http://feeds.feedburner.com/automationrepository/feeds>
*
--
Regards,
Anish Pillai
My QTP Blog <http://automationrepository.blogspot.com>
--
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
