如何在 vba (excel) 中使用多字符字符串作为分隔符拆分字符串

Question

请告诉我如何将字符串拆分成多个部分，使用多字符字符串而不是单个符号作为分隔符

例如

array = MySplit("xdatayydatazzz", "data");

和结果

array(0) = "x"
array(1) = "yy"
array(2) = "zzz"

Answer 1

首先对字符串进行替换，例如具有选定字符的数据，例如@ 然后拆分：

secondstring = Replace("xdatayydatazzz", "data", "@")

array = Split(secondstring, "@")

可以将 Replace 嵌套在 Split 中以保持一步。

Answer 2

嗯，为什么不直接使用：

arr = Split("xdatayydatazzz", "data")

为了确定，我对此进行了测试，它按预期工作。关于 Split 的文档 here.

how to split string using multichar string as delimiter in vba (excel)