VBA 获取字符串解决方法
VBA 获取字符串
有这么一段字符串, 测试(test) ,现在想截取test出来,如何截取?
ps:字符串有可能是其他的,比如:这是一个电饭锅(dianfan)
总之是获取括号之内的字符。
------最佳解决方案--------------------
------其他解决方案--------------------
有可能会出现这种情况, abc(def)ghi(jk) ,想获取最后一个括号里的内容
------其他解决方案--------------------
在网上找到这样的方法了,我是写ER脚本,用的也是MID函数和InStr函数
有这么一段字符串, 测试(test) ,现在想截取test出来,如何截取?
ps:字符串有可能是其他的,比如:这是一个电饭锅(dianfan)
总之是获取括号之内的字符。
------最佳解决方案--------------------
Dim strText$, strRlt$
Dim i&
strText = "这是一个电饭锅(dianfan)"
i = InStrRev(strText, "(") + 1
strRlt = Mid$(strText, i, InStrRev(strText, ")") - i)
MsgBox strText & vbCrLf & strRlt, 64
strText = "abc(def)ghi(jk)"
i = InStrRev(strText, "(") + 1
strRlt = Mid$(strText, i, InStrRev(strText, ")") - i)
MsgBox strText & vbCrLf & strRlt, 64
------其他解决方案--------------------
有可能会出现这种情况, abc(def)ghi(jk) ,想获取最后一个括号里的内容
------其他解决方案--------------------
在网上找到这样的方法了,我是写ER脚本,用的也是MID函数和InStr函数