Foxtable(狐表)用户栏目专家坐堂 → 导出Excel日期时间如何判断


  共有2116人关注过本帖树形打印复制链接

主题:导出Excel日期时间如何判断

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


加好友 发短信
等级:一尾狐 帖子:498 积分:6091 威望:0 精华:0 注册:2015/4/5 14:08:00
导出Excel日期时间如何判断  发帖心情 Post By:2024/2/4 15:06:00 [只看该作者]

老师您好,请问日期“2024-01-01”、时间“14:25”、长日期时间“2024-01-01 14:25”,能分别判断吗?
For c As Integer = 0 To dt.Cols.Count - 1
    If dt.Cols(c).Visible Then
        ls=ls+1
        For r As Integer = 0 To dt.Rows.Count - 1
            If dt.Cols(c).IsDate Then '如果是数值或日期列
                sheet(r + hdr + 2, cnt).value = Format(CDate(dt(r, c)), "yyyy-MM-dd HH:mm")
            Else
                sheet(r + hdr+2,cnt).value = dt(r,c)
            End If
            If dt.rows(r)(c)=Nothing Then
                sheet(r + hdr+2,cnt).value =""
            End If            
            Sheet(r+hdr+2,cnt).Style = Style            
            Sheet(r + hdr+2,cnt).Style.WordWrap=True'自动换行
        Next       
        cnt = cnt + 1
    End If
Next

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111388 积分:567004 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/4 15:08:00 [只看该作者]

没看懂,【分别判断】具体指什么?意思是判断这个日期值有没有时分秒?

 回到顶部
帅哥哟,离线,有人找我吗?
飞云
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:498 积分:6091 威望:0 精华:0 注册:2015/4/5 14:08:00
  发帖心情 Post By:2024/2/4 15:38:00 [只看该作者]

假设表有3列,
日期列导出格式为“2024-01-01”
时间列导出格式为“14:25”
长日期列导出格式为2024-01-01 14:25

导出的时候以上三种格式能直接判断吗?
[此贴子已经被作者于2024/2/4 15:57:05编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111388 积分:567004 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/2/4 16:00:00 [只看该作者]

没有办法判断日期格式。只能统一按照1楼的用法,使用长日期格式导出

 回到顶部