EXCEL报表 ( 积分: 100 )

L

liubin5931

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #1

请问，我用EXCEL做报表，将数据库的数据转换成EXCEL格式的时候，数据库里的数据转成EXCEL中时，都变了，比如986543222222就变成了9。87E+11。我想让在EXCEL中完全不变的将数据库里的数据就按数据库里的格式原封不动的显示出来！那位大哥大姐能指点我一下，我 可以 将程序代码发到您的油箱里，非常感谢，我急的交差！呵呵

 

L

liubin5931

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #2

请问，我用EXCEL做报表，将数据库的数据转换成EXCEL格式的时候，数据库里的数据转成EXCEL中时，都变了，比如986543222222就变成了9。87E+11。我想让在EXCEL中完全不变的将数据库里的数据就按数据库里的格式原封不动的显示出来！那位大哥大姐能指点我一下，我 可以 将程序代码发到您的油箱里，非常感谢，我急的交差！呵呵

 

T

ty_unix

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #3

呵呵，在程序导入的时候控制execl为文本格式就可以了，至于怎么控制，我没试过
因为我也碰到这个问题，但是我都是从文本导入excel，在导入的时候选择身份证那
一列为文本。其实导入后，你双击那一个数据，也会改变

 

H

haoquandeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #4

将单元格设为字符方式。用这个吧:
ExcelWorksheet.Cells.Item[Row,Col].NumberFormatLocal := '@';

 

E

elm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #5

也可以在输出的数字前加 ' 号也行 ，例如：
eclApp.Cells[Row,Col] := ''''+ Qry.Fields[j].AsString

 

M

missinwind

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #6

如haoquandeng所说。

 

C

chendecheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #7

可是大家有没有遇到过用ExcelWorksheet.Cells.Item[Row,Col].NumberFormatLocal := '@';

如果是00033会变成33呢?

 

C

chendecheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-01-31

• #8

可是大家有没有遇到过用ExcelWorksheet.Cells.Item[Row,Col].NumberFormatLocal := '@';

如果是00033会变成33呢?