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

02 Ocak 2021 811

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
Tek Sütunu Kes Kopyala ve Yapıştır
Bir Değeri Renklendirme
Birden Çok Satır Ekleme
Makrolar ile Dosyaları Kopyalama
Makro ile Klasör Açma
Satırı Kes Kopyala ve Yapıştır
Metinden Konuşma Oluşturma
Makrolar ile Eliptik Form Oluşturma
Hedef Aramayı Kullanma
Sütun Genişliklerini Otomatik Ayarlama
Başka Dosyada Şifreli Userform Oluşturmak
Otomatik Olarak Tarih ve Zaman Ekleme
Excel Makroları ile Form Çağırma
Salt Okunur Excel Dosyasını Kontrol Etme
56 Renk Kodunu Sıralama
Dizileri Döngüye Eklemek
İçindekiler Tablosu Oluşturma
Toplu Sütun Silme
Label Nesnesine Kayan Yazı Ekleme
Excel Menüsüne Ekleme Yapma Kodu
Hesap Makinesini Açma
Son Dolu Satırın Bir Altına Yazdırma
Makrolar ile Txt Dosyası Oluşturma
Excel Kapanırken Otomatik İşlem Yaptırma
UserForm Nesnesine Otomatik Buton Ekleme
Özel Sayfaları Yazdırma
Seçili Alanda Yinelenenleri Vurgulama
Sürücü Adı Kontrolü Yapma
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
UserForm Resize Özelliği Eklemek
Cümle Durumuna Dönüştürme
Checkbox ile Exceli Kapatıp Açmak
Dördüncü Sütunda İşlem Yapılınca Çalışan Makro
Seri Numaralarını Ekleme
Kullanıcı Adınızı Bulma
2. Satırdaki Bilgileri Silmek
MsgBox Nesnesi ile Cevap Seçeneği Sunma
Kapanış Mesajı Ekleme
Hangi Günde Olduğunu Bulma
Makro ile Hızlı Doldurma
Bir Kitaptaki Sayfaları Başka Kitaba Taşıma
Makrolar ile Klasör Kopyalama
Birleştirilmiş Tüm Hücreleri Ayırma
Excel Makro ile Hücreye Veri Yazma
UserForm Açılırken Efekt Ekleme
Sayfadaki Grafikleri Yeniden Boyutlandırma
Hücrenin Rengini Değiştirme
Kes Kopyala ve Başka Çalışma Kitabına Yapıştır
Özet Tablo Aralığını Otomatik Güncelleştirme
Seçili Hücrenin Sütun Harfini Bulma

Daha önce yorum yapılmamış!

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