12,665
回編集
差分
ナビゲーションに移動
検索に移動
ページの作成:「==Excel VBA Mapを使う== [Excel VBA] {{amazon|479811958X}} Excelで統計を学ぶ。すごくわかりやすい！！ ===VBScript Dictionary オブジェクト…」
==Excel VBA Mapを使う==
[Excel VBA]
{{amazon|479811958X}}
Excelで統計を学ぶ。すごくわかりやすい！！
===VBScript Dictionary オブジェクト===
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/script56/html/jsobjdictionary.asp
*連想配列、マップと同じ。項目はデータの任意の形式で配列に保存。
*各項目には、項目を一意に識別するためのキーが関連付けられる。
*キーは、配列以外の値を使用する。
====メソッド====
{|class="wikitable"
!メソッド
!用法
!内容
|-
|Add
|object.Add (key， item)
|1 組のキーと項目を追加
|-
|Exists
|object.Exists(key)
|キーが Dictionary オブジェクト内に存在する場合は、真
|-
|Items
|object.Items()
|オブジェクト内のすべての項目を格納した配列を返す
|-
|Keys
|object.Keys()
|すべての既存キーを格納した配列を返す
|-
|Remove
|object.Remove(key)
|キーと項目の組みを削除
|-
|RemoveAll
|object.RemoveAll()
|すべてのキーと項目を削除
|-
|}
====プロパティ====
{|class="wikitable"
!プロパティ
!用法
!内容
|-
|Count
|object.Count
|項目の数を返す
|-
|Item
|object.Item(key)[ = newitem]
|指定されたキーと関連付ける項目を設定、取得
|-
|Key
|object.Key(key) = newkey
|キーを設定
|-
|}
===例===
Dim map As Object
Dim key As String
dim value as String
'Map生成
Set map = CreateObject("Scripting.Dictionary")
'データ投入
Call map.Add(key, value)
'キーセット取得
Dim keys As Variant
Dim i As Long
keys = map.keys()
For i = 0 To map.Count - 1
Debug.Print keys(i)
Next
' 存在を確認
If map.Exists(key) Then
Debug.Print "Exsists."
End If
' 値を取得(格納する値がObjectの場合、Setキーワードが必要)
value = map.Item(key)
====関連====
*JavaScript 連想配列(Map)のキーを取り出す
{{amazon|4798122084}}
{{include_html banner_html, "!amazon_promotion2"}}
[Excel VBA]
{{amazon|479811958X}}
Excelで統計を学ぶ。すごくわかりやすい！！
===VBScript Dictionary オブジェクト===
http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/script56/html/jsobjdictionary.asp
*連想配列、マップと同じ。項目はデータの任意の形式で配列に保存。
*各項目には、項目を一意に識別するためのキーが関連付けられる。
*キーは、配列以外の値を使用する。
====メソッド====
{|class="wikitable"
!メソッド
!用法
!内容
|-
|Add
|object.Add (key， item)
|1 組のキーと項目を追加
|-
|Exists
|object.Exists(key)
|キーが Dictionary オブジェクト内に存在する場合は、真
|-
|Items
|object.Items()
|オブジェクト内のすべての項目を格納した配列を返す
|-
|Keys
|object.Keys()
|すべての既存キーを格納した配列を返す
|-
|Remove
|object.Remove(key)
|キーと項目の組みを削除
|-
|RemoveAll
|object.RemoveAll()
|すべてのキーと項目を削除
|-
|}
====プロパティ====
{|class="wikitable"
!プロパティ
!用法
!内容
|-
|Count
|object.Count
|項目の数を返す
|-
|Item
|object.Item(key)[ = newitem]
|指定されたキーと関連付ける項目を設定、取得
|-
|Key
|object.Key(key) = newkey
|キーを設定
|-
|}
===例===
Dim map As Object
Dim key As String
dim value as String
'Map生成
Set map = CreateObject("Scripting.Dictionary")
'データ投入
Call map.Add(key, value)
'キーセット取得
Dim keys As Variant
Dim i As Long
keys = map.keys()
For i = 0 To map.Count - 1
Debug.Print keys(i)
Next
' 存在を確認
If map.Exists(key) Then
Debug.Print "Exsists."
End If
' 値を取得(格納する値がObjectの場合、Setキーワードが必要)
value = map.Item(key)
====関連====
*JavaScript 連想配列(Map)のキーを取り出す
{{amazon|4798122084}}
{{include_html banner_html, "!amazon_promotion2"}}
© 2006 矢木浩人
