Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/26.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 在VBA ArrayList中搜索元素_Excel_Vba_List_Arraylist - Fatal编程技术网

Excel 在VBA ArrayList中搜索元素

Excel 在VBA ArrayList中搜索元素,excel,vba,list,arraylist,Excel,Vba,List,Arraylist,我希望你是伟大的!我想搜索VBA ArrayList并获得索引号,问题是,使用For循环,只能获得精确匹配的索引。我有我的大部分搜索元素(在红色框中突出显示),我想得到在蓝色框中突出显示的元素,有没有办法在VBA中这样做 您可以使用内置函数InStr查找一个字符串在另一个字符串中的匹配项 在您的情况下,请更改以下内容: If list(j) = search_element Then 致: InStr返回列表(j)中搜索元素的位置。如果位置高于0,则找到字符串。如果为0,则未找到任何内容 因此

我希望你是伟大的!我想搜索VBA ArrayList并获得索引号,问题是,使用For循环,只能获得精确匹配的索引。我有我的大部分搜索元素(在红色框中突出显示),我想得到在蓝色框中突出显示的元素,有没有办法在VBA中这样做


您可以使用内置函数
InStr
查找一个字符串在另一个字符串中的匹配项

在您的情况下,请更改以下内容:

If list(j) = search_element Then
致:

InStr
返回
列表(j)
搜索元素的位置。如果位置高于0,则找到字符串。如果为
0
,则未找到任何内容

因此,如果
搜索元素
出现在
列表(j)
中的任何位置,则这将是
正确的

InStr
的文档如下所示

If InStr(1, list(j), search_element) > 0 Then