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

02 Ocak 2021 835

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
Boş Hücreleri Sıfırlarla Değiştirme
Makrolar ile Klasör Oluşturma
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
Hücreye Girilen Değerleri Farklı Bir Sayfaya Kaydetme
Disk Sürücü Kapasitesini Gösterme
Tarih ve Saatten Tarihi Kaldırma
Birden Çok Çalışma Sayfası Ekleme
Tüm Çalışma Sayfalarını Gösterme
Otomatik Sıra Numarası Ekleme
Excel Makroları İle Not Defterini Açmak
Makro ile Klasör Açma
Sürücü Adı Kontrolü Yapma
Makro ile Web Sitesini Açmak
Aralıklı Olarak Satır Silme
Api ile Bilgisayar Adını Bulmak
UserForm Resize Özelliği Eklemek
Excel Hücresini Seçme Makrosu
İlk ve Son Hücre Arasındaki Satır Sayısı
Yardım Menüsünü Açma
Tekrarlayan Verileri Vurgulama
ComboBox Nesneleri ile Toplama Yapma
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Gizli Sayfaların Bulunması ve Gösterilmesi
Tek Hücreyi Kes Kopyala ve Yapıştır
Seçili Alandan İstenilen Karakteri Kaldırma
Txt Dosyası Oluşturma
Excel Dosya Arama Yapma Makrosu
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
Roma Rakamlarını Normal Sayılara Dönüştürme
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Sütunun Herhangi Hücresine Çift Tıklayınca UserForm Açılsın
Excel Satır Seçme Kodu
Seçili Aralığı PDF Olarak Kaydetme
Makrolar İşlem Yaparken Ekranın Kilitlenmesi
Hücre Aralığını Görüntüye Dönüştürme
Kapanış Mesajı Ekleme
Makrolar ile Txt Dosyası Oluşturma
Seçimdeki Alternatif Satırları Vurgulama
Toplu Satır Silme
R1C1 Referans Stilini Etkinleştirme
Excel Makroları ile Klasör Silme
Kopyala ve Biçimleri Yapıştır
Küp Kökünü Hesaplama
Derece Simgesi Ekleme
Son Dolu Satırın Bir Altına Yazdırma
Otomatik Olarak Tarih ve Zaman Ekleme
Seri Numaralarını Ekleme
Excel Hücrelerini Çözme
Dizinde Klasör Araması Yapma

Daha önce yorum yapılmamış!

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