看板 [ Office ]
討論串[問題] VBA讀取TXT格式問題
共 3 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓0(0推 0噓 10→)留言10則,0人參與, 最新作者aup65797 (有緣人)時間9年前 (2016/07/09 20:59), 編輯資訊
0
0
1
內容預覽:
Sub test(). Dim qt As QueryTable. Set qt = ActiveSheet.QueryTables.Add("TEXT;d:\20160703.txt", [a1]). With qt. .AdjustColumnWidth = False. .TextFilePa
(還有168個字)

推噓0(0推 0噓 16→)留言16則,0人參與, 最新作者aup65797 (有緣人)時間9年前 (2016/07/03 17:35), 編輯資訊
0
0
0
內容預覽:
附上Codes 我試了一下您的方法讀到excel檔會是. 0無資料1無資料1無資料1 ====>我需要把無資料那攔刪除 , 如同你的圖示那樣. Do. If xChk = 0 Then. xFile = Dir(ThisWorkbook.Path & "\*.txt"). If xFile = ""
(還有598個字)

推噓0(0推 0噓 1→)留言1則,0人參與, 最新作者aup65797 (有緣人)時間9年前 (2016/07/03 16:55), 編輯資訊
0
0
0
內容預覽:
(若是和其他不同軟體互動之問題 請記得一併填寫). 軟體:Office. 版本:2010. 以下是.txt檔的內容. 0, 1, 1, 1,. 希望讀取讀取到office裡的格式. 0 1 1 1. 增加這個程式但不能使用. .TextFileOtherDelimiter = ",". 請各位大師幫
首頁
上一頁
1
下一頁
尾頁