Function xlwrite(xlpath,xlsheet,xlr,xlc,mydata)
Dim myxlapp,mysheet
Set myxlapp=createobject("Excel.Application")
myxlapp.Visible=true
myxlapp.Workbooks.Open xlpath
Set mysheet=myxlapp.ActiveWorkbook.Worksheets(xlsheet)
mysheet.cells(xlr,xlc)=mydata
mysheet.Application.activeworkbook.save
mysheet.Application.activeworkbook.Close
myxlapp.Quit
set mysheet= nothing
Set myxlapp=nothing
End Function

On Mon, Sep 17, 2012 at 8:45 PM, Akhalesh Yadav <[email protected]
> wrote:

> it will be work only for 1st iteration but after than it will be show
> again same msg.
>
>
>
> thanks
> akhalesh
>
>
> On Mon, Sep 17, 2012 at 8:35 PM, udhaya kumar 
> <[email protected]>wrote:
>
>> Hi Akilaesh,
>>
>>                                Use save as option with now keyword.
>>
>> Thanks,
>> Udhay
>>
>>
>> On Mon, Sep 17, 2012 at 7:26 PM, Mangalarapu Srinivas <
>> [email protected]> wrote:
>>
>>> give quine name every execution, use now key word
>>>
>>> Regards,
>>> Srinivas Mangalarapu
>>>
>>>
>>>
>>> On Mon, Sep 17, 2012 at 6:52 PM, Akhalesh Yadav <
>>> [email protected]> wrote:
>>>
>>>> hi guys
>>>>          i hav faced a problem while i am writing data on excelsheet,
>>>> for every data qtp show a pop "excelsheet existing on same location are you
>>>> want to replace it" and as i click on replace then it is saving only last
>>>> result............
>>>>
>>>> --
>>>> Akhalesh yadav
>>>> +919555717928
>>>> +919310680659
>>>>
>>>> --
>>>> You received this message because you are subscribed to the Google
>>>> "QTP - HP Quick Test Professional - Automated Software Testing"
>>>> group.
>>>> To post to this group, send email to [email protected]
>>>> To unsubscribe from this group, send email to
>>>> [email protected]
>>>> For more options, visit this group at
>>>> http://groups.google.com/group/MercuryQTP?hl=en
>>>>
>>>
>>>  --
>>> You received this message because you are subscribed to the Google
>>> "QTP - HP Quick Test Professional - Automated Software Testing"
>>> group.
>>> To post to this group, send email to [email protected]
>>> To unsubscribe from this group, send email to
>>> [email protected]
>>> For more options, visit this group at
>>> http://groups.google.com/group/MercuryQTP?hl=en
>>>
>>
>>  --
>> You received this message because you are subscribed to the Google
>> "QTP - HP Quick Test Professional - Automated Software Testing"
>> group.
>> To post to this group, send email to [email protected]
>> To unsubscribe from this group, send email to
>> [email protected]
>> For more options, visit this group at
>> http://groups.google.com/group/MercuryQTP?hl=en
>>
>
>
>
> --
> Akhalesh yadav
> +919555717928
> +919310680659
>



-- 
Akhalesh yadav
+919555717928
+919310680659

-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to