Modül 12: Gelişmiş Veri
UBound ve LBound (Dizi Boyutlarını Bulmak)
Dizinin Alt ve Üst Sınırı
Split ile ayırdığınız kelimelerin veya sayfadan aldığınız verilerin sınırlarını UBound (Upper Bound) bulur.
VBA Kodu:
Sub SinirBul()
Dim isimler() As String
isimler = Split("Can,Cem,Efe,Eda", ",")
MsgBox "Bu dizide " & UBound(isimler) + 1 & " isim var."
End SubNe Göreceksiniz? Virgülle ayrılmış 4 isim olduğu için ekranda "Bu dizide 4 isim var." mesajı çıkacaktır.