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

02 Ocak 2021 847

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
Klavyeye Makro Atama ve Çalıştırma
Aktif Hücreye Açıklama Ekleme
Select Case Kullanımı
Seri Numaralarını Ekleme
Bir Dizeden Sayısal Veriler Elde Etme
Yorumları İçeren Hücreleri Renklendirme
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Verileri Birden Çok Sütuna Göre Sıralama
Tüm Satırları ve Sütunları Gösterme
Excel Kitabındaki Sayfa Adlarının Listelenmesi
Yardım Menüsünü Açma
Excel Makroları ile Klasör Arama
Makro ile Biçimleri Temizleme
Kullanılan Tüm Sütunları Otomatik Sığdır
Tüm Sütunda İşlem Yapan Döngü
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
Çalışma Sayfalarını Ayrı PDF Olarak Kaydetme
Hücredeki Değere Göre İşlem Yapma
Satırı Kes Kopyala ve Yapıştır
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
Sayıları Yeni Bir Sayıyla Çarpma
Birleştirilmiş Tüm Hücreleri Ayırma
Bağlantılı Resim Ekleme
Sayfadaki Grafikleri Yeniden Boyutlandırma
Yorumları Yazdırma
Her Kapatma İşleminde Otomatik Olarak Kaydetme
Otomatik Olarak Tarih ve Zaman Ekleme
Hücreye Girilen Değerleri Farklı Bir Sayfaya Kaydetme
Boşluk Olan Hücreleri Renklendirme
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Açık Excel Kitaplarını Yerleştirme
ListBbox ve ComboBox Satır Kaydırma
Hücrenin Rengini Değiştirme
Excel Menüsüne Ekleme Yapma Kodu
Bir Aralıktaki Maksimum Değeri Renklendirme
Sürücü Adı Kontrolü Yapma
Açıklama İçeren Tüm Hücreleri Vurgulama
Aktif Hücrenin Satır Numarasını Bulma
Çalışma Sayfaları için Yakınlaştırma Yüzdesini Ayarlama
C Klasörüne Sanal Dizin Oluşturma
Excel Dosya Arama Yapma Makrosu
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Excel Şerit Menü Çubuğunu Gizleme
Excel Hücrelerini Çözme
Excel Crackleme İşlemi Makrosu
Satırları Otomatik Sığdır
Seçili Her Satırdan Sonra Bir Satır Ekleme
Sendkey Yöntemi ile F Q Klavye Dönüşümü
Excel Makroları ile Dosya Taşıma
Excel Dosya Silme İşlemi Makrosu

Daha önce yorum yapılmamış!

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