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 the difference between QTP 8.2 and QTP 9.2
Explain process of smart Identification in QTP?
How do we Access, retriew and edit the runtime objects in Automation Testing using QTP
I have a tool bar where 5 different buttons are placed, but these buttons are not traceable hence i have created a virtual object on save button of this toolbar. Now pls tell me how to use this virtual object while write script.
i want to learn testing tools what i have to know before.iam fresher i dnt know any this..which langagues i have to before testing.
How can I use Call dlls in QTP ?
i have asked earlier only one question how to test web application using QTp plz send me the answer quickly
How you handles Pop-up windows which are Dynamically changing in Runtime?
What is the syntax to call one script from another? And what can be the syntax to call one “action” in another?
how to write vbscript on web applications in qtp. explian with one example?
How QTP identify the system time that's changes every seconds?
What is Environment Variable and when we apply this in QTP?