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

02 Ocak 2021 777

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
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Negatif Sayıları Vurgulama
Kaydedilmemiş Açık Çalışma Kitaplarını Sayma
Excel Dosya Silme İşlemi Makrosu
R1C1 Referans Stilini Etkinleştirme
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
Transparan UserForm Oluşturmak
Her Bir Sütundaki Maksimum Değeri Bulma
Sayılara Yeni Bir Sayı Ekleme
Excel Makroları ile Dosya Sayısını Bulma
Dar Kenar Boşluğu Yazdırma
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Ekran Çözünürlüğünü Bulma
Özet Tablo Aralığını Otomatik Güncelleştirme
Makrolar ile Sonraki Sayfaya Geçmek
Satır Yüksekliğini Ayarla
Dördüncü Sütunda İşlem Yapılınca Çalışan Makro
Tekrarlayan Verileri Vurgulama
Makro ile Git Penceresini Açma
C Klasörüne Sanal Dizin Oluşturma
Bir Aralığa Alfabenin Harflerini Ekleme
Sürücü Adı Kontrolü Yapma
Bilgisayardaki Sürücü Sayısını Bulma
Veri Giriş Formunu Etkinleştirme
Hesap Makinesini Açma
Seçili Alanda Yinelenenleri Vurgulama
Aktif Satırı ve Sütunu Vurgulama
Tüm Boş Çalışma Sayfalarını Silme
Aktif Hücreye Açıklama Ekleme
Çalışma Sayfasının Ekran Görünümünü Büyütme
Kopyala ve Biçimleri Yapıştır
Excel Crackleme İşlemi Makrosu
Metnin İçinden TC Kimlik Numarasını Ayırma
UserForm Nesnesine Otomatik Buton Ekleme
Makrolar ile Eliptik Form Oluşturma
Sayfadaki Ad Tanımlamaları Silme
Hatalı Hücreleri Renklendirme
Sayıyı Çift ya da Çiftin Katı Yapma
UserForm Üzerinde Dört İşlem
Çalışma Kitabının Kaç Kez Açıldığını Öğrenme
Bir Çalışma Kitabında Kaç Sayfa Var
ListBbox ve ComboBox Satır Kaydırma
Tüm Formülleri Değerlere Dönüştürme
Ondalık Sayıları Tam Sayıya Çevirme
Tüm Çalışma Sayfalarını Gösterme
Yanıp Sönme Efekti Verme Kodu
Bilgisayardaki Sürücü İsimlerini Listeleme
Yorumları Yazdırma
Yardım Menüsünü Açma
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma

Daha önce yorum yapılmamış!

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