我需要一个4/5位数字,它总是直接在#
之后例如,"项目标题(#1234)"但它并不总是在同一个地方或最后。
不确定我是怎么做的
答案 0 :(得分:0)
您需要手动解析字符串。
我为此做了一个快速的功能:
deepPopulate
在您的情况下使用:
'//return the number after delimeter string, if exists (first occurance only)
'//in case no number exists, returns Empty value
Function FindNumberAfter(rawValue, delimeterString)
Dim index, x, curChar
Dim sBuffer
FindNumberAfter = vbEmpty
index = InStr(rawValue, delimeterString)
If index>0 Then
For x=index+Len(delimeterString) To Len(rawValue)
curChar = Mid(rawValue, x, 1)
If IsNumeric(curChar) Then
sBuffer = sBuffer & curChar
Else
Exit For
End If
Next
If Len(sBuffer)>0 Then FindNumberAfter = CLng(sBuffer)
End If
End Function