Excel VBA怎么使用字典Dictionary對象的通用代碼?

字典Dictionary對象是一個非常強(qiáng)大的輔助對象,利用該對象可以實現(xiàn)相關(guān)的提取的不重復(fù)值的任何案例。本文將簡要介紹在VBA中使用字典Dictionary對象的通用代碼。
1、新建一個空白工作簿,在工作表界面按下組合快捷鍵Alt+F11或者右鍵單擊任意一個工作表標(biāo)簽,在彈出的右鍵快捷菜單單擊“查看代碼”進(jìn)入VBA編輯環(huán)境,如下圖所示:
2、在“代碼窗口“中復(fù)制粘貼以下代碼:
Sub Dic()
'定義字典對象變量
Dim oDic As Object
'創(chuàng)建字典對象
Set oDic = CreateObject("Scripting.Dictionary")
Dim arrKey
Dim arrItem
With oDic
'添加鍵和項目(key,item),其中鍵不能重復(fù)
.Add 1, "a"
.Add 2, "b"
' 判斷是否存在某個鍵
MsgBox .Exists(2)
'把鍵2的項目修改為"d"
.Item(2) = "d"
'返回鍵的數(shù)組
arrKey = .keys
'返回項目的數(shù)組
arrItem = .items
'清空字典
.RemoveAll
End With
'釋放字典對象,清空內(nèi)存
Set oDic = Nothing
End Sub
如下圖所示:
3、以上代碼是在VBA中使用字典對象的通用代碼,任何具體的案例都可以在這個代碼的基礎(chǔ)上進(jìn)行修改,建議收藏保存,避免每次使用字典對象時需要重復(fù)輸入以上代碼。具體的字典對象的所有屬性、方法可以參考MSDN中的在線幫助。
相關(guān)推薦:
相關(guān)文章
- 這篇教程是向腳本之家的朋友分享excel使用vba關(guān)閉表格的兩種方法介紹,操作很簡單的,下面小編就為大家詳細(xì)介紹一下,不會的朋友可以參考本文,來看看吧2016-09-06
Excel 2010怎么調(diào)用VBA?excel調(diào)用vba方法介紹
Excel默認(rèn)功能區(qū)是沒有VBA編輯器的,現(xiàn)在我們需要打開它,那么Excel 2010怎么調(diào)用VBA?下面小編就為大家介紹excel調(diào)用vba方法,一起來看看吧2016-09-04- 今天小編為大家分享在excel表格中使用vba引用單元格區(qū)域方法,方法很簡單,對于有需要的朋友可以參考本文,一起來看看吧2016-09-04
- 下面小編就為大家詳細(xì)介紹在excel表格中如何使用vba修改指定列寬方法,操作很簡單的,大家按照上面步驟進(jìn)行進(jìn)行,希望這篇文章能對大家有所幫助2016-09-02
- 這篇教程是向腳本之家的朋友分享利用excel vba編程在窗體上繪制簡筆畫蘑菇方法,教程制作出來的效果非常漂亮,難度不是很大,推薦到腳本之家,來看看吧2016-09-02
- excel怎么使用vba清除剪貼板的內(nèi)容?excel中我們經(jīng)常復(fù)制粘貼一些數(shù)據(jù),怎么才能清除剪貼板中的內(nèi)容呢?下面我們就來看看excel使用vba清除剪貼板內(nèi)容的教程,需要的朋友可2016-09-01
在excel中使用vba實現(xiàn)單元格間數(shù)據(jù)移動
這篇教程是向腳本之家的朋友分享在excel中使用vba實現(xiàn)單元格間數(shù)據(jù)移動方法,教程比較基礎(chǔ),適合新手來學(xué)習(xí),有需要的朋友可以參考本文,希望能對大家有所幫助2016-09-01- excel怎么使用vba畫一個簡筆畫青蛙?excel中想畫一個青蛙,該怎么畫呢?excel中不能直接畫畫,需要借助vba,下面我們就來看看詳細(xì)的教程,需要的朋友可以參考下2016-09-01
- excel怎么使用vba自動調(diào)整列寬?excel中調(diào)整列寬的方法很多,可以直接設(shè)置列高,也可以使用vba調(diào)整列寬,下面我們就來看看vba自動調(diào)整列寬的教程,需要的朋友可以參考下2016-08-31
- excel怎么使用vba讓最大化工作簿??excel查看別個的時候,想讓工作簿最大化顯示,該怎么設(shè)置呢?下面我們就來看看使用vba設(shè)計的過程,需要的朋友可以參考下2016-08-29