Dizileri İç İçe Döngüye Eklemek
02 Ocak 2021
806
Dizileri İç İçe Döngüye Eklemek isimli kodu kullanarak, belirlediğiniz dizi içeriklerini istediğiniz gibi iç içe yönetme işlevini yerine getirebilirsiniz.
Sub Dizi_Dongu()
Dizi = Array(Array("Kedi", "Köpek"), Array("Tavşan", "Timsah"))
For r = 0 To 1
For c = 0 To 1
txt = txt & Dizi(r)(c) & " "
Next c
txt = txt & vbNewLine
Next r
MsgBox txt
End SubGerekli Adımlar
Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Üstteki kodda iç içe döngü ile iki ayrı Diziyi birlikte kullandık. Bir Dizi İfadesi oluşturup, o Dizi dönerken ikinci bir dizi ile içerikleri listeledik.
Etiketler :
| YARARLI KISAYOLLAR | |
|---|---|
| Binlik Ondalık Ayırıcı Ekleme | Ctrl Shift 1 |
| Hücreyi Sola Yaslı Hale Getirmek | Alt Ş SO |
| Ortası Çizgili Yazdırma | Ctrl 5 |
| Bitişik Hücre Aralığı Seçme | Shift Tıklama |
| Hücreyi Üste Yaslı Hale Getirmek | Alt Ş ÜS |