返回
供应
「Excel_VBA」专项_字典_01_定义字典_今
2022-04-17 19:12  浏览:371
  • 系统环境：Windows 10
  • Excel：2016版本

    本系列讲讲字典功能

    今天说说如何创建一个字典，已经进行键判断

    Part 1：应用场景
    1. 存在一些信息，是通过键:值对这种形式存储得，就像我们查询一本新华字典，先看目录，确定文字位置，然后打开对应得目录
    2. 在VBA或者其它语言中，普遍存在这样一种数据结构，称为字典
    3. VBA中字典在使用前需要先引用

    Set d = CreateObject("scripting.Dictionary") Part 2：示例，当前工作簿是否存在特定表

    图1 示例

    当前工作簿是否存在工作表“示例”

    Part 3：代码

    Sub test() Set d = CreateObject("scripting.Dictionary") For Each sh In ThisWorkbook.Worksheets d(sh.Name) = "" Next tbl = "示例" If d.Exists(tbl) Then MsgBox "当前工作簿存在工作表：" & tbl End IfEnd Sub

    图2 代码截图

    Part 4：部分代码解读
  • 字典引用：Set d = CreateObject("scripting.Dictionary")

    上面代码有没有让你想写fso，Set fso = CreateObject(“scripting.FileSystemObject”)

  • 可以这么理解，字典也是VBA得一个工具包，需要先装载才能使用
  • 字典是由一系列键-值构成，要求键不能重复
  • 字典包含多种属性及方法，感谢中d.Exists(tbl)检索字典得键中是否含有 “示例”，返回布尔值

    以上，为本次得介绍内容，下回见。

    感谢首次于：Excel高效办公之VBA。排版和细节略作修改，发于头条