Excel如何在VBA使用字典Dictionary对象通用代码
人气:343 ℃/2023-08-25 01:56:30
字典Dictionary对象是一个非常强大的辅助对象,利用该对象可以实现相关的提取的不重复值的任何案例。本文将简要介绍在VBA中使用字典Dictionary对象的通用代码。
1、新建一个空白工作簿,在工作表界面按下组合快捷键 Alt+F11 或者右键单击任意一个工作表标签,在弹出的右键快捷菜单单击 查看代码 进入VBA编辑环境,如下图所示:
2、在 代码窗口 中复制粘贴以下代码:
Sub Dic()
'定义字典对象变量
Dim oDic As Object
'创建字典对象
Set oDic = CreateObject(Scripting.Dictionary)
Dim arrKey
Dim arrItem
With oDic
'添加键和项目(key,item),其中键不能重复
.Add 1, a
.Add 2, b
' 判断是否存在某个键
MsgBox .Exists(2)
'把键2的项目修改为d
.Item(2) = d
'返回键的数组
arrKey = .keys
'返回项目的数组
arrItem = .items
'清空字典
.RemoveAll
End With
'释放字典对象,清空内存
Set oDic = Nothing
End Sub
如下图所示:
3、以上代码是在VBA中使用字典对象的通用代码,任何具体的案例都可以在这个代码的基础上进行修改,建议收藏保存,避免每次使用字典对象时需要重复输入以上代码。
- 其他12-05
增肌每公斤多少碳水
- 游戏12-25
dota英雄攻略
- 其他10-15
很甜的恋爱段子
- 文化07-30
诗经的主要内容是什么
- 其他06-09
终身教育的概念由来
- 其他05-06
手机怎样连接电脑唱歌直播
- 十二生肖04-21
属羊会是一道怎样的亮丽风景
- 名俗文化05-14
白蜡金命生于十月好吗 命运怎么样
- 其他10-28
苹果手机充电线突然不支持
- 其他04-17
怎样形容下雨情景