KutoolsforOffice — 一套方案,五大工具。事半功倍。

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

作者晓阳修改日期

在 Excel 中处理包含一列文本值和另一列对应日期的数据集时,您可能希望将两者合并到同一单元格中,以提升清晰度或便于后续处理。然而,直接连接这两列常会导致日期被转换为序列号,而非以熟悉的日期格式显示。例如,合并“会议”与一个日期单元格,结果可能显示为“会议 45361”,而非预期的“会议 05/01/2024”。因此,在连接过程中确保日期保持可读格式至关重要,尤其是在准备报告或共享文件时。本文将为您介绍在 Excel 中高效、准确地将文本与日期合并至同一单元格的实用方法,有效避免格式问题,呈现清晰、用户友好的结果。

将文本和日期合并到一个单元格中

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

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

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


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

Excel 公式提供了一种快速而灵活的方式,在保留可读日期格式的同时,将文本与日期值无缝连接。当您需要对多行数据自动执行此操作,或希望在文本与日期之间使用特定分隔符时,这种方法尤为高效。以下公式让您精准掌控日期的显示方式,彻底避免日期以序列号形式呈现的问题。

1. 在数据旁的空白单元格中输入以下公式(例如,若数据位于 A 列和 B 列,则在 C2 单元格中输入):

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

输入公式将文本和日期合并到一个单元格中

2. 按 Enter 确认公式,然后向下拖动填充柄,将公式应用到其他行,即可看到每行单元格中的文本与日期已成功合并,并以标准格式清晰呈现。

拖动并填充公式到其他单元格

注意事项与技巧:

  • 您可以使用以下替代公式,其作用完全相同:
    =CONCATENATE(A2," ",TEXT(B2,"mm/dd/yyyy"))
  • 如果您希望使用其他分隔符(例如短横线、逗号或自定义文本),只需修改引号内的内容即可。例如,若要使用短横线:
    =A2 & " - " & TEXT(B2,"mm/dd/yyyy")
  • 函数对于将日期值转换为可读字符串至关重要。若省略该函数,日期将以数字形式显示(即 Excel 的内部日期编码)。
  • 如果您的源日期采用其他格式(例如日-月-年或 ISO 8601 格式),只需将 "mm/dd/yyyy"替换为所需显示格式(例如)"yyyy-mm-dd""dd-mmm-yyyy"等),并在 TEXT 函数中更新即可。
  • 如果要使用分隔符合并两个日期列,请使用以下任一公式:
    =TEXT(A2,"mm/dd/yyyy") & " - " & TEXT(B2,"mm/dd/yyyy")
    =CONCATENATE(TEXT(A2,"MM/DD/YYYY")," - ",TEXT(B2,"MM/DD/YYYY"))

使用公式合并日期和日期

此解决方案最适合中小型数据集,并具备高度可自定义性。然而,若您需在大型数据集中批量合并单元格,或不同行需使用不同的分隔符,则采用 VBA 或专用插件等替代方案可能更为高效。

如果引用了空白单元格或非日期格式的单元格而出现 #VALUE! 等错误,请检查源区域是否格式统一且正确。


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

对于希望以更直观、简便的方式操作,而无需输入复杂公式的用户,Kutools for Excel 提供了高效便捷的解决方案。Kutools for Excel合并工具让您通过用户友好的对话框轻松合并列、行或单元格,并可选择保留、删除或合并内容——特别适合经常需要合并列、希望避免手动输入公式,或需高效处理大量单元格的用户!

Kutools for Excel 提供 300 多项高级功能,简化复杂任务,提升创造力与效率。集成 AI 能力,Kutools 精准自动化任务,让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

如果您已安装 Kutools for Excel,请按以下步骤操作:

1. 选择要合并的数据区域,例如两个或多个相邻的列。

2. 转到 Kutools > 合并和拆分 > 合并行/列/单元格并保留值,如下所示:

点击 Kutools 的“合并行、列或单元格而不丢失数据”功能

3. 在合并列或行对话框中,按以下方式设置选项:

  • (1.) 选择合并列,即可将两列数据合并为一列。
  • (2.) 在分隔符中,选择用于分隔合并内容的符号或文本(例如空格、短横线或逗号)。
  • (3.) 确定合并后的结果在每行中显示于最左侧还是最右侧的单元格。
  • (4.) 选择一个选项,以决定合并后是保留还是删除原始单元格内容,并可根据需要合并包含合并结果的单元格。

在“合并列或行”对话框中指定选项

4. 配置好设置后,单击确定即可应用设置。指定的列将按您选择的分隔符在每行中合并,结果将依您的偏好显示。

原始数据
左箭头中间箭头右箭头
保留这些单元格的内容删除这些单元格的内容合并这些单元格
保留合并单元格内容的结果删除合并单元格内容的结果合并合并单元格的结果

注意事项与最佳实践:

  • 此功能同样适用于合并包含日期的两个单元格,结果将严格遵循您指定的分隔符及位置。
  • 在单击“确定”前,请务必预览所选内容及分隔符样式,尤其是在处理大型数据集时,以免意外合并或删除数据。
  • 如果您的单元格包含多种数据类型(如数字、日期和文本),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 自动化在处理重复性或批量任务时尤为高效,可避免耗时的手动操作,并且只需运行宏即可对新数据重复使用。

最佳办公效率工具

🤖KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP多条件 VLookup  |  多值 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、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读
  • 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
  • 将您的工作效率提升 50%,每天减少数百次鼠标点击!

所有 Kutools 插件,一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册,无需信用卡
  • 超值之选— 比单独购买插件更省钱