Foxtable(狐表)用户栏目专家坐堂 → Excel vba 数字分列成日期代码如何转换为foxtable代码


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

主题:Excel vba 数字分列成日期代码如何转换为foxtable代码

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


加好友 发短信
等级:幼狐 帖子:113 积分:1766 威望:0 精华:0 注册:2019/10/21 21:57:00
Excel vba 数字分列成日期代码如何转换为foxtable代码  发帖心情 Post By:2021/10/12 13:31:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1634016387(1).png
图片点击可在新窗口打开查看

导出为Excel表格
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:证照整理.xls

Dim Book As New XLS.Book(ProjectPath & "muban\证照整理.xls")
Dim fl As String = "d:\证照整理.xls"

Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
导出为Excel表格后想格式化一下 E列 将数字20210826 转换成2021/8/26  
打开后用vba转的代码是
Sub 数字转日期()

    Columns("E:E").Select
    Selection.TextToColumns , DataType:=xlDelimited, FieldInfo _
        :=Array(1, 5), TrailingMinusNumbers:=True
End Sub

如何用狐表导出时直接转成日期,或者这个VBA代码怎么转成狐表代码。谢谢了!

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