Split ile Metinleri Kelimelere Parçalamak

Metin Analizi

Kötü formatta gelmiş bir CSV verisini veya boşluklu ad-soyad bilgisini parçalamak için en etkili VBA komutudur.

VBA Kodu:

Sub Parcala()
    Dim kisiler() As String
    kisiler = Split("Ahmet,Mehmet,Ayşe", ",")
    MsgBox "İkinci sıradaki kişi: " & kisiler(1)
End Sub

Ne Göreceksiniz? Metin virgüllerden koparılacak ve diziler 0'dan başladığı için kisiler(1) kodu ekrana "Mehmet" yazdıracaktır.