Find the 'String' from excel sheet and save to another
sheet.But we don't know the string column number and row number?

Answers were Sorted based on User's Feedback



Find the 'String' from excel sheet and save to another sheet.But we don't know the s..

Answer / pushkar1206

This is working code. Don't forget to save workbook else nothing will get saved. Code is:

Set obj=createobject("excel.application")
Set obj2=obj.Workbooks.Open("C:UserspushkarDesktopBook1.xls")
Set obj3=obj2.Worksheets("Sheet1")
Set obj4=obj2.Worksheets("Sheet2")
rw=obj3.usedrange.rows.count
clm=obj3.usedrange.columns.count
For i=1 to rw
For j=1 to clm
a=obj3.cells(i,j).value
If strcomp(a,"nature")=0 Then
obj4.cells(1,2)=a
End If
Next
Next
obj2.Save
obj.Quit

Is This Answer Correct ?    1 Yes 0 No

Find the 'String' from excel sheet and save to another sheet.But we don't know the s..

Answer / kishan

set xlo=createObject("Excel.Application")
xlo.visible=True
set wbo=xlo.Workbooks.open("D:\QTP\TestData\abcdef.xls")
set wso=wbo.worksheets("Sheet1")

rcnt=wso.usedRange.rowcount
ccnt=wso.usedRange.columncount

for i=1 to rcnt
for j=1 to ccnt
str=wso.cells(i,j)
position=instr(1,str,"expected_string")
if position > 1
print "Required String is in
cell"&wso.cells(i,j)
xlo.worksheets("sheet2").cells
(1,1)="expected_string"
end if
next
next

Is This Answer Correct ?    0 Yes 0 No

Find the 'String' from excel sheet and save to another sheet.But we don't know the s..

Answer / bharathchandra maddhi

Option explicit
Dim exo, wbo, wso1, wso2, nor, noc, i, j, x, y
'Open a Excel file
Set exo=CreateObject("excel.application")
exo.Visible=true
Set wbo=exo.Workbooks.Open("C:\Bharath.xls")
Set wso1=wbo.Worksheets("sheet1")
Set wso2=wbo.Worksheets("sheet2")
nor=wso1.usedrange.rows.count
noc=wso1.usedrange.columns.count
'Varifying excel sheet strings
For i=1 to nor step 1
For j=1 to noc step 1
x=wso1.cells(i,j)
x=cstr(x)
If strcomp(x,"Bharath")=0 Then
wso2.cells(1,1)=x
End If
Next
Next
'Close excel s/w and Destroy the objects
exo.Quit
Set wso1=Nothing
Set wso2=Nothing
Set wbo=Nothing
Set exo=Nothing

Is This Answer Correct ?    1 Yes 2 No

Find the 'String' from excel sheet and save to another sheet.But we don't know the s..

Answer / 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

Is This Answer Correct ?    0 Yes 1 No

Post New Answer

More QTP Interview Questions

What are "Ordinal Identifiers" and where it is used in QTP. AS FAR AS i KNOW, its is used to identify the object. but i want clarity regarding this.

2 Answers  


If 3 browsers are opened in our system, how to enter the facebook url into second browser by using descriptive programing

3 Answers   Mind Tree,


Explain building blocks of the bpt framework ?

0 Answers  


Object Repositories types, which & when to use?

3 Answers   Crea,


How many test scripts are prapare in ur project(HeathCare Insurance).

1 Answers   Virtusa,


What are the key points to create a framework in QTP for oracle forms?

0 Answers  


HOW TO COUNT NUMBER OF ITEMS PRESENT IN WEB LIST

8 Answers  


I am new with QTP. Is anybody could tell me where I can find a good tutorial with lots of samples?

0 Answers  


A web page title might be xxxx@xyz.com or xxxy@xxx.co or xyz@abc.in.Using what mandatory properties can be the page identified.Give the regular expression for that.

3 Answers   Virtusa,


difference between waitProperty & Checkproperty

4 Answers   AON,


What are the differences between quicktest professional (qtp) and winrunner?

0 Answers  


How is recording done when a application is over lapping the QTP application it gives a message object not recorded

0 Answers  


Categories