Bazı durumlarda bir metni belirlediğiniz bir ayraç ile bölmek isteyebilirsiniz. Bu durumda VBA üzerinden bir fonksiyon tanımlamak isterseniz;
Function ile başlayan bir prosedür eğer özelikler Private olarak belirtilmedi ise Public güvenlik anahtarına sahip olacağından Excel üzerinde formül olarak doğrudan kullanılabilir.
Bu durumda yukarıdaki fonksiyonu Excel'den şöyle çağırabilirsiniz: =SplitText(A1;";")
Bu fonksiyon iki parametre ile çalışıyor. İlki Metni alıyor, ikincisi neye göre böleceğini soruyor.
VBA Split fonksiyonu ile metni bölücü parametresine göre metni dizi elemanlarına ayırıyor.
VBA
3 satır
Function SplitText(Metin As String, bolucu As String)
SplitText = Split(Metin, bolucu)
End FunctionBu durumda yukarıdaki fonksiyonu Excel'den şöyle çağırabilirsiniz: =SplitText(A1;";")
Function SplitText(Metin As String, bolucu As String)SplitText = Split(Metin, bolucu)
Moderatörün son düzenlenenleri:
