Create an excel sheet and enter a value into first cell through QTP

Dim objexcel
Set objExcel = createobject("Excel.application")
objexcel.Visible = True
objexcel.Workbooks.add
objexcel.Cells(1, 1).Value = "Testing"
objexcel.ActiveWorkbook.SaveAs("D:\ani.xls")
objexcel.Quit
Create an excel sheet and enter a value into first cell through QTP Create an excel sheet and enter a value into first cell through QTP Reviewed by Animesh Chatterjee on January 23, 2010 Rating: 5

No comments:

Powered by Blogger.