Hi,All
How to change background color of a cell in excel using qtp
and that too with out using Excel Object.(I am importing
the excel sheet by using ImportSheet method)
Answer Posted / srinivasa reddy m
Set oExcel = Createobject("Excel.application")
oExcel.Visible = True
Set oWorkBook = oExcel.WorkBooks.Open("c:\Book1.xls")
Set oWorkSheet = oWorkBook.WorkSheets(1)
oWorkSheet.Cells(1,1).Interior.ColorIndex = 38
| Is This Answer Correct ? | 15 Yes | 6 No |
Post New Answer View All Answers
What are the ordinal identifiers in web page?
Do you know how to connect database? Can you tell me the procedures?
How can we conduct U-I Testing by using QTP??????
What are the benefits of quick test pro(qtp)?
Output values? i want a practical example
Explain the check points in quicktest professional (qtp)?
How to find the name of the machine where you are running your automation scripts in qtp?
I need to obtain the parent of an object programatically, so if I have: winButton("aButton") I need to obtain the parent part: window("Window1").Dialog("Dialog1") so I can programatically create a string of the full name of the object to call it with an execute statement in QTP I would like to use something like: part[1] = "window(""Window1"")" part[2] = "dialog(""Dialog1"")" so I can do: exeLine = part[1]&"."&part[2]&"."&"winButton(""aButton"")" Execute exeLine Apart from keeping a record of the window/dialog hierarchy is there a parent or path function/ command Thanks Adrian
If the objects hierarchy is changing from build to build, then how you will handle that condition?
How can we retrieve the Bug Ids which are open&Reopen in status through QTP scrit?Please find the script which i tried... Dim objBugFactory, objBug Dim BugId Set TDConnection = QCUtil.TDConnection Set objBug = TDConnection.BugFactory If QCUtil.IsConnected then Reporter.ReportEvent 0, "Connected", "Connected to server: " + QCUtil.TDConnection.ServerName + chr (13) +"Project: " + QCUtil.TDConnection.ProjectName + chr (13) + "Domain: " + QCUtil.TDConnection.DomainName Reporter.ReportEvent 0, "Current time on server is","==>" & TDConnection.ServerTime Else Reporter.ReportEvent 1, "Not connected", "Not connected to Quality Center" End If If mybug.Status="Open" Then BugId=mybug.DefectId MsgBox BugId End If 'OR**********************************--------------------- -----********************************** If Bug_Fields("BG_STATUS").Value ="Open" Or "Re Open"Then BugId=Bug_Fields("BG_BUG_ID").Value MsgBox BugId End If
Anybody plz give, How do you test aframe in a web page? If page cotain text message or Images, tables?
Discuss quicktest professional environment?
Why qtp always start action1 and does not start action?
What is the purpose of loading qtp add-ins?
how to create flat file datasubmission in qtp