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

02 Ocak 2021 786

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
Sayfa Üzerindeki Formüllerin Sayısını Bulma
Aktif Hücreye Günün Tarihini Yazma
Çalışma Sayfaları için Yakınlaştırma Yüzdesini Ayarlama
Çalışma Kitabının Yedeğini Oluşturma
Makrolar ile Eliptik Form Oluşturma
PDF Dosyalarını Birleştirme
56 Renk Kodunu Sıralama
Şarta Göre Satır Açma ve Renklendirme
Otomatik Sıra Numarası Ekleme
Her Kapatma İşleminde Otomatik Olarak Kaydetme
Her Bir Sütundaki Maksimum Değeri Bulma
Toplu Satır Silme
Excel Seçenekleri Penceresini Açma
Excel Makroları ile Dosya Silme
Excel Açılırken Otomatik İşlem Yaptırma
A1 Referans Stilini Etkinleştirme
Kullanıcı Adınızı Bulma
İçinde Bulunduğumuz Günü Bulma
Sütunları Otomatik Sığdırma
Bir Sayfadaki Veriyi Diğer Sayfalara Kopyalama
Select Case Kullanımı
Negatif Sayıları Poztif Sayıya Çevirme
Etkin Sayfa Hariç Çalışma Sayfalarını Gizleme
Excel Makroları ile Klasör Silme
Bilgisayar Bilgilerini Özetleme
Excel Makroları ile Dosya Taşıma
Tek Sütunu Kes Kopyala ve Yapıştır
Tüm Boş Çalışma Sayfalarını Silme
Dolar Okutma Makrosu
Özet Tablo Aralığını Otomatik Güncelleştirme
Aktif Çalışma Sayfasını Koruma
Excel Kapanırken Otomatik İşlem Yaptırma
Bir Hücreye Çift Tıklayınca UserForm Açılsın
2. Satırdaki Bilgileri Silmek
Excel Sayfalarındaki Resimleri Silmek
Kare Kökünü Hesaplama
TextBox Nesnelerinin Arasında Boşluk Bırakma
Adlandırılmış Aralıkları Vurgulama
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
Excel Makroları ile Hücreye Saat Ekleme
Başka Dosyada Şifreli Userform Oluşturmak
Boş Hücreleri Vurgulama
Hedef Aramayı Kullanma
İçindekiler Tablosu Oluşturma
Makrolar İşlem Yaparken Ekranın Kilitlenmesi
Sayfaların Seçilmesini Sağlama
Satırı Kes Kopyala ve Yapıştır
Hücre Aralığını Görüntüye Dönüştürme
Çalışma Sayfasının Ekran Görünümünü Büyütme
Excel Makro ile Hücreye Veri Yazma

Daha önce yorum yapılmamış!

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