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

02 Ocak 2021 804

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
İlk ve Son Hücre Arasındaki Satır Sayısı
Dolar Okutma Makrosu
Gizli Sayfaların Bulunması ve Gösterilmesi
Excel ile Demo Yapma Makrosu
Pivot Tablo Alt Toplamlarını Gizleme
Hücredeki Değere Göre Yeni Sayfa Ekleme
Seçili Alanda Yinelenenleri Vurgulama
Sayılara Yeni Bir Sayı Ekleme
Bir Değeri Renklendirme
Dizileri Döngüye Eklemek
Bir Hücreye Çift Tıklayınca UserForm Açılsın
TextBox Nesnesinde Kuruş Göstermek
Belli Sütunlarda Alfabetik Sıralama
Makro Etkinletirilmezse Sayfalar Gizlenir
Çalışma Sayfasının Ekran Görünümünü Büyütme
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Son Sütun Numarasını Bulma
Cümle Durumuna Dönüştürme
Satır Yüksekliklerini Otomatik Ayarlama
Makrolar ile Eliptik Form Oluşturma
Aktif Çalışma Sayfasını Koruma
Toplu Sütun Silme
Bir sayfadaki Veriyi Diğer Sayfaya Aktarma
Excel Sayfalarında Çarpım Tablosu Oluşturma
Makro ile Açılan Liste Oluşturma
Excel Makroları ile Klasör Silme
Makro ile Git Penceresini Açma
56 Renk Kodunu Sıralama
Hoş Geldiniz Mesajı Ekleme
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Makro ile Boş Satırları Silme
İki Sütundaki Değerleri Karşılaştırıp Ayrıştırma
Aç Penceresini Açan Makro
Excel Sayfalarındaki Resimleri Silmek
Sütunda Yazılı Olanlardan Sayfa Adı Yapma
Sayfada Alan Seçme ve Listeleme
Select Case Kullanımı
Hücre Aralığını Görüntüye Dönüştürme
56 Koşula Kadar Biçimlendirme Yapma
Hücrenin Rengini Değiştirme
Metinden Konuşma Oluşturma
Makro ile Web Sitesini Açmak
Son Satır Numarasını Bulma
Satırı Kes Kopyala ve Yapıştır
Makrolar ile Txt Dosya Silme
Grafiği Görüntü Olarak Yapıştırma
Aktif Satırı ve Sütunu Vurgulama
Tekrar Eden Verileri Farklı Sütunda Yazma
Belirli Kriterlere Sahip Satırları Silme
Kopyala ve Özel Yapıştır

Daha önce yorum yapılmamış!

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