VBA中如何去掉文本中的回车换行符?

zhangfengkun 2010-03-31 06:54:59
如题
...全文
4858 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhangfengkun 2010-04-01
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 cqq_chen 的回复:]
chr(10)+chr(13)去了就行....
[/Quote]
OK了,3q
goosen 2010-03-31
  • 打赏
  • 举报
回复
.............................
bcrun 2010-03-31
  • 打赏
  • 举报
回复
'替换整个文档范围的
ThisDocument.Content.Text = Replace(ThisDocument.Content.Text, vbCrLf, "")
'替换选中范围的
Selection.Range.Text = Replace(Selection.Range.Text, vbCrLf, "")

vbyes 2010-03-31
  • 打赏
  • 举报
回复
MsgBox Replace(Range("a1"), Chr(10), "")
cqq_chen 2010-03-31
  • 打赏
  • 举报
回复
chr(10)+chr(13)去了就行....
资源下载链接为: https://pan.quark.cn/s/d9ef5828b597 在 Excel 电子表格回车换行符常用于分隔文本,使数据呈现多行显示。但在某些场景下,比如数据导入其他系统或进行特定计算时,这些换行符可能会引发问题。因此,批量清除或替换 Excel 回车换行符就显得十分关键。 我们可以通过手动操作来替换或清除 Excel 回车换行符。具体操作为:打开 Excel 文件,选包含换行符的单元格或整个工作表,点击顶部的“查找和选择”按钮,在弹出的对话框选择“替换”选项卡。在“查找内容”栏,按住 Alt+Enter 键输入回车换行符(在无字符显示处按一次即可),在“替换为”栏不输入任何内容,表示将回车换行符替换为空,最后点击“全部替换”按钮,Excel 会遍历整个选区,将所有回车换行符替换为空。不过,手动操作效率较低,尤其是当文件较大或需要处理多个文件时,这种方法就不太适用了。 此时,可以借助第三方工具,例如 ReplaceExcelEnterWrap.exe。这是一个专门用于批量处理 Excel 文件回车换行符的小型应用程序。使用步骤如下:首先,下载并解压缩 ReplaceExcelEnterWrap.exe 压缩包;接着,将包含需要处理的 Excel 文件的文件夹与 ReplaceExcelEnterWrap.exe 放在同一目录下;然后,运行 ReplaceExcelEnterWrap.exe 程序,它会自动搜索该目录下的所有 Excel 文件;程序会询问是否替换回车换行符以及是否清除空格,根据需求选择相应选项;最后,等待程序执行完毕,所有指定操作将在原文件上完成,无需手动保存。 除了 ReplaceExcelEnterWrap.exe,还可以使用其他编程语言(如 Python、VBA 等)编写脚本来实现批量处理。例如,在 Pyt

2,506

社区成员

发帖
与我相关
我的任务
社区描述
VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区管理员
  • VBA
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧