我是vbscript的新手,我正在创建一个脚本来减少日常重复工作。我在Excel表格中有一个包含值的列。此列下有某些单元格存在多个值。现在,我有了一个数组,该数组的某些值需要在此列下的每一行中进行查找/搜索,如果该行中不存在数组值,则删除该行。
我尝试使用InStr函数搜索行中的数组值,并且如果单元格仅包含一个值,则该方法有效。代码附在下面。
如果单元格包含多个值,则此子项无法正常工作。例如项目1 [ALT + ENTER]虚拟项目
因此,我尝试使用“查找和搜索”方法。使用这些方法也无法获得预期的结果。
.ToArray()
查找方法-未删除任何行 替换方法-在以下使用搜索方法代替InStr函数的地方出现语法错误,
Fix Version/s
Row 1 - Project 3 a
Row 2 - Project 2 'spaces at the end
Row 3 - Project 4
---------
Project 1
Row 4 - Project 5
Row 5 - Project 1
请协助。预先感谢。
预期-如果Cells(x,y)中不存在数组值,我希望删除行'x'
If objWorksheet1.Cells(iDelCnt, fixVerColNum).Search(objWorksheet1.Cells(iDelCnt, fixVerColNum).Value, projectFilter(jDelCnt)) <> 0 Then