EXCEL VBA截取字符串

### 使用 Excel VBA 实现字符串截取

在 Excel VBA 中，`Mid()` 函数用于从字符串中的指定位置开始提取子字符串。此函数非常灵活，可以根据不同的需求来调整起始位置和要提取的字符数量。

以下是 `Mid()` 函数的基本语法：

Mid(string, start_position[, length])

- `string`: 需要从中提取子字符串的原始字符串。
- `start_position`: 子字符串开始的位置索引（从1开始计数）。
- `length`(可选): 提取的字符数目；如果不提供，则返回从起始位置直到字符串结尾的所有字符[^4]。

#### 示例代码展示如何使用 `Mid()` 进行字符串截取:

Sub StringExtractionExamples()
    Dim originalString As String
    
    ' 定义测试用字符串
    originalString = "HelloWorld"
    
    ' 从第二个字符开始获取整个剩余部分 -> elloWorld
    Debug.Print Mid(originalString, 2)
    
    ' 获取第三个字符 -> l
    Debug.Print Mid(originalString, 3, 1)
    
    ' 从前三个字符中获取 -> Hel
    Debug.Print Mid(originalString, 1, 3)
    
    ' 尝试超出范围的长度参数 -> HelloWorld (因为实际只有10个字符)
    Debug.Print Mid(originalString, 1, 50)
End Sub

这段程序展示了四种不同情况下的字符串切片操作，包括当请求超过原字符串长度时的行为。对于最后一个例子，即使指定了过长的 `length` 参数，最终也只会得到原有字符串剩下的全部内容。