Delphi调用Excel设置单元格的格式

在做设计过程中,需要把数据内容导入到Excel中,可是每次导入EXcel之后,总有一些数据不能正常显示,比如'123456789012'显示为科学技术形式'1.23457E+11’,还有以'0’开头的数据总会把0撇开再显示。

在VB中好像这么更改Excel更改单元格式:
Worksheets("Sheet1").Range("A17").NumberFormat = "General"      //对A17 单元格格式进行设置
Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss"             //对第一行格式进行设置。
Worksheets("Sheet1").Columns("C"). NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"    //对数字格式进行设置。

我需要的是把第一列的格式设置从数字类型转换成文本类型的:

转换方法如下: WorkSheet[1].Columns[2].NumberFormatlocal := '@'

 

有了这个,其他格式的转化方法还不手到擒来,呵呵。

你可能感兴趣的:(Delphi调用Excel设置单元格的格式)