最近の更新

2012年5月21日月曜日

連想配列のKeyの存在を確認する方法

【目的】
VBAで連想配列を使用する際に、連想配列のKeyの存在を確認します。



【手順】
1.「標準モジュールの作成方法」の手順で、「MainModule」とい標準モジュールを作成。
2.「MainModule」を以下の様に入力。
Option Explicit

Sub main()
    Dim map As Object
    Set map = CreateObject("Scripting.Dictionary")
    
    map.Add "key1", "value1"
    
    If map.Exists("key1") Then
        Debug.Print ("key1は存在します。")
    Else
        Debug.Print ("key1は存在しません。")
    End If

    If map.Exists("key2") Then
        Debug.Print ("key2は存在します。")
    Else
        Debug.Print ("key2は存在しません。")
    End If
End Sub
3.「関数を実行する方法」の手順で、main関数を実行。
4.イミディエイトウィンドウが表示されない場合は、「イミディエイトウィンドウの表示方法」でイミディエイトウィンドウを表示させます。
5.以下の様に、イミディエイトウィンドウに以下の様に、出力されれば成功です。




以上です。

0 件のコメント:

コメントを投稿

注: コメントを投稿できるのは、このブログのメンバーだけです。

関連記事