主题：[求助]excel导出模板日期列设置格式

现在有个表，其中有两列是起始日期和截止日期，需要将这个表导出到excel中，excel中关于这两列起始日期和截止日期的值统一为一列，名字是起止日期。如果表中起始日期和截止日期都是相同的，如2012-08-19，那么excel的起止日期列取值就是表中起始日期的值即2012-08-19。如果起始日期和截止日期不同的的话，比如起始日期2012-08-19，截止日期2012-09-23，那么excel的起止日期就取2012-08-19-2012-09-23。现在问题就是我想将日期格式设置为YYYY.MM.DD而不是YYYY-MM-DD。因为如果起始日期和截止日期不同的话，2012-08-19-2012-09-23这样就不好看，改成2012.08.19-2012.09.23就很清晰了，请问有什么好的办法？

excel起止日期列现在的格式是：

<IIF([检修起始日期] = [检修截止日期], [检修起始日期],[检修起始日期] & "-" & [检修截止日期])>

另外我在导出代码中对单一日期格式的也进行了格式的设定，如下：

    Dim Book As New XLS.Book(ProjectPath & "模板\检修记录.xlsx")
    Dim Sheet As XLS.Sheet
    Dim Style As XLS.Style
    Dim count As Integer
    Book.Build() '生成细节区
    Sheet = Book.Sheets(0)
    Style = Book.NewStyle
    Style.Format = "yyyy.MM.dd"
    count = Sheet.Rows.Count
    For i As Integer = 3 To count -1
        Sheet(i,1).Style = Style
    Next

请问怎么控制像2012-08-19-2012-09-23导出后在excel显示的格式？

能否上个例子?

这是导出excel的模板：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:检修记录.xlsx

这是foxtable设计和代码：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:检修记录.table

麻烦帮我的导入功能也看下。怎么将起止日期中的起始日期和截止日期拆开导入到表中，导出就是怎么将表中的起始日期和截止日期合并按照要求的格式导出到excel中。

.

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:检修记录.xls

呵呵  看你你没太明白我的意思，我自己再想想吧。

你不是想这样吗?

这样也行，怎么解决的?是通过修改excel格式实现的？

此主题相关图片如下：qq截图20130701141104.png

还有一个问题，就是虽然excel显示的是2012.02.23但是传到后台即Sheet(?,?).Value还是2012-2-23不知道怎么去解决这个问题呢？这样我根据“-”去使用split函数拆分日期就不行啊。请指教！

你的问题是什么.我没看懂.  这不是符合你要求了吗?

我下了你的模板，结果还是不行啊，还是跟原来一样啊，我的意思是：

1、你是怎么将2012-02-03-2012-02-23这样的日期格式转换成2012/2/3-2012/2/23这样的格式的。

2、转换成上面那样的格式后，是显示是这样的的格式还是内容就是这样？我从后台读取到的sheet的值还是2012-02-03这样格式的值而不是转换后2012/2/3这样的值，怎么解决？

 

此主题相关图片如下：qq截图20130701142705.png

怎么转换成2012/2/3-2012/2/23这样的格式？

 

这个和你系统日期格式有关.要不你全部当字符串处理.就简便很多了.