您的位置：首页 > 财经 > 产业 > Excel 宏录制与VBA编程 —— 12、文本字符串类型相关（转换、拆分、分割、连接、替换、查找、“Like“）

Excel 宏录制与VBA编程 —— 12、文本字符串类型相关（转换、拆分、分割、连接、替换、查找、“Like“）

2024/11/18 8:28:18 来源：https://blog.csdn.net/automoblie0/article/details/139933017 浏览: 次关键词：Excel 宏录制与VBA编程 —— 12、文本字符串类型相关（转换、拆分、分割、连接、替换、查找、“Like“）

字符串分割，文末示例（文末代码3附有源码）

在这里插入图片描述

代码1 - 基础字符串

在这里插入图片描述

代码2 - 字符串拆分

在这里插入图片描述

代码3 - 字符串分割

Option ExplicitSub WorkbooksClear()Dim DataRange As RangeSet DataRange = Range("C2:E12")DataRange.Clear
End SubSub WorkbooksTest()Dim DataRange As RangeSet DataRange = Range("A2:A12")Dim DataRowCount As LongDataRowCount = DataRange.Rows.CountDim Index As IntegerFor Index = 1 To DataRowCountDim Item As RangeSet Item = DataRange.Cells(Index, 1)Dim Items() As StringItems = VBA.Split(Item, "-")Dim StringIndex As IntegerFor StringIndex = LBound(Items) To UBound(Items)Item.Offset(0, StringIndex + 2).Value = Items(StringIndex)Next StringIndexNext Index
End Sub