嘿，这事儿我熟！给你整几个不同场景能用的方法，挑适合你的来：

这是最不用费脑子的办法，适合偶尔做一次拆分的情况：

• 选中你要处理的A1单元格（如果要批量处理整列就选整个A列）
• 点顶部菜单栏的「数据」选项卡
• 找到「分列」按钮点进去，弹出文本分列向导
• 第一步选「分隔符号」，点下一步
• 第二步勾选「其他」，在输入框里敲个;（分号），这会儿预览区就能看到拆分后的效果了，没问题就点下一步
• 第三步可以设置拆分后内容放的位置（比如默认从A1开始覆盖，或者选B1开始不破坏原数据），确认后点完成，搞定！

如果原内容会变，想让拆分结果自动同步，用公式就很方便：

• Excel 365/2021及以上版本：直接用TEXTSPLIT函数，在B1单元格输入：
  =TEXTSPLIT(A1, ";")
  按回车后，内容会自动横向填充到B1、C1、D1……每个单元格对应一个拆分后的项。
• 旧版Excel（没有TEXTSPLIT）：用组合公式凑出来，在B1输入：
  =TRIM(MID(SUBSTITUTE($A1,";",REPT(" ",LEN($A1))), (COLUMN(A1)-1)*LEN($A1)+1, LEN($A1)))
  输入完按回车，然后向右拖动单元格右下角的填充柄，直到出现空单元格就停，TRIM是用来清掉可能带的多余空格的。

要是你经常要做这类拆分，或者要处理几百上千行数据，整个宏脚本一键搞定效率更高：

1. 按Alt+F11打开VBA编辑器
2. 右键点击左侧的工作簿名称，选「插入」→「模块」
3. 把下面的代码粘贴进去：

Sub SplitSemicolonContent()
    Dim rng As Range
    Dim splitArray As Variant
    ' 这里可以改成你需要处理的范围，比如Range("A:A")处理整列
    Set rng = Range("A1")
    ' 按分号拆分内容成数组
    splitArray = Split(rng.Value, ";")
    ' 把数组内容放到当前单元格右侧的单元格里
    rng.Offset(0, 1).Resize(1, UBound(splitArray) + 1).Value = splitArray
End Sub

4. 回到Excel，按Alt+F8，选中SplitSemicolonContent这个宏，点「执行」就完事了。

内容的提问来源于stack exchange，提问作者Nite Cat