如何使用VBA在字符串中查找字符

Question

我从另一个函数传递过来，文件夹名称例如foldername = "a\\\\b\\\\c"或foldername = "a"而我正在尝试查找包含"\\\\"的文件夹名称，并将"\\\\"替换为"__" ，根据"__"分割文件夹名称，然后传递到数组中。

请看看我到目前为止一直在尝试什么。

样本值：

If WorksheetFunction.Find("\\", foldername) = 1 Then
       foldername  = WorksheetFunction.Substitute(foldername, "\\", "__")
       SheetNames() = Split(foldername, "__")
End If

我收到以下错误。

Answer 1

SheetNames() = Split(foldername, "\\")
foldername=join(sheetnames,"__")

这样就可以了。

Answer 2

Dim a as Integer

'consider current value of is `foldername  = "a\\b\\c"`

a = InStr(foldername, "\\")

'if InStr is not able to find the value funtion returns 0

If a <> 0  Then
       foldername  = Replace(foldername, "\\", "__")
       SheetNames() = Split(foldername, "__")
End If

谢谢大家的建议，不胜感激。