在InStr中使用数组

您所在的位置：网站首页 › vba中的instr函数用法 › 在InStr中使用数组

在InStr中使用数组

2023-03-28 02:19| 来源: 网络整理| 查看: 265

文章描述：在InStr中使用数组

本文介绍了在InStr中使用数组的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

我正在寻一个VBA代码，用于确定列的单元格中是否包含(不完全匹配)字符串数组。我有一个假列表存储在A1：A3242的工作表"Helper"中，在工作表JP中我有我想要检查的列表(I：I)。

如果在第二列中到第一个列表中的，我需要将该行涂成黄。

Dim list As Variant, FF As Long, qq As Long list = Sheets("Helper").Range("A1:A3242").Value FF = Range("I" & Rows.count).End(xlUp).Row For qq = 1 To FF If InStr(1, list, cell.Value) 0 Then Range("I" & qq).EntireRow.Interior.Color = vbRed End If ext qq End Sub

我是VBA的新手，我不知道这是不是正确的方法，我收到错误"424 Object Required"(需要424对象)，如果有任何帮助，我将不胜感激，提前谢谢您：)

推荐答案 Function GetDomain(s as String) as String Dim x as Integer X = instr(s,"@") If x=0 then GetDomain = s Else GetDomain = right(s,len(s)-x) End IF End Function

然后将您的字符串环绕此函数：

If ot IsError(Application.Match(GetDomain(.Range("I" & qq).Value), list, 0))

(应可用，未测试)

这篇关于在InStr中使用数组的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！

发布时间：2023-03-14 06:44:10

本文链接：https://www.cdbsd.net/jiaoben/b2e533f3f5650136902bdbbb27829aa3.html

【本文地址】

在InStr中使用数组

在InStr中使用数组

今日新闻

推荐新闻