跳到主要内容
 

如何在Excel中将回车转换为逗号?

作者:晓阳 最后修改时间:2024-08-02

也许您有很多单元格,其值由回车符分隔,现在您需要查找所有回车符,并用逗号或其他字符替换它们,如下面的屏幕截图所示。 您如何快速,轻松地将所有回车符转换为工作表中的逗号或其他字符?

显示将回车符转换为逗号的屏幕截图

用公式将回车符转换为逗号

使用查找和替换功能将回车符转换为逗号

使用VBA代码将回车符转换为逗号


用公式将回车符转换为逗号

下面的简单公式可以帮助您轻松地将回车符替换为逗号或其他字符。

1。 请在数据之外的空白单元格中输入以下公式: = SUBSTITUTE(A1,CHAR(10),“,”) (A1 指示您要替换回车的单元格,并且引号之间的逗号是您要使用的字符,可以根据需要进行更改。),请参见屏幕截图:

显示如何使用公式的屏幕截图

2。 然后将填充手柄拖到您要应用此公式的范围内,您将得到以下结果,用逗号替换回车符。

显示结果的屏幕截图


使用查找和替换功能将回车符转换为逗号

查找和替换功能还可以帮助您立即将回车符转换为逗号。 请执行以下操作:

1。 选择要转换回车符的数据范围。

2。 点击 主页 > 查找和选择 > 更换 或使用捷径 Ctrl + H 键打开 查找和替换 对话框,请参见屏幕截图:

打开“查找和替换”对话框的屏幕截图

3.查找和替换 对话框中 查找内容 字段,请按 Ctrl + J 键,然后在 更换 字段中,键入所需的字符,在这种情况下,我将键入逗号(,),请参见屏幕截图:

设置“查找和替换”对话框的屏幕截图

4。 然后点击 “全部替换” 按钮,然后会弹出一个提示框,提醒您进行了多少次替换。 看截图:

将所有回车符替换为逗号的屏幕截图

5。 然后点击 OK 并关闭 查找和替换 对话框中,所有的回车符都已替换为逗号。

替换后结果数据的截图


使用VBA代码将回车符转换为逗号

如果您对VBA代码感兴趣,我可以为您介绍解决该工作的代码。

1。 按住 ALT + F11 键,然后打开 Microsoft Visual Basic for Applications窗口.

2。 点击 插页 > 模块,然后将以下代码粘贴到“模块窗口”中。

VBA代码:将回车符转换为逗号

Sub ReplaceCarriage()
'Update 20141023
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Replace(Rng.Value, Chr(10), ",")
Next
End Sub

3。 然后按 F5 键运行此代码,并弹出一个提示框,提醒您选择要使用的数据范围。 看截图:

运行 VBA 代码后选择原始数据范围的屏幕截图

4。 然后点击 OK,并且回车已立即转换为逗号。

备注:

在上面的代码中,您可以将逗号“,“之内 Rng.Value = Replace(Rng.Value,Chr(10),“,”) 您可以随意将脚本编写成任何其他字符。


相关文章:

如何在Excel中快速删除换行符?

如何通过回车将单元格分为多列或多行?


最佳办公生产力工具

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!