返回列表 上一主題 發帖

txt文字檔匯入excel VBA?

本帖最後由 7777 於 2017-10-2 19:58 編輯

直接用excel去開啟文字檔
開啟後就會有資料剖析ㄉ選擇頁面出現了

Sub Macro1()
    Workbooks.OpenText Filename:="C:新增文字文件.txt" _
        , Origin:=950, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
        xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, _
        Comma:=False, Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), _
        Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1)), _
        TrailingMinusNumbers:=True
End Sub


能請問~

如何可以不再開新檔下
直接在
現有的excel檔案中,
Sheet2的工作表
A5匯入

感謝
50 字節以內
不支持自定義 Discuz! 代碼

TOP

        靜思自在 : 閒人無樂趣,忙人無是非。
返回列表 上一主題