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

02 Ocak 2021 829

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
Hatalı Hücreleri Renklendirme
Seçili Alandan İstenilen Karakteri Kaldırma
Aktif Hücrenin Temel Bilgilerini Bulma
Program Başlangıcı Kodları
Aktif Hücreye Günün Tarihini Yazma
Aktif Çalışma Sayfası Dışında Tümünü Silme
Seçili Aralığa Ait Bilgilerin Listelenmesi
Tek Satırı Kes Kopyala ve Yapıştır
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Makrolar ile Txt Dosya Silme
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Aç Penceresini Açan Makro
Hücrede Değişiklik Olduğunda Makroyu Çalıştırma
Bir Çalışma Kitabında Kaç Sayfa Var
Makrolar ile Klasördeki Dosyayı Taşıma
Txt Dosyası Oluşturma
Birden Çok Satır Ekleme
Hücrenin Arka Plan Rengini Değiştirme
Hücreye Girilen Değerleri Farklı Bir Sayfaya Kaydetme
Hücredeki Değişikliklerin Kaydını Tutma
Makro ile Hızlı Doldurma
Aktif Hücrenin İçeriği Hakkında Bilgi Verme
Dizinde Klasör Araması Yapma
Tekrarlayan Verileri Vurgulama
Çalışma Sayfasının Ekran Görünümünü Büyütme
Excel Makroları İle Not Defterini Açmak
Bilgisayardaki Sürücü Sayısını Bulma
Aktif Satırı ve Sütunu Vurgulama
Hücrenin Rengini Değiştirme
İki Sütundaki Değerleri Karşılaştırıp Ayrıştırma
Verileri Birden Çok Sütuna Göre Sıralama
Hangi Günde Olduğunu Bulma
Çalışma Sayfasını Kaydetme
Hücredeki Değere Göre Yeni Sayfa Ekleme
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
UserForm Üzerine CommandButton Ekleme
Tekrar Eden Verileri Farklı Sütunda Yazma
Seçili Her Satırdan Sonra Bir Satır Ekleme
Yardım Menüsünü Açma
Sütunu Kes Kopyala ve Yapıştır
Özet Tablo Aralığını Otomatik Güncelleştirme
Boş Hücreleri Vurgulama
UserForm Resize Özelliği Eklemek
Çalışma Kitabının Yedeğini Oluşturma
Gizlenmiş Makro Örnekleri
Dizileri Döngüye Eklemek
Makrolar ile Dosyaları Kopyalama
Sayıları Yeni Bir Sayıyla Çarpma
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Ad Yöneticisindeki Tüm Adları Görünür Yapmak

Daha önce yorum yapılmamış!

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