VBA Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örneği

37 Okunma VBA

"VBA" Programlama dilinde "Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örneği" ile ilgili örnek kod aşağıda gösterilmiştir. 

Sub main()
    Dim d1 As Object
    Set d1 = CreateObject("Scripting.Dictionary")
    d1("A") = 65
    d1("B") = 66
    d1("C") = 67
    d1("D") = 68
    d1("E") = 69
    d1("F") = 70

    Dim l1 As Variant
    l1 = Array("A", "C", "F")

    Dim new_dict As Object
    Set new_dict = CreateObject("Scripting.Dictionary")

    Dim key As Variant
    For Each key In l1
        new_dict(key) = d1(key)
    Next key

    Dim item As Variant
    For Each item In new_dict.Items
        Debug.Print item
    Next item
End Sub
Dictionary Yarat Filtre Yeni Dizi VBA

İlginizi Çekebilir

VBA Boş Olan Tüm Hücreleri Vurgulu Yapmak

VBA Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği

VBA Hesap Makinesini Açmak

VBA Dosyaları Uzantıya Göre Arama

VBA Bir Dizi Tam Sayının Ortalamasını Bulma