07-06-2013, 04:08 PM
Check this -
Code:
iRow = DataTable.GetCurrentRow 'Get the current row count from DataTable
Set oexcel = createobject("Excel.Application") 'to create excel
oexcel.Visible = true
oexcel.Workbooks.Add
Set objSheet1 = oexcel.Sheets("Sheet1")
If not Window("Calculator").Exist(1) Then
systemutil.Run ("C:\WINDOWS\system32\calc.exe")
End If
Window("Calculator").WinEdit("Edit").Type DataTable("A", dtGlobalSheet)
Window("Calculator").WinButton("*").Click
Window("Calculator").WinEdit("Edit").Type DataTable("B", dtGlobalSheet)
Window("Calculator").WinButton("=").Click
WOR = window("Calculator").WinEdit("Edit").GetROProperty("text")
Window("Calculator").WinButton("C").Click
objSheet1.Cells(iRow,1).Value = WOR
Want to fast track your QTP/UFT Learning? Join our UFT Training Course