Saturday, August 2, 2008

QTP testing: load excel file

Open excel & read data
set ex= CreateObject("Excel.Application")
Set a=ex.Workbooks.open("D:\excel.xls")
Set b=a.worksheets("Sheet1")
dim login, pwd
for i=1 to 3
login=b.Cells(i,"A").value
pwd=b.Cells(i,"B").value
msgbox login
msgbox pwd

2 comments:

Alex said...

At work with Excel files I usually use this application-how can a file become corrupted in Excel,because it has many facilities and is free as far as I can see,utility protect your data against possible damage due to a variety of reasons, from virus or hacker attack to hardware damage,will help to recover all data and repair Excel infected files, that are considered lost and save many days of your precious time for retyping all documents,export the results into a new document in Microsoft Excel format,repair your MS Excel damage file, when you need to repair Excel file.

Anonymous said...

Some time ago one human said about nice tool-repair Excel file error message,which helped near 100 people,as he said it is free and has many features,furtherover it is used to process important information, such as graphics, diagrams, commercial and statistical data,recover *.xlsx, *.xlsm, *.xltm, *.xltx or *.xlam formats,tool will help you if you have to repair Excel file error message: Excel error the file is not in a recognizable format,allows choosing a file, that shown an error like: Excel error message this file is not in a recognizable format, then, you should fix Excel file for errors and proceed with its analysis,attempts to recover your document with this message: Excel error and this file is not in a recognizable format and shows a preview window.