Dizileri İç İçe Döngüye Eklemek
02 Ocak 2021
767
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 | |
|---|---|
| Soldaki Veriyi Kopyalama | Ctrl R |
| Aynı hücre içinde bir alt satıra geçme | Alt Enter |
| Sayfayı Varsayılan Yakınlık Yüzdesine Geri Getirme | Alt M C |
| Hücreyi Kopyalama/Çoğaltma | Ctrl Sürükle |
| Hızlı Kenarlık Ekleme | Ctrl Shift & |