Answer Posted / raju

Set xl = CreateObject("Excel.Application")
set xlwbook = xl.Workbooks.Open(Excel Path)

Set xlWS = xlwbook.Worksheets(1)

Set k = xl.Worksheets(1).UsedRange.Find(Value to
Search)
On error resume next
k=k.value
If err.number>0 Then
msgbox "Pass"
else
Flag=0
If flag=0 Then
Status = "Pass"
StepDesc = "The Work Book has the
values "
Else
Status = "Pass"
StepDesc = "The Work Book Does not
has the values "
End If
End If

Set xlWS = Nothing
set xlwbook = Nothing
Set xl = Nothing

Please let me know if it's not working
raju.ippali@gmail.com

Hi. please provide license key for QTP 9.2, I have windows XP on my machine Thanks in Advance, moreshwar

3215

---

Hi Friendss..., can any body help me.. 1. Tell me your achievements(Technically)..? 2. Tell me your strengths(Technically) and weakness(Technical)..? 3. Why are you looking for change..?

1800

---

Suppose I created one object as virtual object? That object is applicable to that test? Or all the tests?

971

---

regular expression in qtp standar check point for months from accepting months from january to december only

1866

---

How can you exit from an action?

1033

---

How to integrate the qualitycenter with qtp

2224

---

Will there be any standards or requirements for page appearance and/or graphics throughout a site or parts of a site?

995

---

How do we analyze the checkpoint results?

1005

---

How will you handle java tree in qtp?

1069

---

In qtp, how you can exit for loop?

970

---

How to add object to object repository in qtp9.0 Suppose for brower yahoo home page

1811

---

What is synchronization? What are the ways you can synchronize?

1120

---

Plz Explain How to access Or Store Script from VSS? Explain Real time work (qtp) where you store folders and next to how to you access that folders and how you maintain folders in VSS ? What are the Menu's in VSS? Suppose in Manual, by using Checkin Checkout u can access documents. how you access in QTp REal time?

2032

---

In qtp, explain what is qrs file?

1036

---

How do I generate Test Results window using descriptive method ( run time ) after my test execution process? Please have a look of my below code. ========================================================= Dim qtApp Dim qtTest Dim qtResultsOpt Set qtApp = CreateObject("QuickTest.Application") qtApp.Launch qtApp.Visible = True qtApp.Options.Run.CaptureForTestResults = "Always" qtApp.Options.Run.RunMode = "Fast" qtApp.Options.Run.ViewResults = True qtApp.Open "C:\Automation\Example", True Set qtTest = qtApp.Test qtTest.Settings.Run.OnError = "NextStep" Set qtResultsOpt = CreateObject ("QuickTest.RunResultsOptions") qtResultsOpt.ResultsLocation = "C:\Automation\Example\Res1" qtTest.Run qtResultsOpt MsgBox qtTest.LastRunResults.Status qtTest.Close Set qtResultsOpt = Nothing Set qtTest = Nothing Set qtApp = Nothing ========================================================== This code is working fine, but Test Result window is not displaying after execution. Anybody can please help me regading the same. Thanks Akshaya Madali Capgemini India Pvt Ltd 9823213538

4259

---