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