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

02 Ocak 2021 790

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
Metinden Konuşma Oluşturma
Sütunlardaki Farkı Renklendirme
Aç Penceresini Açan Makro
Gizlenmiş Makro Örnekleri
Sayfadaki Kelime ve Sayı Adetlerini Bulma
Tüm Formülleri Değerlere Dönüştürme
A Sütunundaki Verileri C Sütununda Sıralama
İçinde Bulunduğumuz Günü Bulma
UserForm Resize Özelliği Eklemek
Çift Satırlı Msgbox Örneği
Kopyala ve Özel Yapıştır
Dizileri İç İçe Döngüye Eklemek
Api ile Bilgisayar Adını Bulmak
Derece Simgesi Ekleme
Excel ile Demo Yapma Makrosu
Seçili Hücrelerden Boşlukları Kaldırma
Özet Tablo Aralığını Otomatik Güncelleştirme
Sayfada Alan Seçme ve Listeleme
Toplu Sütun Silme
Belli Sütunlarda Alfabetik Sıralama
Metni Tersten Yazdırma
Dosyanın Olduğu Dizin İsmini Bulma
Özel Sayfaları Yazdırma
Hücre İçerisine Kelime Ekleme
Satırları Otomatik Sığdır
Şeffaf UserForm Oluşturma Kodu
Son Dolu Satırı Başka Sayfaya Kopyala
Hücre Biçimlendir Yazı Tipi Penceresini Açma
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Aktif Hücrenin Temel Bilgilerini Bulma
Çalışma Sayfasının Ekran Görünümünü Büyütme
2. Satırdaki Bilgileri Silmek
Son Satır Numarasını Bulma
Sayıyı Çift ya da Çiftin Katı Yapma
Makro ile Boş Satırları Silme
ListBbox ve ComboBox Satır Kaydırma
Küp Kökünü Hesaplama
Birleştirilmiş Tüm Hücreleri Ayırma
Excel Kapanırken Otomatik İşlem Yaptırma
Seçili Alanda Yinelenenleri Vurgulama
Sütunda Yazılı Olanlardan Sayfa Adı Yapma
Satır Yüksekliğini Ayarla
Çalışma Kitabının Adını Tarih Olarak Kaydetme
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Excel Seçenekleri Penceresini Açma
Excel Makroları ile Dosya Sayısını Bulma
Aktif Çalışma Sayfasını Koruma
Tek Hücreyi Kes Kopyala ve Yapıştır
İki Sütundaki Değerleri Karşılaştırıp Ayrıştırma
Hücredeki Değişikliklerin Kaydını Tutma

Daha önce yorum yapılmamış!

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