VBA 数组元素的非精确查找(VBA.Filter)

chunyu.wu

已于 2024-07-18 10:23:58 修改

阅读量238

点赞数 5

分类专栏： VBA 文章标签： VBA

于 2024-07-18 10:20:57 首次发布

本文链接：https://blog.csdn.net/wuchunyu002/article/details/140515432

版权

VBA 专栏收录该内容

64 篇文章 3 订阅

订阅专栏

1. VBA.Filter函数

Filter(sourcesrray, match[, include[, compare]])

2. VBA.Filter例子

Option Explicit

Sub arr_filter()
    Dim arrRegion As Variant
    Dim arr1() As String, arr2() As String
    
    arrRegion = Array("東京都", "神奈川県", "千葉県", "茨城県", "大阪府")
    arr1 = VBA.Filter(arrRegion, "県", True)
    arr2 = VBA.Filter(arrRegion, "県", False)
    Debug.Print "arr1 : " & Join(arr1, ",")
    Debug.Print "arr2 : " & Join(arr2, ",")
End Sub