按字

时间:2016-06-13 15:13:01

标签: excel vba

我已阅读了所有基于相似主题的文章,但未能使用它们来提出解决方案。

我的电子表格中有一列我需要拆分成3个单独的列,问题是单元格中的文本都有不同的长度。有一些特定的单词可用于定义拆分单元格的位置,但这些分隔符之间的所有文本也需要随身携带。

例如,我可以使用“短”,“中”和“长”这两个词来定义分割单元格的位置,但“短”右边的所有字符和“中”之前的所有字符都需要随身携带“短”。

有没有人为此提供任何VBA解决方案?

感谢您的帮助。

1 个答案:

答案 0 :(得分:0)

strx = "testing this out short nathan test medium another test"
Debug.Print Mid(strx, 1, InStr(1, strx, "short") - 1)