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

02 Ocak 2021 781

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
Kopyala ve Özel Yapıştır
Tarih Değeri Yazarken Otomatik Ayraç Kullanımı
Roma Rakamlarını Normal Sayılara Dönüştürme
Çalışma Kitabının Yedeğini Oluşturma
Kes Kopyala ve Başka Çalışma Kitabına Yapıştır
R1C1 Referans Stilini Etkinleştirme
Özet Tablo Aralığını Otomatik Güncelleştirme
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Excel Üzerinden Klasör Alma Kodu
Tek Satırı Kes Kopyala ve Yapıştır
İçinde Bulunduğumuz Günü Bulma
Aç Penceresini Açan Makro
TextBox Nesnelerinin Arasında Boşluk Bırakma
Api ile Bilgisayar Adını Bulmak
PDF Dosyalarını Birleştirme
Makrolar ile Klasör Silme
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Aktif Hücreye Günün Tarihini Yazma
UserForm Nesnesine Otomatik Buton Ekleme
ComboBox Nesneleri ile Toplama Yapma
İstenilen Şart Sağlanmıyorsa Kayıt Gerçekleşmesin
Aktif Hücrenin Sütun Numarasını Bulma
Kapanış Mesajı Ekleme
Excel Hücresine Gitme Makrosu
Dizileri Döngüye Eklemek
Hücre Biçimlendir Yazı Tipi Penceresini Açma
İlk ve Son Hücre Arasındaki Satır Sayısı
Excel Sayfalarındaki Resimleri Silmek
Kaydedilmemiş Açık Çalışma Kitaplarını Sayma
Hatalı Hücreleri Renklendirme
Bir Aralığa Alfabenin Harflerini Ekleme
Satırlardaki Farkı Renklendirme
Sütunları Otomatik Sığdırma
Yanıp Sönme Efekti Verme Kodu
Makrolar ile Dosyaları Kopyalama
Hücredeki Değer Sıfırdan Büyükse İşlem Yapma
Tüm Çalışma Sayfalarını Gösterme
Yazı Efekti Verme Kodu
Sendkey Yöntemi ile F Q Klavye Dönüşümü
Excel Kitabındaki Sayfa Adlarının Listelenmesi
Makro ile Klasör Açma
Excel Makroları ile Dosya Silme
Birleştirilmiş Tüm Hücreleri Ayırma
Excel Makroları İle Not Defterini Açmak
Tek Sütunu Kes Kopyala ve Yapıştır
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Formüllü Hücreleri Renklendir
Çalışma Kitabının Kaç Kez Açıldığını Öğrenme
Hücre Aralığını Görüntüye Dönüştürme

Daha önce yorum yapılmamış!

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