悉数本色均由用户发布九体育

发布日期:2024-05-31 17:54    点击次数:178

念念要用VBA判断元素是否在数组中九体育,有以下两种技术:

第一种,用Split+InStr函数:

Sub 判断元素是否在数组中1()
Dim arr
element = "B"
arr = Array("A", 1, "B", 2)
arr2 = "|" & Join(arr, "|") & "|"  '前后王人加"|",确保用"|XXX|"能把前后的元素也识别
If InStr(arr2, "|" & element & "|") <> 0 Then MsgBox "存在" Else MsgBox "不存在"
End Sub

第二种,用Match函数:

Sub 判断元素是否在数组中2()
Dim arr
arr = Array("1", 2, 3, 4, 5, 6)
element = 9
i = Application.Match(element, arr, 0)
If IsError(i) Then MsgBox "不存在" Else MsgBox "存在"
End Sub

筹商著作:

VBA统计数组中某元素的出现次数

vba想象数组非空元素的数目

VBA去除数组元素中的特定字符串

VBA给数组内悉数元素拼接前缀后缀

VBA移除数组中的指定元素九体育

本站仅提供存储办事,悉数本色均由用户发布,如发现存害或侵权本色,请点击举报。

 



    Powered by 九体育(官方)官方网站·IOS/安卓通用版/手机APP下载 @2013-2022 RSS地图 HTML地图