VBA 字典数组运用查询系统

Sub find() '找
Set d = CreateObject("scripting.dictionary")
With Sheets("data")
arr = .Range("a2:i" & Cells(Rows.Count, 1).End(xlUp).Row)
End With
For i = 1 To UBound(arr) '首先需要在创立的字典中遍历
d(arr(i, 5)) = Array(arr(i, 2), arr(i, 3), arr(i, 4), arr(i, 6), arr(i, 7))
Next '遍历循环查找自己的单元格
For Each Rng In Range("a3:a" & Cells(Rows.Count, 1).End(xlUp).Row)'然后开始需要在自己需要查找的信息中开始遍历
Rng.Offset(0, 1).Resize(1, 5) = d(Rng.Value)'查找寻找单元格中的值
Next
End Sub

VBA 字典数组运用查询系统相关推荐

Excel VBA 字典/数组示例
A 将数组作为字典的ValuePrivate Sub CommandButton3_Click() Dim arr, arr1, i&, d As Object arr = Sheets(3) ...
VBA 字典嵌套字典 + 数组
VBA 字典嵌套字典 + 数组功能展示为Excel VBA字典中嵌套字典,内层字典值为一个数组 Public Sub arrayInDictWithInDict()myarr = Array(&qu ...
Python课设实验之公交查询系统.（文本导入字典树储存.）
要求: 目录要求: 第1题编写一个公交查询系统随着公交系统的庞大,人们很难得到准确的公交信息,这样给人们的出行就带来了不便.因此,急需一个方便.快捷的公交信息查询方式,本系统提供换乘询功能.路 ...
Xlookup函数、VBA字典和哈希数组“竞速“
公司的报表用了很多vlookup函数,每次打开和编辑就跟蜗牛一样,极大影响效率.对此有一些不同的解决方案,比如设置公式手动刷新,用sql查找.vba编写函数查找等.这里我做了Xlookup函数.VBA ...
C语言：人物查询系统（结构体数组的基本使用）
题目概述: C语言人物查询系统编程. 编程: #define _CRT_SECURE_NO_WARNINGS #include<stdio.h> #include<stdlib.h& ...
JSP双语字典查询系统myeclipse开发sql数据库bs框架java编程web网页结构
一.源码特点 JSP 双语字典查询系统是一套完善的web设计系统,对理解JSP java编程开发语言有帮助,系统具有完整的源代码和数据库,系统主要采用B/S模式开发.开发环境为 TOMCAT ...
武大版c语言程序设计习题二维数组简易学生成绩查询系统,《C语言程序设计》程设计报告.docx...
<C语言程序设计>程设计报告课程设计报告题目:招生查询系统课程名称:C语言程序设计专业班级:信息安全201302班学号:姓名:指导教师:报告日期: 2014年10月10日计算机科学与技术 ...
access vba 常量数组赋值_VBA数组是什么？有何作用？别担心，你只需用1分钟就明白它是什么...
Hello,大家好,在前面我们说过Excel函数中间的数组含义,那么你是否知道VBA中间的两个数据处理利器字典+数组呢?他们一旦结合起来将会发挥无可估量的作用,提升执行效率就在分秒之间.今天我们先说说 ...
excel制作录入和查询系统_叮咚！您有一份Excel人员信息查询系统，请您查收~
叮咚!您有一份Excel人员信息查询系统,请您查收~ 打开中-- 1 2 3 open! 哦豁,瞅着还不错哦~ 下面介绍如何制作一个简易的人员信息查询系统. 数据源准备第一步当然是准备数据源,数据源 ...

VBA 字典数组运用查询系统

VBA 字典数组运用查询系统相关推荐

最新文章

热门文章