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

字符串分割,文末示例(文末代码3附有源码)

代码1 - 基础字符串

代码2 - 字符串拆分

代码3 - 字符串分割
cpp 复制代码
Option Explicit

Sub WorkbooksClear()
    Dim DataRange As Range
    Set DataRange = Range("C2:E12")
    DataRange.Clear
End Sub

Sub WorkbooksTest()
    Dim DataRange As Range
    Set DataRange = Range("A2:A12")
    
    Dim DataRowCount As Long
    DataRowCount = DataRange.Rows.Count
    
    Dim Index As Integer
    For Index = 1 To DataRowCount
        Dim Item As Range
        Set Item = DataRange.Cells(Index, 1)
        
        Dim Items() As String
        Items = VBA.Split(Item, "-")
        
        Dim StringIndex As Integer
        For StringIndex = LBound(Items) To UBound(Items)
            Item.Offset(0, StringIndex + 2).Value = Items(StringIndex)
        Next StringIndex
    Next Index
End Sub

代码4 - 字符串连接

代码5 - 字符串替换

代码6 - 字符串比较、大小写转换

代码6 - 字符串查找

代码7 - "Like"正则

关注

笔者 - jxd

相关推荐
葡萄城技术团队1 天前
从100秒到10秒的性能优化,你真的掌握 Excel 的使用技巧了吗?
excel
QQ3596773452 天前
ArcGIS Pro实现基于 Excel 表格批量创建标准地理数据库(GDB)——高效数据库建库解决方案
数据库·arcgis·excel
星空的资源小屋4 天前
Digital Clock 4,一款免费的个性化桌面数字时钟
stm32·单片机·嵌入式硬件·电脑·excel
揭老师高效办公4 天前
在Excel和WPS表格中批量删除数据区域的批注
excel·wps表格
我是zxb4 天前
EasyExcel:快速读写Excel的工具类
数据库·oracle·excel
辣香牛肉面4 天前
[Windows] 搜索文本2.6.2(从word、wps、excel、pdf和txt文件中查找文本的工具)
word·excel·wps·搜索文本
ljf88384 天前
Java导出复杂excel,自定义excel导出
java·开发语言·excel
tebukaopu1484 天前
json文件转excel
json·excel
shizidushu4 天前
How to work with merged cells in Excel with `openpyxl` in Python?
python·microsoft·excel·openpyxl
Eiceblue5 天前
使用 C# 设置 Excel 单元格格式
开发语言·后端·c#·.net·excel