Dizileri Döngüye Eklemek

Dizileri Döngüye Eklemek isimli kodu kullanarak, belirlediğiniz dizi içeriklerini istediğiniz gibi yönetme işlevini yerine getirebilirsiniz.

XD Destek İste
Sub Yontem_1()
    Dizi = Array("Kedi", "Köpek", "Tavşan")

    For i = LBound(Dizi) To UBound(Dizi)
        txt = txt & Dizi(i) & vbNewLine
    Next i
     
    MsgBox txt
End Sub

Sub Yontem_2()
    Dizi = [{"Kedi", 5, "Tavşan"}]
     
    For i = LBound(Dizi) To UBound(Dizi)
        txt = txt & Dizi(i) & vbNewLine
    Next i
     
    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 kodlarda aynı işlev için iki yöntem kullandık. Bir Dizi İfadesi oluşturup, Dizi içine eklediğimiz değerleri döngü içine ekleyerek istediğimiz işlemi yapabiliriz.

#Dizileri Döngüye Eklemek
50 Farklı Hazır Makro (VBA) Kodu
Hücrede Değişiklik Olduğunda Makroyu Çalıştırma
Aç Penceresini Açan Makro
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Otomatik Sıra Numarası Ekleme
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Satır Yüksekliğini Ayarla
Excel Hücresine Gitme Makrosu
Seçili Sütunların Sayısını Bulma
Excel ile Faiz Hesaplama Kodu
Seçili Satırların Sayısını Bulma
Excel Üzerinden Klasör Açma Kodu
Listbox ve Combobox Satır Kaydırma
Aktif Hücrenin Satır Numarasını Bulma
Excel Satır Silme Kodu
Label Nesnesine Kayan Yazı Ekleme
Tekrarlayan Verileri Vurgulama
Hücrenin Arka Plan Rengini Değiştirme
Kopyala ve Özel Yapıştır
Sütunlardaki Farkı Renklendirme
Bir Aralıktaki Maksimum Değeri Renklendirme
Excel Dosya Arama Yapma Makrosu
Dizileri İç İçe Döngüye Eklemek
UserForm Resize Özelliği Eklemek
Son Sütun Numarasını Bulma
Son Satır Numarasını Bulma
Bir Çalışma Kitabında Kaç Sayfa Var
Seçili Hücrenin Sütun Harfini Bulma
Excel Üzerinden Klasör Alma Kodu
Excel Hücresini Seçme Makrosu
2. Satırdaki Bilgileri Silmek
Başka Dosyada Şifreli Userform Oluşturmak
Son Dolu Satırın Bir Altına Yazdırma
Makro ile Boş Satırları Silme
Excel Makroları ile Klasör Arama
Hesap Makinesini Açma
Excel Makroları ile İşlemci Bilgilerini Bulma
Program Başlangıcı Kodları
Sağ Tık ile Açılan Menüye Ekleme Yapma
Excel Makroları ile Dosya Taşıma
Bir Aralıktaki Minimum Değeri Renklendirme
Sütun Genişliğini Ayarla
Tek Hücreyi Kes Kopyala ve Yapıştır
Checkbox ile Exceli Kapatıp Açmak
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Excel Açılırken Otomatik İşlem Yaptırma
56 Renk Kodunu Sıralama
Makrolar ile Eliptik Form Oluşturma
Her Bir Sütundaki Maksimum Değeri Bulma
Sayıları Rastgele Karıştırmak
Sütun Genişliklerini Otomatik Ayarlama
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Excel, 2007 versiyonundan sonra şerit menüye geçmiş ve daha fazla içerik barındırabilecek şekilde genişletilmiştir.
Sütunlar, A harfi ile başlar ve XFD ile biter. Bu da, toplamda 16.384 sütun demektir.
Satır numaraları ise 1'den başlar ve 1.048.576'ya kadar gider.
Satır ve sütunların sayıları neticesinde ise, ortaya 17.179.869.184 adet hücre çıkmış olur.
Yükleniyor...