excel单元格内换行的方法(双击行与行之间间隔快速调整为合适高度)

本文介绍了excel单元格的换行方法，通过函数公式和VBA实现了excel单元格的换行。

在上一篇《Excel单元格换行及相关问题解决方案》中介绍了excel单元格换行的一些方法，比如使用alt+enter组合键等。

注意：如果在excel单元格中使用alt+enter组合换行，则应重新调整行高（双击该行可快速将间隔调整到合适的高度）。

本文介绍了excel单元格中换行的一些特殊例子。

excel 单元格换行示例之一：

如何使用VBA实现一个15位数值自动每5位换行

按ALT+F11打开VBE窗口，点击Insert-Module，复制下面的代码，按F5运行，自动实现excel单元格换行。

子单元格中的换行符()

For x = 1 To Range("A" & Range("A:A").Count).End(3).Row

Cells(x, 1) = Left(Cells(x, 1), 5) & Chr(10) & Mid(Cells(x, 1), 6, 5) & Chr() 10) & Right(Cells(x, 1), 5)

下一个 x

结束子

excel 单元格换行示例二：

Excel在一个单元格中换行内容，如A1所示，如何将A1自动换行的内容自动转换为多个单元格，如A3:A5的效果。

按ALT+F11打开VBE窗口，点击Insert-Module，复制下面的代码，按F5运行，自动实现excel单元格换行。

子单元格中的换行符()

v = Split(Cells(1, 1).Value, Chr(10))

Cells(3, 1).Resize(UBound(v) + 1, 1).Value = Application.Transpose(v)

结束子

excel 单元格换行示例三：

Excel工作表中的数据用分号隔开，如何操作信息在Excel单元格中换行？

在单元格 A1 中换行。在单元格B1中输入公式：B1=SUBSTITUTE(A1,";",CHAR(10))，然后调整单元格B1的列宽和行高。

除了上篇文章的基本用法，还通过三个小例子介绍了在excel单元格中使用公式和VBA实现换行。

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/shumachanpin/article-378869-1.html