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

02 Ocak 2021 824

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
Çalışma Sayfaları için Yakınlaştırma Yüzdesini Ayarlama
Tam Dizin İsmini Bulma
Hücrenin Rengini Değiştirme
Aktif Sayfayı Kopyala Yeni Bir Kitaba Yapıştır
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
TextBox Nesnelerinin Arasında Boşluk Bırakma
Tarih Değeri Yazarken Otomatik Ayraç Kullanımı
Kopyala ve Biçimleri Yapıştır
Excel Alarm Kurma
Grafiği Görüntü Olarak Yapıştırma
Seçili Satırların Sayısını Bulma
Label Nesnesine Kayan Yazı Ekleme
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
A1 Referans Stilini Etkinleştirme
Çalışma Kitabının Kaç Kez Açıldığını Öğrenme
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
Çalışma Sayfasının Ekran Görünümünü Büyütme
Seri Numaralarını Ekleme
UserForm Üzerine CommandButton Ekleme
Sayfada Alan Seçme ve Listeleme
Aralıklı Olarak Satır Silme
Makrolar ile Klasör Kopyalama
Etkin Sayfa Hariç Çalışma Sayfalarını Gizleme
Hücredeki Değişikliklerin Kaydını Tutma
Tek Sütunu Kes Kopyala ve Yapıştır
Dördüncü Sütunda İşlem Yapılınca Çalışan Makro
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Metnin İçinden TC Kimlik Numarasını Ayırma
Makrolar ile Txt Dosya Silme
Seçimdeki Alternatif Satırları Vurgulama
Api ile Bilgisayar Adını Bulmak
Salt Okunur Excel Dosyasını Kontrol Etme
Sütun Genişliklerini Otomatik Ayarlama
Alarmlı Saat Ekleme Kodu
Excel Sayfalarında Çarpım Tablosu Oluşturma
İçinde Bulunduğumuz Günü Bulma
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Tarih ve Saatten Saati Kaldırma
Hücredeki Değere Göre Yeni Sayfa Ekleme
Çalışma Sayfasını Kaydetme
Excel Makroları ile İşlemci Bilgilerini Bulma
Seçili Hücrenin Sütun Harfini Bulma
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Satırları Otomatik Sığdır
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Excel Kitabındaki Sayfa Adlarının Listelenmesi
TextBox Nesnesine Harf Girilmesini Engelleme
ComboBox Nesneleri ile Toplama Yapma
Excel Makroları ile Form Çağırma
Aktif Sütuna Göre Diğer Sütunda İşlem

Daha önce yorum yapılmamış!

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