文檔庫

最新最全的文檔下載
當前位置:文檔庫 > VBA字典

VBA字典

1、字典基本(趙偵宇搜集整理)

(1)、創建字典

Sub 字典()

Set d = CreateObject("scripting.dictionary")

End Sub

注意一點,如果用畫矩形、橢圓的方式,要制定在那個表格(sheet1、sheet2或sheet3)中操作(2)、賦值

分別用兩種范式賦值

Sub 字典()

Set d = CreateObject("scripting.dictionary")

For x = 1 To 4

d.Add Cells(x, "a").Value, Cells(x, "b")

Next

End Sub

①、藍色區域相當于字典的條目,這個區域內容不可以重復。紅色區域是條目對應的解釋

②、直接賦值(賦值的時候value一定要帶上)

③、賦值數組條目部分不能用數字,不知道為什么

Sub 矩形1_單擊()

Worksheets("sheet1").Activate

Set d = CreateObject("scripting.dictionary")

For x = 1 To 4

d(Cells(x, "a").Value) = Cells(x, "b")

Next

MsgBox d("女孩")

End Sub

免費下載Word文檔免費下載: VBA字典

(共10頁)
神算子特码论