标题：求助，如何实现导出EXCEL表某列为日期格式列呢？

1楼

baoxyang 发表于：2010/3/3 10:59:00

Dim St2 As XLS.Style = Book.NewStyle
St2.Format = "yyyy-MM-dd"
For p as integer = 0 to Sheet.Cols.count -1
     if Sheet(0, p).Value Like "*日期*" then
        Sheet.Cols(p).Style = st2
     end if
Next
以上无法实现单元格为日期格式列，求教应如何实现？谢了！！

2楼

czy 发表于：2010/3/3 11:16:00

没发现有问题。

3楼

狐狸爸爸 发表于：2010/3/3 11:34:00

yyyy-mm-dd

4楼

baoxyang 发表于：2010/3/3 13:51:00

以下是引用狐狸爸爸在2010-3-3 11:34:00的发言：
yyyy-mm-dd

还是不行，导出的EXCEL表还是数据型而不是日期型，应如何实现？

5楼

mr725 发表于：2010/3/3 14:01:00

直接用：
Sheet.Cols(dt.Cols("日期").Index).Style = st2

6楼

baoxyang 发表于：2010/3/3 14:43:00

以下是引用mr725在2010-3-3 14:01:00的发言：

直接用：
Sheet.Cols(dt.Cols("日期").Index).Style = st2

没有区别吧。

7楼

czy 发表于：2010/3/3 14:46:00

一楼代码我测试过可以的，发你的示例上来看看。

共7 条记录, 每页显示 10 条, 页签: [1]