VBA textbox提取单元格中某两个指定字符之间的字符
例:War_ID:SM3766R12-CA88770.9-23怎样用VBA提取“:”号与第一个“-”号之间的字符,“:”和第一个“-”之间的字符数量会变化?怎样用VBA提...
例:War_ID : SM3766R12-CA88770.9-23
怎样用VBA提取“:”号与第一个“-”号之间的字符,“:”和第一个“-”之间的字符数量会变化?怎样用VBA提取“-”号与“-”号之间的字符,“-”和“-”之间的字符数量会变化?怎样用VBA提取第二“-”号之后的字符,“-”之后的字符数量会变化?请高手帮忙,万分感谢。 展开
怎样用VBA提取“:”号与第一个“-”号之间的字符,“:”和第一个“-”之间的字符数量会变化?怎样用VBA提取“-”号与“-”号之间的字符,“-”和“-”之间的字符数量会变化?怎样用VBA提取第二“-”号之后的字符,“-”之后的字符数量会变化?请高手帮忙,万分感谢。 展开
1个回答
展开全部
假如有规律的话可用数组,相对简单一点,要不用INSTR查找,嗯,就烦了
第一,提取 :之前的字符
DIM s,arr
s="War_ID : SM3766R12-CA88770.9-23"
arr=split(s,":")
msgbox arr(0)
得到的是:分号前的字符串,
第二个 问题
Sub aaa()
Dim s, arr
s = "War_ID : SM3766R12-CA88770.9-23"
arr = Split(s, ":")
s = arr(1)
Set arr = Nothing
arr = Split(s, "-")
MsgBox arr(0)
End Sub
第一,提取 :之前的字符
DIM s,arr
s="War_ID : SM3766R12-CA88770.9-23"
arr=split(s,":")
msgbox arr(0)
得到的是:分号前的字符串,
第二个 问题
Sub aaa()
Dim s, arr
s = "War_ID : SM3766R12-CA88770.9-23"
arr = Split(s, ":")
s = arr(1)
Set arr = Nothing
arr = Split(s, "-")
MsgBox arr(0)
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询