Set excelapp = CreateObject("Excel.Application")
pathr="e:\tddata.xlsx"
Set
open_excel_file=excelapp.Workbooks.open(pathr)
Set
worksheet=open_excel_file.Worksheets("rough")
rcount=worksheet.usedrange.rows.count
ccount=worksheet.usedrange.columns.count
msgbox "No of Row :- " & rcount
msgbox "No of Column :- " &ccount
--------------------------------------------------------------------
On Tue, Jan 25, 2011 at 7:35 AM, Roman Zilber <[email protected]> wrote:
> try
> maxValue = Application.Max(ActiveSheet.UsedRange)
>
> On Mon, Jan 24, 2011 at 6:26 PM, Venkat Boin <[email protected]>
> wrote:
> > Hi All,
> >
> > There is excel sheet with some data(numerical values), we need to find
> the
> > maximum value from that sheet.
> >
> > Please let me know script know the script for same and thanks in Advance.
> >
> > Thanks,
> > Venkat Boin
> >
> > --
> > 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]<mercuryqtp%[email protected]>
> > For more options, visit this group at
> > http://groups.google.com/group/MercuryQTP?hl=en
>
> --
> 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]<mercuryqtp%[email protected]>
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
>
--
===================
With Regards
Jakka Suresh Kumar
[email protected]
===================
--
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