Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Void excel 'To save?' message
Message
From
23/04/2009 08:38:40
 
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
01396028
Message ID:
01396049
Views:
59
Thank you
>Try
>
>oSheet.Saved = .T.
>
>>
>>I call excel worksheet functions from vfp.
>>I change one cell and return value from other.
>>As following
>>set strictdate to 0
>>messagebox(alltrim(gethebdate({12/16/1969})))
>>set strictdate to
>>function gethebdate
>>	lparameters djdate
>>	local chebdate
>>	set strictdate to 0
>>	objexcel= createobject("Excel.Application")
>>	oworkbook = objexcel.workbooks.open('c:\c.xls')
>>	osheet = oworkbook.activesheet
>>	osheet.cells(3,2).value= djdate
>>	chebdate=osheet.cells(3,3).value
>>	objexcel.quit
>>	return chebdate
>>endfunc
>>It's work fine but Excel ask me if to save the change and its very unnecessary service for me.
>>How can I void it?
>>Thanks
Thank you
Chaim
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform