如何在vba中拆分字符串

Question

我有一个像

这样的字符串

      string1= "sample thing(model)"  

我需要在parantheses中输入字符串，即模型。我正在使用下面的代码，但没有工作。我需要使用哪种方法。

      vString1 = Split(string1, "(",2)

Answer 1

如果你知道它总是会成为parens，我会使用Instr（）方法。结合Mid（）函数，它看起来像这样：

'Find the location of the open parens
X = Instr (string1, "(")
'Find the location of the close parens
Y = Instr (string1, ")")

'Use the Mid function to find the string located inside the parens
MyString = Mid(string1, X, Y)