如果行包含一些关键字，则隐藏行：使用rumtime错误类型13

Question

我有一个关于我的代码隐藏行的问题，当行包含某些关键字时，工作表被激活。 通过测试，我的代码运行良好，我没有任何错误。

然而，我的代码似乎相当脆弱。有些同事经常会有错误报告，如果他们插入行或删除行，这会导致公式引用错误，因为我使用“if”公式来生成“关键词”。

我不明白为什么这会导致错误类型13：类型不匹配...和行“If InStr（1，LCase（MainString），LCase（SubString））＆lt;＆gt; 0然后...”被标记。我阅读了Microsoft的解释，但仍然不明白这里的类型不匹配以及我可以采取哪些措施来防止此错误。

非常感谢你的时间和你的建议！

表格中我的行的屏幕截图和错误报告：

代码：

groupBy