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

02 Ocak 2021 534

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
Belirli Kriterlere Sahip Satırları Silme
Tüm Satırda İşlem Yapan Döngü
Select Case Kullanımı
Seri Numaralarını Ekleme
Aktif Satırı ve Sütunu Vurgulama
Kopyala ve Değer Olarak Yapıştır
Makrolar ile Klasör Oluşturma
Satırları Otomatik Sığdır
Satır Yüksekliğini Ayarla
Bir Dizeden Sayısal Veriler Elde Etme
Dördüncü Sütunda İşlem Yapılınca Çalışan Makro
Hücreye Girilen Değerleri Farklı Bir Sayfaya Kaydetme
Çalışma Sayfaları için Yakınlaştırma Yüzdesini Ayarlama
Excel Hücresine Gitme Makrosu
Makro Etkinleştirilmeden Sayfalar Görüntülenmesin
Sürücü Adı Kontrolü Yapma
Cümle Durumuna Dönüştürme
İlk ve Son Hücre Arasındaki Satır Sayısı
C Klasörüne Sanal Dizin Oluşturma
Dolar Okutma Makrosu
2. Derece Denklemin Grafiğini Çizmek
Makro ile Git Penceresini Açma
Hücre Biçimlendir Yazı Tipi Penceresini Açma
Excel Makro ile Hücreye Veri Yazma
Excel Şerit Menü Çubuğunu Gizleme
Hesap Makinesini Açma
Makrolar ile Klasör Kopyalama
Seçili Sütunların Sayısını Bulma
Metni Tersten Yazdırma
Hücredeki Değer Boşsa Kayıt Gerçekleşmesin
MsgBox ile Uyarı Çıkarma Kodu
Excel Dosya Arama Yapma Makrosu
Roma Rakamlarını Normal Sayılara Dönüştürme
Giriş Kutusu ve Mesaj Yazma İşlemi
Başka Dosyada Şifreli Userform Oluşturmak
Tarih ve Saatten Saati Kaldırma
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Sütunda Yazılı Olanlardan Sayfa Adı Yapma
Birden Çok Çalışma Sayfası Ekleme
UserForm Nesnesine Otomatik Buton Ekleme
Tüm Formülleri Değerlere Dönüştürme
Aktif Hücrenin Üstüne Satır Ekleme
Toplu Sütun Silme
Makro Etkinletirilmezse Sayfalar Gizlenir
Aralıklı Olarak Satır Silme
Excel Makroları ile Form Çağırma
UserForm Açılırken Efekt Ekleme
Dosyanın Olduğu Dizin İsmini Bulma
Seçili Hücrenin Sütun Harfini Bulma
Klasörde Dosya 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...