Foxtable(狐表)用户栏目专家坐堂 → [求助]导出EXCLE时间显示不对


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

主题:[求助]导出EXCLE时间显示不对

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/16 9:53:00 [显示全部帖子]

saveExcel以后,打开这个excel,循环每一行、每一个单元格,然后做你需要的各种操作

 

类似代码如下

 

Dim Book As New XLS.Book("c:\test\订单.xls")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim nms() As String = {"编号","产品","客户","雇员","单价","折扣","数量","日期"}
'注意下面的循环变量从1开始,而不是从0开始,因为Excel表的第一行是标题
For n As Integer = 1 To Sheet.Rows.Count -1
    For m As Integer = 0 To nms.Length - 1

    Next
Next

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/16 10:22:00 [显示全部帖子]

直接saveExcel以后打开算了

 

Dim tbl As Table = Tables("室内设计项目")
Dim flg As New SaveExcelFlags
flg.CellStyle = True
tbl.SaveExcel("f:\室内设计项目.xls","test",flg)
Dim Proc As New Process
Proc.File = "f:\室内设计项目.xls"
Proc.Start()


 回到顶部