分かりやすく、使いやすく。

Dictionary の要素を削除する方法

スポンサーリンク

Dictionary オブジェクトからキーとキーに紐づく値を削除するには Remove メソッドを使用します。

サンプルコードは次の通りです。

VBA(実行可能なサンプルコード)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Option Explicit
 
Sub test1()
    'Dictionary の初期化
    Dim dicColors As Object
    Set dicColors = CreateObject("Scripting.Dictionary")
    
    'キーと値を追加。
    dicColors.Add "red", "赤"
    dicColors.Add "blue", "青"
    dicColors.Add "pink", "桃"
    
    Debug.Print "Dictionaryの要素数:" & dicColors.Count
    
    'Dictionary をループして中身を表示。
    Dim key As Variant
    
    For Each key In dicColors
         Debug.Print "キーの値:" & key; "、対応する値:" & dicColors(key)
    Next key
    
    '★キーを削除
    dicColors.Remove "red"
    dicColors.Remove "blue"
    
    Debug.Print "Dictionaryの要素数:" & dicColors.Count
    
    'Dictionary をループして中身を表示。
    For Each key In dicColors
         Debug.Print "キーの値:" & key; "、対応する値:" & dicColors(key)
    Next key
End Sub 

上記の実行結果は次の通りです。

実行結果
1
2
3
4
5
6
Dictionaryの要素数:3
キーの値:red、対応する値:赤
キーの値:blue、対応する値:青
キーの値:pink、対応する値:桃
Dictionaryの要素数:1
キーの値:pink、対応する値:桃 

Dictionary の全ての要素を一括で削除する方法については、Dictionary の要素を全て削除する方法を参照してください。

スポンサーリンク
スポンサーリンク