EXCEL 中 判断某个自定义序列是否存在
2007-04-10 11:17
281 查看
Sub Macro1()
Dim customlist As String, i As Long
customlist = "全部自定义序列" & vbCrLf & String(30, "-") & vbCrLf
For i = 1 To Application.CustomListCount
customlist = customlist & "【" & Format(i, "00") & "】" & Join(Application.GetCustomListContents(i), ",") & vbCrLf
Next
MsgBox customlist & vbCrLf & String(30, "-") & vbCrLf & "序列（xxxxx）有没有？-->" & IIf(InStr(customlist, "xxxxx") > 0, "有！", "没有！")
End Sub
Dim customlist As String, i As Long
customlist = "全部自定义序列" & vbCrLf & String(30, "-") & vbCrLf
For i = 1 To Application.CustomListCount
customlist = customlist & "【" & Format(i, "00") & "】" & Join(Application.GetCustomListContents(i), ",") & vbCrLf
Next
MsgBox customlist & vbCrLf & String(30, "-") & vbCrLf & "序列（xxxxx）有没有？-->" & IIf(InStr(customlist, "xxxxx") > 0, "有！", "没有！")
End Sub
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- EXCEL 中 判断某个自定义序列是否存在
- topo排序(邻接表) 判断topo序列是否存在，是否唯一，以及输出序列
- 从一个泄露的信息文件中判断自己的QQ好友是否存在其中（TXT与EXCEL中的信息查找）
- 图结构练习——判断给定图是否存在合法拓扑序列
- sdut 图结构练习——判断给定图是否存在合法拓扑序列
- 数据结构实验之图论十：判断给定图是否存在合法拓扑序列
- 2140-数据结构实验之图论十：判断给定图是否存在合法拓扑序列
- vc中判断excel、word文件是否存在，删除excel文件
- SDUT2140 判断给定图是否存在合法拓扑序列
- excel中判断一个表中的某一列的数据在另一列中是否存在
- SDUT2140_图结构练习——判断给定图是否存在合法拓扑序列(邻接表)
- excel中判断一个表中的某一列的数据在另一个表中的某一列中是否存在
- 图结构练习——判断给定图是否存在合法拓扑序列
- 数据结构实验之图论十：判断给定图是否存在合法拓扑序列
- 图结构练习——判断给定图是否存在合法拓扑序列(dfs算法（第一个代码），邻接矩阵（前两个代码），邻接表（第三个代码）)
- ORACLE 判断序列是否存在,如果存在就删除
- 自定义比较器，一个key判断是否存在于一组容器中
- 图结构练习——判断给定图是否存在合法拓扑序列
- php中判断自定义方法是否存在
- 图结构练习——判断给定图是否存在合法拓扑序列