Dizileri İç İçe Döngüye Eklemek

02 Ocak 2021 798

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 Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. 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.
  3. Araç çubuklarından Insert -> Module yazısına tıklayın.
  4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
  6. Ü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.

50 Farklı Hazır Makro (VBA) Kodu
Top 10 Değeri Renklendirme
Makro ile Web Sitesini Açmak
Tüm Satırları ve Sütunları Gösterme
Sürücü Adı Kontrolü Yapma
Toplu Satır Silme
MsgBox Nesnesi ile Cevap Seçeneği Sunma
Sütunun Herhangi Hücresine Çift Tıklayınca UserForm Açılsın
Yorumları İçeren Hücreleri Renklendirme
Hücredeki Değer Boşsa Kayıt Gerçekleşmesin
56 Renk Kodunu Sıralama
Alarmlı Saat Ekleme Kodu
Excel Makro ile Hücreye Veri Yazma
Hücredeki Değer Sıfırdan Büyükse İşlem Yapma
Makro ile Boş Satırları Silme
Aktif Hücrenin Üstüne Satır Ekleme
Makrolar ile Klasördeki Dosyayı Taşıma
Metin Sarmayı Kaldırma
Makro ile Klasör Açma
Dizinde Klasör Araması Yapma
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Birden Çok Çalışma Sayfası Ekleme
Dizileri İç İçe Döngüye Eklemek
Seri Numaralarını Ekleme
Yanlış Yazılmış Hücreleri Vurgulama
Belirli Kriterlere Sahip Satırları Silme
Açık Excel Kitaplarını Yerleştirme
Salt Okunur Excel Dosyasını Kontrol Etme
Tek Satırı Kes Kopyala ve Yapıştır
Yardım Menüsünü Açma
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
2. Derece Denklemin Grafiğini Çizmek
Makrolar ile Klasör Kopyalama
UserForm Nesnesine Otomatik Buton Ekleme
ComboBox Nesneleri ile Toplama Yapma
TextBox Nesnesinde Kuruş Göstermek
Sağ Tık ile Açılan Menüye Ekleme Yapma
Hatalı Hücreleri Renklendirme
Makrolar ile Txt Dosyası Oluşturma
Label Nesnesine Kayan Yazı Ekleme
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
Metinden Konuşma Oluşturma
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Excel Makroları ile Klasör Arama
Son Dolu Satırın Bir Altına Yazdırma
Excel Şerit Menü Çubuğunu Gizleme
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
Yorumları Yazdırma
Sayfadaki Kelime ve Sayı Adetlerini Bulma
Google Üzerinde Arama Yapma
Hücrenin Rengini Değiştirme

Daha önce yorum yapılmamış!

Backlink Reklam Bu alanda 50 karakterlik açıklama ile web sitenize ait Backlink Reklam yayınlayabilirsiniz.
Yükleniyor...