以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  文本文档转换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106542)
--  作者：发财
--  发布时间：2017/9/11 11:31:00
--  文本文档转换
老师你好！如何将文本文档转换成EXCEL2003表？
--  作者：有点甜
--  发布时间：2017/9/11 11:34:00
--  

方法一：直接导入到excel

 

http://jingyan.baidu.com/article/359911f5108f3757fe0306fb.html

 

方法二：先导入到foxtable，然后foxtable导出成excel
--  作者：发财
--  发布时间：2017/9/14 8:28:00
--  
代Application.Dialogs(666).Show打开窗口导入文本后，再重新导入就提示不行？
--  作者：发财
--  发布时间：2017/9/14 8:29:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20170914082847.png
图片点击可在新窗口打开查看
--  作者：有点甜
--  发布时间：2017/9/14 8:40:00
--  
测试没问题，上传具体例子说明。
--  作者：发财
--  发布时间：2017/9/14 8:54:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:新建 microsoft office excel 97-2003 工作表.xls
--  作者：发财
--  发布时间：2017/9/14 8:54:00
--  
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:新建 文本文档.txt
--  作者：有点甜
--  发布时间：2017/9/14 9:48:00
--  
    On Error Resume Next
   
    Range("A1").Select
    Selection.QueryTable.Delete
    Selection.ClearContents
    Application.Dialogs(666).Show
--  作者：发财
--  发布时间：2017/9/14 10:18:00
--  
如何做到先清空再导入？
--  作者：有点甜
--  发布时间：2017/9/14 10:25:00
--  
以下是引用发财在2017/9/14 10:18:00的发言：
如何做到先清空再导入？

 

选取全部单元格，清空

 

    On Error Resume Next
   
    UsedRange.Select
    Selection.QueryTable.Delete
    Selection.ClearContents
    Application.Dialogs(666).Show