VBA讀取分隔文本

Question

此處新增內容並且正在尋找一種從使用逗號作爲分隔符的文本文件中讀取的方法。我想將文本分配給一個變量並在程序中使用它。例如，從文本文件中的一行將是

45.325, Variable Description 

而且我需要將代碼中的變量名稱分配45.325。我找到了一個使用oFS.Readline的方法，但是它讀取整行，而我只需要它讀取（不包括）逗號。

感謝您的答覆 本

Answer 1

幾種不同的選項可供選擇，這取決於你想要做什麼。

如果您只需要逗號前的第一個值，則可以使用舊的OPEN FOR INPUT方法。該「輸入＃FF，FirstValue」的字面加載到該變量遇到的（直到達到一個逗號）的第一個值：

Public Sub SampleRead(TextFile As String) 
    Dim ff As Integer, i As Long 
    Dim FirstValue As Double 
    Dim VariableName As String 
    ff = FreeFile 
    Open TextFile For Input As #ff 
    Do Until EOF(ff) 
     i = i + 1 
     Input #ff, FirstValue 
     Input #ff, VariableName 
     Debug.Print "Variable Name: " & VariableName & " has a value of: " & FirstValue & " on line #" & i 
    Loop 
    Close #ff 
End Sub  

或者，你可以使用斯普利特（）來解析文本行您可以使用。閱讀文本（您可以使用「線路輸入」來做同樣的事情），以便將它們分解爲特定變量。