Exporting to Excel

[ChrisAgius]

I have an application which exports the data to an excel sheet. I want to transform the cells into a Text Format. Can anyone tell how to set the Format of the excel cells from Foxpro.

Thanks a Lot.

 

[BlindPete]

You can also do it by how you send the data to Excel. Rather than
oCell.value = nInt you can use
oCell.value = STR(nInt)

Otherwise check out the help file VBAXL9.CHM it has the compete map of the Excel object.
-Pete

 

[Excel]

Where can I find this file ?

The Problem is that the Data I am Passing over are string.
But some of the Strings are numeric like "232323233" but the Excel have the Format General and this String is recognised as a numeric Value and is aligned Right and with the Exponent if the Number is large, unlike the text format.

Thanks

 

[rgbean]

Chris (and Excel),
The VBAXL9.CHM file is optionally installed with Office 2000, for other versions of Office the name would be different.
Pete's suggestion will work if you are using object automation to export the data, but if you are using the COPY TO or EXPORT TO commands, the interpretation of the field types is based on Excel's "best guess".

Rick

 

[BlindPete]

on my machine VBAXL9.CHM is at
C:\program files\Micosoft Office\Office\1033

Just run File Find from the start menu. If it was installed you'll find it.
-Pete

 

[repete]

"The Problem is that the Data I am Passing over are string. But some of the Strings are numeric like "232323233" but the Excel have the Format General and this String is recognised as a numeric Value and is aligned Right and with the Exponent if the Number is large, unlike the text format."

if you format your cells BEFORE you copy over the data, your data will appear correctly.

ie
select the range you require....
then format>cells>number>text>ok
then copy your data




Pete Bloomfield
Down Under

 

[BlindPete]

Here is an example of some Excel object code to format a cell... oCL is an Excel Cell object

cNumberFormat1 = "0.00"
cNumberFormat2 = "$#,##0"
oCL.NumberFormat = cNumberFormat2
oCL.Value = nGLab + nGEqp + nGMat + nGOth
oCL.Font.Bold = True
oCL.Font.Italic = True
-Pete