Foxtable(狐表)用户栏目专家坐堂 → [求助]excel导出模板日期列设置格式


  共有6207人关注过本帖平板打印复制链接

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

帅哥哟,离线,有人找我吗?
xu3180497
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:153 积分:1174 威望:0 精华:0 注册:2013/6/19 10:54:00
[求助]excel导出模板日期列设置格式  发帖心情 Post By:2013/7/1 10:43:00 [只看该作者]

现在有个表,其中有两列是起始日期和截止日期,需要将这个表导出到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显示的格式?


 回到顶部
总数 12 1 2 下一页