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

02 Ocak 2021 856

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
Gizlenmiş Makro Örnekleri
MsgBox Nesnesi ile Cevap Seçeneği Sunma
Boş Hücrelerin Görünmez Alanını Vurgulama
Sütunun Herhangi Hücresine Çift Tıklayınca UserForm Açılsın
56 Koşula Kadar Biçimlendirme Yapma
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Cümle Durumuna Dönüştürme
Birden Çok Satır Ekleme
Bir Dizindeki Son Dosyanın Adını Bulma
Makro ile Açılan Liste Oluşturma
Klasörde Dosya Araması Yapma
Dosyanın Olduğu Dizin İsmini Bulma
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Otomatik Sıra Numarası Ekleme
Hücre Aralığını Kes Kopyala ve Yapıştır
Bir Aralığa Alfabenin Harflerini Ekleme
Kapanış Mesajı Ekleme
Makro ile Boş Satırları Silme
Excel Sayfalarındaki Resimleri Silmek
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Excel Hücresine Gitme Makrosu
Hücrenin Arka Plan Rengini Değiştirme
Excel Makroları ile Dosya Taşıma
UserForm Üzerinde Dört İşlem
Excel Dosya Arama Yapma Makrosu
Dizileri Döngüye Eklemek
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Tek Hücreyi Kes Kopyala ve Yapıştır
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Sayfadaki Grafikleri Yeniden Boyutlandırma
Aktif Hücreye Günün Tarihini Yazma
Hücredeki Değişikliklerin Kaydını Tutma
Çalışma Kitabının Kaç Kez Açıldığını Öğrenme
Sağ Tık ile Açılan Menüye Ekleme Yapma
Excel Kitabındaki Sayfa Adlarının Listelenmesi
Açılışta Üç Kere Şifre Hakkı Vermek
Makro ile Dosya Açma
Sütunu Kes Kopyala ve Yapıştır
Klavyeye Makro Atama ve Çalıştırma
Çalışma Sayfalarını Alfabetik Olarak Sıralama
TextBox Nesnelerinin Arasında Boşluk Bırakma
Roma Rakamlarını Normal Sayılara Dönüştürme
Excel Makroları ile Dosya Sayısını Bulma
Sayfadaki Ad Tanımlamaları Silme
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Çoklu Bulma ve Karşısındaki Değeri Listeleme
Tam Dizin İsmini Bulma
Sendkey Yöntemi ile F Q Klavye Dönüşümü
Makro ile Biçimleri Temizleme

Daha önce yorum yapılmamış!

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