Bagaimana cara menavigasi array di vba?

Di VBA, untuk melakukan iterasi melalui array, Anda dapat menggunakan loop For (For Next) . Dan untuk menulis kode perulangan ini Anda perlu mengetahui ukuran array (batas atas dan bawah) sehingga Anda dapat menggunakan keduanya sebagai penghitung perulangan. Pada dasarnya perulangan for akan dimulai dari elemen pertama array dan perulangan hingga elemen terakhir.

Anda memiliki tabel berikut dengan lima elemen dari 1 hingga 5 dan dalam elemen ini Anda memiliki angka. Jadi idenya adalah menulis kode yang dapat melakukan iterasi melalui lima elemen ini dan kemudian mengalikannya dengan 2.

vba-loop-melalui-a-radius-1

Ulangi array di VBA

  1. Pertama-tama, Anda perlu mengetahui batas atas dan bawah array dan untuk itu Anda perlu menggunakan fungsi UBOUND dan LBOUND.
  2. Setelah itu Anda perlu menggunakan batasan ini untuk membuat penghitung untuk perulangan.
  3. Selanjutnya, Anda perlu menulis kode baris untuk mengalikan nilai elemen dengan 2. Baris kode ini akan mengambil nilai elemen itu sendiri dan kemudian mengalikannya.
  4. Pada akhirnya, gunakan kata kunci “Berikutnya” untuk menutup kode loop.

Berikut kode lengkapnya.

 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

Tambahkan komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *