跳至主要内容

Kutools for Office — 一套工具，五种功能。事半功倍。

如何在Excel中快速将文本和日期合并到同一个单元格？

Author Xiaoyang Last modified

在Excel中处理数据集时，如果一列包含文本值，另一列包含相应的日期，您可能需要将两者合并到同一单元格中，以提高清晰度或进行进一步处理。一个常见的问题是，直接合并这些列可能会将日期转换为序列号，而不是以熟悉的日期格式显示。例如，合并“会议”和一个日期单元格可能会输出“Meeting 45361”，而不是期望的“Meeting 05/01/2024”。确保日期在连接过程中保持可读格式至关重要，特别是在准备报告或共享文件时。本文将向您介绍在Excel中正确将文本和日期合并到一个单元格中的实用且高效的方法，避免格式问题并提供清晰、用户友好的结果。

combine text and date into one cell

使用公式将文本和日期合并到一个单元格

使用Kutools for Excel将文本和日期合并到一个单元格

使用VBA将文本和日期合并到一个单元格（保留日期格式）

使用公式将文本和日期合并到一个单元格

Excel公式提供了一种快速且灵活的方法，可以在连接文本和日期值时保留可读的日期格式。这种方法特别适用于希望自动处理多行数据的情况，或者需要在文本和日期之间选择特定分隔符的情况。下面展示的公式允许您控制日期显示，并避免日期显示为序列号的问题。

1. 在数据旁边的一个空白单元格中输入以下公式（例如，如果您的数据在A列和B列中，则在C2中输入）：

=A2 & " " & TEXT(B2,"mm/dd/yyyy")

enter a formula to combine text and date into one cell

2. 按Enter键确认公式。然后，向下拖动填充柄以根据需要将公式应用到其他行。您会看到文本和日期现在已合并到每个单元格中，并且日期以标准格式显示。

drag and fill the formula to other cells

注意事项和提示：

  • 您可以使用以下替代公式，其功能相同： 
    =CONCATENATE(A2," ",TEXT(B2,"mm/dd/yyyy"))
  • 如果您希望使用不同的分隔符（例如破折号、逗号或自定义文本），只需更改引号内的值即可。例如，要使用破折号： 
    =A2 & " - " & TEXT(B2,"mm/dd/yyyy")
  • TEXT函数对于将日期值转换为可读字符串至关重要。如果省略，日期将显示为数字（Excel的内部日期代码）。
  • 如果您的源日期采用不同的格式（例如日-月-年或ISO8601），您可以更新TEXT函数中的“mm/dd/yyyy”为所需的显示格式（“yyyy-mm-dd”、“dd-mmm-yyyy”等）
  • 如果您想用分隔符合并两个日期列，请使用以下公式之一： 
    =TEXT(A2,"mm/dd/yyyy") & " - " & TEXT(B2,"mm/dd/yyyy")
    =CONCATENATE(TEXT(A2,"MM/DD/YYYY")," - ",TEXT(B2,"MM/DD/YYYY"))

combine date and date with a formula

此解决方案最适合相对较小到中等规模的数据集，并且高度可定制。但是，如果您需要跨大型数据集批量连接单元格，或者需要不同行具有不同的分隔符，则像VBA或专用插件这样的替代方案可能更高效。

当引用空白单元格或非日期格式的格式化单元格时遇到#VALUE！之类的错误，请检查数据源是否一致且格式正确。

使用Kutools for Excel将文本和日期合并到一个单元格

对于寻求无需输入复杂公式即可实现更直观简便方法的用户，Kutools for Excel 提供了一个便捷的解决方案。其合并功能使您能够通过在用户友好的对话框中选择偏好来合并列、行或单元格，同时保留、删除或合并内容。这对于经常需要合并列、希望避免手动输入公式的用户或需要高效处理大量单元格的用户尤其有价值。

Kutools for Excel 提供了超过 300 种高级功能，简化复杂任务，提升创造力与效率。 通过集成 AI 能力，Kutools 能够精准自动执行任务，让数据管理变得轻松简单。Kutools for Excel 的详细信息...         免费试用...

如果您已经安装了 Kutools for Excel，请按照以下步骤操作：

1. 选择要合并的数据范围，例如两列或多列相邻的列。

2. 转到 Kutools > 合并与拆分 > 合并行、列或单元格且不丢失数据，如下所示：

click Combine Rows, Columns or Cells without Losing Data feature of kutools

3. 在“合并列或行”对话框中，设置选项如下：

  • (1.) 选择合并列以将两列中的数据合并到一列中。
  • (2.) 在“指定分隔符”下，选择用于分隔合并内容的符号或文本（例如空格、破折号或逗号）。
  • (3.) 决定合并结果将出现在每行的最左侧还是最右侧单元格中。
  • (4.) 选择是保留还是删除原始单元格内容，并根据需要合并包含合并结果的单元格。

specify the options in the Combine Columns or Rows dialog box

4. 配置完设置后，点击确定以应用。指定的列将使用您选择的分隔符合并，并根据您的偏好显示结果。

original data
arrow left arrow middle arrow right
保留合并单元格的内容 删除合并单元格的内容 合并合并后的单元格
result of keeping contents of combined cells result of delete contents of combined cells result of merging the combined cells

注意事项和最佳实践：

  • 此功能还可用于合并包含日期的两个单元格，结果将遵循您指定的分隔符和位置。
  • 请记住，在点击确定之前预览您的选择和分隔符样式，尤其是对于大型数据集，以避免意外合并或删除。
  • 如果您的单元格包含各种数据类型（数字、日期和文本），Kutools 将根据单元格显示格式合并它们，从而避免使用公式时遇到的大多数格式问题。

点击了解更多有关 Kutools for Excel 的合并功能的详细信息。

借助合并功能，您还可以快速完成：

在Excel中合并列而不丢失数据

在Excel中合并行而不丢失数据

如何在Excel中将单元格合并为一个单元格并使用空格、逗号和分号？

立即下载并免费试用 Kutools for Excel！

使用VBA将文本和日期合并到一个单元格（保留日期格式）

对于经常需要批量连接文本和日期列，或处理非常大的数据集（手动公式处理起来耗时）的用户，自定义VBA宏可以是一个实用的解决方案。这种方法不仅提高了工作效率，还对合并结果的格式提供了完全控制。下面的宏确保在连接过程中日期保持所需的格式，防止日期变为序列号这一常见问题。

适用场景：此方法非常适合当您希望自动化整个表格中文本和日期列的组合、应用灵活的日期格式或将此功能纳入常规Excel任务时。VBA还允许轻松调整分隔符和日期格式，满足不同的报告标准。

优点：对大量数据效率高，可定制，易于适应重复任务。缺点：需要启用宏的工作簿和一些VBA编辑器的知识。

1. 点击开发工具 > Visual Basic 打开Microsoft Visual Basic for Applications窗口。在编辑器中，转到插入 > 模块，并将以下VBA代码粘贴到模块窗口中：

Sub CombineTextAndDate()
    Dim ws As Worksheet
    Dim rng As Range, cell As Range
    Dim textCol As Range, dateCol As Range
    Dim resultCol As Range
    Dim i As Long
    Dim dateFormat As String
    Dim separator As String
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set ws = ActiveSheet
    Set rng = Application.InputBox("Select the data range (including text and date columns):", xTitleId, Selection.Address, Type:=8)
    Set textCol = Application.InputBox("Select the text column (single column):", xTitleId, rng.Columns(1).Address, Type:=8)
    Set dateCol = Application.InputBox("Select the date column (single column):", xTitleId, rng.Columns(2).Address, Type:=8)
    Set resultCol = Application.InputBox("Select where to output the result (single column with same number of rows):", xTitleId, rng.Columns(rng.Columns.Count).Offset(0, 1).Address, Type:=8)
    
    separator = Application.InputBox("Enter separator (e.g. space, dash, comma):", xTitleId, " ")
    dateFormat = Application.InputBox("Enter date format (e.g. mm/dd/yyyy):", xTitleId, "mm/dd/yyyy")
    
    If textCol.Rows.Count = dateCol.Rows.Count And textCol.Rows.Count = resultCol.Rows.Count Then
        For i = 1 To textCol.Rows.Count
            resultCol.Cells(i, 1).Value = textCol.Cells(i, 1).Value & separator & Format(dateCol.Cells(i, 1).Value, dateFormat)
        Next i
        MsgBox "Text and date successfully combined!", vbInformation, xTitleId
    Else
        MsgBox "Ranges not matched in size!", vbExclamation, xTitleId
    End If
    
    On Error GoTo 0
End Sub

2. 关闭VBA编辑器。在Excel中，按Alt + F8，选择CombineTextAndDate，然后点击运行。按照提示选择您的文本列、日期列、输出范围和所需的格式/分隔符。宏将自动在选定的目标中填充结果。

实用提示：当出现提示时，您可以输入不同的分隔符（如破折号 -、逗号 , 或任何自定义文本）以及任何标准日期格式（如dd-mmm-yyyy），以匹配报告的样式。如果结果未如预期显示，请确保所有选定范围的行数完全一致，并且日期列包含实际的日期值。

如果遇到“范围大小不匹配”的错误，请仔细检查您的选择，并确保文本列、日期列和输出列的行数相同。合并后，检查结果列是否有任何意外的格式，并根据需要调整日期格式或分隔符。

总体而言，VBA自动化对于重复性或批量任务特别高效，手动操作则会耗时，并且可以通过简单运行宏来重新应用于新数据。

最佳Office办公效率工具

🤖 Kutools AI 助手：以智能执行为基础，彻底革新数据分析 |代码生成 |自定义公式创建|数据分析与图表生成 |调用Kutools函数……
热门功能：查找、选中项的背景色或标记重复项 | 删除空行 | 合并列或单元格且不丢失数据 | 四舍五入……
高级LOOKUP：多条件VLookup|多值VLookup|多表查找|模糊查找……
高级下拉列表：快速创建下拉列表 |依赖下拉列表 | 多选下拉列表……
列管理器： 添加指定数量的列 | 移动列 | 切换隐藏列的可见状态 | 比较区域与列……
特色功能：网格聚焦 |设计视图 | 增强编辑栏 | 工作簿及工作表管理器 | 资源库（自动文本） | 日期提取 | 合并数据 | 加密/解密单元格 | 按名单发送电子邮件 | 超级筛选 | 特殊筛选（筛选粗体/倾斜/删除线等）……
15大工具集：12项 文本工具（添加文本、删除特定字符等）|50+种 图表 类型（甘特图等）|40+实用 公式（基于生日计算年龄等）|19项 插入工具（插入二维码、从路径插入图片等）|12项 转换工具（小写金额转大写、汇率转换等）|7项 合并与分割工具（高级合并行、分割单元格等）| ……
Kutools支持多种语言——可选择英语、西班牙语、德语、法语、中文等40多种语言！

通过Kutools for Excel提升您的Excel技能，体验前所未有的高效办公。 Kutools for Excel提供300多项高级功能，助您提升效率并节省时间。 点击此处获取您最需要的功能……

Office Tab为Office带来多标签界面，让您的工作更加轻松

  • 支持在Word、Excel、PowerPoint中进行多标签编辑与阅读。
  • 在同一个窗口的新标签页中打开和创建多个文档，而不是分多个窗口。
  • 可提升50%的工作效率，每天为您减少数百次鼠标点击！

所有Kutools加载项，一键安装

Kutools for Office套件包含Excel、Word、Outlook和PowerPoint的插件，以及Office Tab Pro，非常适合跨Office应用团队使用。

Excel Word Outlook Tabs PowerPoint
  • 全能套装——Excel、Word、Outlook和PowerPoint插件+Office Tab Pro
  • 单一安装包、单一授权——数分钟即可完成设置（支持MSI）
  • 协同更高效——提升Office应用间的整体工作效率
  • 30天全功能试用——无需注册，无需信用卡
  • 超高性价比——比单独购买更实惠