Vba'da bir dizide nasıl gezinilir?
VBA’da bir diziyi yinelemek için For (For Next) döngüsünü kullanabilirsiniz. Ve bu döngü kodunu yazmak için dizinin boyutunu (üst ve alt sınır) bilmeniz gerekir, böylece her ikisini de döngü için sayaç olarak kullanabilirsiniz. Temel olarak for döngüsü, dizinin ilk elemanından başlayacak ve sonuncuya kadar devam edecektir.
1’den 5’e kadar beş öğeli aşağıdaki tablonuz var ve bu öğelerde sayılarınız var. Yani fikir, bu beş öğeyi yineleyebilecek bir kod yazmak ve sonra onu 2 ile çarpmaktır.
VBA’da bir dizide döngü yapma
- Öncelikle dizinin üst ve alt sınırlarını bilmeniz ve bunun için UBOUND ve LBOUND fonksiyonlarını kullanmanız gerekir.
- Bundan sonra döngü için bir sayaç oluşturmak için bu limitleri kullanmanız gerekir.
- Daha sonra, elemanın değerini 2 ile çarpmak için bir satır kodu yazmanız gerekir. Bu kod satırı, elemanın değerini alıp daha sonra çarpacaktır.
- Sonunda döngü kodunu kapatmak için “Sonraki” anahtar kelimesini kullanın.
İşte kodun tamamı.
Option Base 1 Sub vba_array_loop() Dim myArray(5) As Integer myArray(1) = 10 myArray(2) = 20 myArray(3) = 30 myArray(4) = 40 myArray(5) = 50 Dim uB As Integer, lB As Integer uB = UBound(myArray) lB = LBound(myArray) For i = lB To uB myArray(i) = myArray(i) * 2 Next i End Sub
VBA nedir