VBA Dictionary Key Value Değerlerini Ters Çevirmek

194 Okunma VBA

"VBA" Programlama dilinde "Dictionary Key Value Değerlerini Ters Çevirmek" ile ilgili kod örneği aşağıda verilmiştir. 

Sub ReverseDict()
    Dim ascii_dict As Scripting.Dictionary
    Set ascii_dict = New Scripting.Dictionary
    ascii_dict.Add "A", 65
    ascii_dict.Add "B", 66
    ascii_dict.Add "C", 67
    ascii_dict.Add "D", 68

    Dim new_dict As Scripting.Dictionary
    Set new_dict = New Scripting.Dictionary
    Dim key As Variant
    For Each key In ascii_dict.Keys()
        new_dict.Add ascii_dict.Item(key), key
    Next key

    Dim item As Variant
    For Each item In new_dict.Items()
        Debug.Print item
    Next item
End Sub
Dictionary Key Value Tes Çevir VBA

İlginizi Çekebilir

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

VBA 1'den 100'e Kadar Sayı Toplam Örneği

VBA Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği

VBA Text Wrap Kaldırma

VBA While Döngüsü İle 10 Sayının Ortalamasını Bulma Örneği