您的位置：手工客 > 电脑 > 正文

Excel表格合并多个单元格保留数据的三种方法 合并不丢失内容技巧

  发布时间：2025-07-18 10:09:30   作者：手工客  
本文详细介绍Excel中合并多个单元格不丢失数据的三种实用方法，包括使用填充功能、TEXTJOIN函数和VBA代码操作技巧，帮助用户高效处理表格数据，提升信息展示效果。

在Excel中处理数据时，常常需要将多个单元格合并为一个单元格。但常规操作下只会保留左上角单元格的值，其他内容会被舍弃。

微软Office LTSC 2021专业增强版 简体中文批量许可版 2024年09月更新

  • 类型：办公软件
  • 大小：2.2GB
  • 语言：简体中文
  • 时间：2024-09-12
查看详情

为了解决这个问题，可以通过以下三种方式实现合并多个单元格的同时保留所有数据内容。

使用填充功能

如下图所示，将A1至A4范围内的内容合并到A1单元格中。

  • 首先，增加A列的列宽，确保可以容纳合并后的全部文字
  • 选中A1:A4区域
  • 点击【开始】-【填充】-【内容重排】

注意事项：

  • 需要合并的数据应为连续的垂直排列形式
  • 确保目标单元格有足够的列宽，否则合并后的内容可能会被拆分显示

使用函数公式

=TEXTJOIN("",TRUE,A1:A4)

TEXTJOIN函数包含三个关键参数：

  • 分隔符：可自定义值之间的分隔符号，如逗号“,”
  • ignore_empty：选择TRUE或FALSE来决定是否忽略空白单元格
  • text1：指定需要合并内容的单元格区域或数组
使用VBA代码实现合并

操作步骤：

  1. 按下Alt + F11打开VBA编辑器
  2. 将以下代码复制粘贴到模块中
Sub 合并多个单元格并保留数据()
    Dim rng As Range
    Dim val As String
    Dim cell As Range
    Set rng = Selection
    If rng.Cells.Count <= 1 Then
        Exit Sub
    End If
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    For Each cell In rng
        If cell.Value <> "" Then
            val = val & cell.Value & " "
        End If
    Next cell
    With rng
        .Merge
        .Value = Trim(val)
        .WrapText = True
    End With
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
End Sub

3、关闭VBA编辑器，按下Alt +F8打开“宏”对话框，从列表中选择对应宏并点击“执行”按钮。

通过上述方法合并单元格后，不仅可以使表格布局更清晰美观，还能有效提升数据展示的完整性和可读性。

相关文章

微信 投稿 脚本任务 在线工具

关注微信公众号

扫一扫