Foxtable(狐表)用户栏目专家坐堂 → 电子表导出问题


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

主题:电子表导出问题

帅哥,在线噢!
HJG_HB950207
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:396 积分:6089 威望:0 精华:0 注册:2015/2/17 10:18:00
电子表导出问题  发帖心情 Post By:2023/8/24 16:54:00 [显示全部帖子]

表A字段: 综合码,交易时间




综合码为字符型,如:   川ABQ060黄色|2023-08-02 08:51:00

交易日期为日期型(DateLongTime)表达式=SubString([综合码],11,28)  ,如上生存时间: 2023-08-02 08:51:00



此表时间参与计算和显示等都没问题, 但生存电子表格时为空表,请教原因。

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


加好友 发短信
等级:小狐 帖子:396 积分:6089 威望:0 精华:0 注册:2015/2/17 10:18:00
  发帖心情 Post By:2023/8/24 17:04:00 [显示全部帖子]

Dim a As Date = Date.Today

Dim flg As New SaveExcelFlags
flg.RowNumber = True
flg.CellStyle = True
Tables("车牌车型").SaveExcel("D:\门架资料\门架识别.xls", "'" & a & "'", flg)
 Dim proc As New Process
    proc.File = "D:\门架资料\门架识别.xls"
    proc.Start

 回到顶部