1.How to find in which row or column,string "Hyderabad"
exist in excel sheet?
2.How to find how many times character "a" repeated in a
given string "Koteswararao"
Answers were Sorted based on User's Feedback
Answer / lakshmi
str="Koteswararao"
st=Split(str,"a")
Msgbox ubound(st)
Please let me know if u have simplest answer than this.
| Is This Answer Correct ? | 23 Yes | 1 No |
Answer / venkatesh naidu rangisetti
Option Explicit
Dim a,b,c,i,leng,var
b=0
c="a"
a="Koteswararao"
leng=len(a)
msgbox "length of"&" "&a&" "&"is"&" "&leng 'optional step
For i=1 to leng
var=mid(a,i,1)
If cstr(var)=cstr(c)Then
b=b+1
End If
Next
msgbox "Total Number of a's in Koteswararao are"&" "&b
| Is This Answer Correct ? | 9 Yes | 1 No |
Answer / lakshmi
Set ObjExcel=CreateObject("Excel.Application")
ObjExcel.Workbooks.Open("C:\Find.xls")
Set Obj=ObjExcel.Sheets.Item(1)
rowcount=Obj.usedrange.rows.count
colcount=Obj.usedrange.columns.count
For i=1 to rowcount
For j=1 to colcount
Aval=Obj.Cells(i,j)
If StrComp(Aval,"HYDERABAD")=0 then
MsgBox "Location Is : ("&i&","&j&")"
Exit For
Exit For
End If
Next
Next
Please let me know if you have simplest answer than this.
Thx
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / lakshmi
Set ObjExcel=CreateObject("Excel.Application")
ObjExcel.Workbooks.Open("C:\Find.xls")
Set Obj=ObjExcel.Sheets.Item(1)
rowcount=Obj.usedrange.rows.count
colcount=Obj.usedrange.columns.count
For i=1 to rowcount
For j=1 to colcount
Aval=Obj.Cells(i,j)
If StrComp(Aval,"HYDERABAD")=0 then
MsgBox "Location Is : ("&i&","&j&")"
Exit For
Exit For
End If
Next
Next
Please let me know if you have simplest answer than this.
Thx
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / srividya
msgbox(len("Koteswararao")-len(Replace("Koteswararao","a","")))
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / lak
1)Find Cell data(Hyderabad)
dim obj,objwb,objsheet,search_item,found,flagrow,flagcol
Set obj=Createobject("Excel.Application")
Set objwb=obj.WorkBooks.Open("D:\Find.xls")
Set objsheet=objwb.Sheets("Sheet1")
obj.visible="True"
search_item="HYDERABAD"
set found=objsheet.Cells.Find(search_item)
On Error resume next
flagrow = found.Row
flagcol = found.Column
msgbox "Location Is : ( Row : "&flagrow&",Col :"&flagcol&")"
objwb.Save
objwb.Close
Set objwb= Nothing
'-----------------------------------------------------------
2) Repeated Character
str="Koteswararao"
repcnt=Split(str,"a")
Msgbox "Count :"&ubound(repcnt)&""
| Is This Answer Correct ? | 1 Yes | 0 No |
What is difference between QTP 8.2 Obect Repository and QTP 9.2 object Repository?
can any one tell me How exactly data drivent testing is done in.explain with any example and the exact steps to fallow?
What is a quick test professional?
Hi Small doubt . i am working as Contract employee in XYZ comany thrw ABC Consultancy. so. How i write my resume ? In Professional experience Column. plz send urgent
Explain sub procedure of vbscript.
How we can differentiate between stand alone application and web application in QTP?
Action1: I have a value "test" stored in a variable X. I want to use that variable X in Action2 .. how?
After fixing the bug, the same bug is raising again and again in new builds what we have to do? That bug is high level bug.
Suppose u write test case in Excel sheet . how u open that test case in Test Director?
Hi, I have a login page. To login in that page I need to have a valid username and password, which is stored in database. I imported that table to my DataTable in QTP (Global sheet). Now I need to write a code in qtp so that I can login only with valid username and data. my condition is : I want to get username and password from inputbox(which i did) and click on login button- which should verify the datatable for username and password and if value is present only then lofin else stop the testing. DataTable contains columns : LoginName and Password Code: Rowcount= DataTable.GetSheet("Global").GetRowCount msgbox "RowCount= " &RowCount,1 CurrentRow= DataTable.SetCurrentRow(1) Do Browser("").Page("").Frame("Frame").WebEdit("ctl10$ct l00$ctl00$UserName$ctl").Set DataTable("LoginName",1) Browser("").Page("").Frame("Frame").WebEdit("ctl10$ct l00$ctl00$Password$ctl").Set DataTable("Password",1) Browser("").Page("").Frame("Frame").Link("Login").Cli ck CurrentRow=CurrentRow+1 Loop Until CurrentRow>Rowcount Can anyone help? Thanks, Priya
Differences between quicktest professional (qtp) and winrunner?
Hi, I am using OutputCheckPoint and I am storing the value in the data table. The stored value for column:bedroom:"Bed:4" The another value for column:bathroom:"Bath:2 Full,1 Partial" I need only the no 4 from the first column. I need only the no 2,1 from the second column. I used split array,but it also show array(0) has the value"bed:4" ..... Even though I highlight only 4,It is seleting the full value "bed 4".How can I get only the nos Thank you Uma