[問題] VBA 讀檔後用兩個符號分割字串

[csieain ( )]

各位大大… 小妹實在是VBA的新新新手…
想要求助一下

目前讀檔後只能用一個符號分割字串
可否幫忙看看要怎麼改才能用兩個符號，分別是" "以及"|"來區分
而且重覆的符號視為一個


Option Explicit

Private Sub MemoryLoad()

Dim Separator As String

Separator = " "


ThisWorkbook.Sheets(2).Columns.Delete


Dim v, qt
    With Application.FileDialog(3)
        .Filters.Clear
        .Filters.Add "All Text Files", "*.txt"
        .AllowMultiSelect = True
        .Title = "Please select txt file"




        If .Show Then
            For Each v In .SelectedItems
               Set qt = ThisWorkbook.Sheets(2).QueryTables.Add("TEXT;" & v,
ThisWorkbook.Sheets(2).Range("A2"))

                qt.TextFileOtherDelimiter = Separator
                qt.Refresh True
            Next
        End If
    End With

ActiveWorkbook.Sheets(2).Select
MsgBox "Finish!"


End Sub


感謝各位大大…

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 124.9.50.130
→ MOONRAKER:你input咧？