5

Excel 2010 スプレッドシートがあり、.txt ファイル (および将来的には別の .xls ファイル) から情報を読み込んでいます。

このテキスト ファイルには、行ごとに 3 つの要素があります。名、姓、および役職であり、各要素はカンマで区切られています。Excelにデータを読み込んで貼り付けていますが、各行は1つのセルに貼り付けられています。各要素を異なる列に貼り付けようとしています。区切る必要があることはわかっていますが、構文がわかりません。

私の質問は、各要素を分離して独自のセルに貼り付ける方法です。現在、.txt ファイルの各要素を区切るためにコンマを使用していますが、将来のファイルではタブ、ピリオド、セミコロンなどを使用する可能性があります。すべてのベースがカバーされるように拡張するにはどうすればよいですか?

以下は私のコードで、私のコードの下にはダミーデータのサンプルがあります

Sub FetchDataFromTextFile()
    Dim i As Long
    Dim LineText As String
    Open "C:\mytxtfile.txt" For Input As #24
    i = 2
    While Not EOF(24)
        Line Input #24, LineText
        ActiveSheet.Cells(i, 2).Value = LineText
        P = Split(Record, ",")
        i = i + 1
    Wend
    Close #24
End Sub

ジョン、ドウ、ボス

ジョニー、スティール、マネージャー

ジェーン、スミス、従業員

注: 他のプログラミング言語の能力はありますが、約 6 ~ 7 年で VB はできません。私は VB 構文に頭を悩ませているようには見えないので、初心者のように扱ってください。

4

1 に答える 1