用VBA数组字典实现多条件查找

相关文章推荐

阳刚的凉面 · TypeInitializationExce ...· 1 年前 ·

有情有义的菠萝 · java中常用接口_mob64ca12d97 ...· 1 年前 ·

帅气的煎饼果子 · java的SIP协议_mob649e815e ...· 1 年前 ·

光明磊落的书签 · js中filter过滤对象属性-掘金· 1 年前 ·

爱笑的草稿本 · MATLAB中的set函数 - ...· 1 年前 ·

Set d = CreateObject("Scripting.Dictionary") arr = [A1].CurrentRegion brr = [A11].CurrentRegion For i = 2 To UBound(arr) d(arr(i, 1) & arr(i, 2)) = i For j = 2 To UBound(brr) If d.Exists(brr(j, 1) & brr(j, 2)) Then m = d(brr(j, 1) & brr(j, 2)) brr(j, 3) = arr(m, 3) brr(j, 4) = arr(m, 4) End If [A11].Resize(UBound(brr), 4) = brr End Sub

推荐文章

阳刚的凉面 · TypeInitializationException Class (System) | Microsoft Learn

1 年前

有情有义的菠萝 · java中常用接口_mob64ca12d97dad的技术博客_51CTO博客

1 年前

帅气的煎饼果子 · java的SIP协议_mob649e815e258d的技术博客_51CTO博客

1 年前

光明磊落的书签 · js中filter过滤对象属性-掘金

1 年前

爱笑的草稿本 · MATLAB中的set函数 - stardsd - 博客园

1 年前