Assalamu'alaikum Wr. Wb.

Saya mempunyai data di text file (jwb.txt) seperti ini:
A007,Abdurrahman,Fisika;22/7/2000;Lombok Barat,NTB;Narmada;ABCDEFGHIJ
    
    Dim sData as String
    Open "D:\jwb.txt" For Input As #1
    Cells(5, 2).Select
    Do While Not EOF(1)
        Input #1, sData
        ActiveCell.Value = sData
        ActiveCell.Offset(1, 0).Select
    Loop
    Close #1

Pertanyaan:
1. Kenapa tanda koma (,) dianggap sebagai new line?
2. Bagaimana cara untuk memecah data tersebut ke setiap kolom, dimana tanda 
titik koma (;) menjadi pemisahnya? (5 kolom)

Terima kasih, mohon maaf kalau ada yang salah.
Wassalamu'alaikum Wr. Wb.

Kirim email ke