[AccessD] Programmatically change cell formulae in Ecel

Arthur
Glad it worked !!  Will add it to the list of " you better remember"  
For me with a last name of O'Connor and dealing with many legacy systems I have learned to try almost anything to work around.
 
Have a good evening
Patti
*************************************************************
* Patricia E. O'Connor
* Associate Computer Programmer/Analyst
* OTDA - BDMA
* (W) mailto:Patricia.O'Connor at otda.state.ny.us
* (W) mailto:aa1160 at otda.state.ny.us
***********************************************************


--------------------------------------------------------
This e-mail, including any attachments, may be confidential, privileged or otherwise legally protected. It is intended only for the addressee. If you received this e-mail in error or from someone who was not authorized to send it to you, do not disseminate, copy or otherwise use this e-mail or its attachments.  Please notify the sender immediately by reply e-mail and delete the e-mail from your system. 


________________________________


From: accessd-bounces at databaseadvisors.com on behalf of Arthur Fuller
Sent: Wed 11/28/2007 6:39 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Programmatically change cell formulae in Ecel



Bizarrely enough, this appears to be the answer. Those accursed single
quotes! Who knew?

Arthur

On Nov 28, 2007 3:37 PM, O'Connor, Patricia (OTDA)
<Patricia.O'Connor at otda.state.ny.us>
wrote:

> hi Arthur
> Sorry I am not at work to really try this out before sending a answer
> if I had a copy of the excel spreadsheet I could play with it a bit more
> and test
> But when building strings and I tend to put the " and ' in using the CHR()
>  and have gotten around many problems
>
> Dim strFormula as String
> strFormula = CHR(34) & "=VBLOOKUP(A6," & CHR(39) &
> strFormula = strFormula & "S:\Lgroup\Fundacct\Excel\!INVPORT\CSV
> FILES\Sep07\[# of securities.xls]SOI"
> strFormula = strFormula & CHR(39) & "!$B$3:$C$100,2,TRUE)" & CHR(34)
>
> or
> strFormula =  "=VBLOOKUP(A6," & CHR(39) &
> strFormula = strFormula & "S:\Lgroup\Fundacct\Excel\!INVPORT\CSV
> FILES\Sep07\[# of securities.xls]SOI"
> strFormula = strFormula & CHR(39) & "!$B$3:$C$100,2,TRUE)"
>
> HTH
> Patti
>
>
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com <http://www.databaseadvisors.com/>