string - VBA - 使用 startPOS 和 endPOS 拆分字符串函数

Question

我需要 Excel VBA 中的一个函数，该函数将使用 START_POSITION 和 END_POSITION 拆分字符串。

喜欢:

function splitxy(text as String, start_pos as Integer, end_pos as Integer) as String

我是否需要将字符串转换为数组并使用循环来获取所需的字符，还是有更简单的方法？

Answer 1

根据要求评论作为答案:

Function splitxy(Text As String, StartPos As Integer, _
                                           EndPos As Integer) As String 

  splitxy = Mid(Text, StartPos, EndPos - StartPos + 1)

End Function