.txtファイルをカスタムデリミタの配列に直接変換する

Question

.txtファイルをexcel VBAの配列に直接変換しています。デフォルトの区切り文字は "、"（コンマ）で、 "vblf"に変更する必要があります。私は今日のコードでそれをどうやって行うのかを考え出すのに苦労しています。一度にカンマ区切りの、一つの変数でデータを読み込むことを意図している

Input #intFileNum, strRecordData 

Line Input #intFileNum, strRecordData 

Input

に

変更

Const strFileName As String = [file] 
    Dim CONFIGTXT(1 To 13000) As String 
    Dim intFileNum As Integer 
    Dim intCount As Integer 
    Dim strRecordData As String 

    intFileNum = FreeFile 
    intCount = 1 
    Open strFileName For Input As #intFileNum 
    Do Until EOF(intFileNum) Or intCount > 13000 
     Input #intFileNum, strRecordData 
     CONFIGTXT(intCount) = strRecordData 
     intCount = intCount + 1 

    Loop 
    Close #intFileNum 

    Range("Q2:Q" & UBound(CONFIGTXT) + 1) = WorksheetFunction.Transpose(CONFIGTXT) 

Answer 1

助けてください。あなたは

12345,789

のデータを持っていたし、var1、文

Input #intFileNum var1, var2 

を使用した場合たとえば、値12345とvar2が値を与えられる与えられる789 。

Line Inputは、改行文字（通常CR/LF）で区切られた行を一度に読み込むことを意図しています。

---

注：データが線で区切られた情報がフィードされている場合、これは、アレイ内の個別のエントリにこれらの部分を分離しません。だからあなたのデータは

が含まれている場合はXXX/XXX/XXX

/は、レコード全体が最終的な出力で一つのセルの中に置かれることを、実際に改行され

。