Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Void excel 'To save?' message
Message
 
 
To
23/04/2009 08:38:40
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
01396028
Message ID:
01396052
Views:
61
You're welcome.

>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
--sb--
Previous
Reply
Map
View

Click here to load this message in the networking platform