Excel单元格内换行方法—excel技巧教程|叨客学习资料网

　　本文介绍excel单元格内换行的办法，经过函数公式和VBA来完成excel单元格内换行。

　　注：如果使用alt+enter组合键使用excel单元格内换行之后，应该再重新调整行高(双击行与行之间距离快速调整为适宜高度)。

　　本文介绍一些特别的excel单元格内换行的实例。

　　excel单元格内换行实例一：

　　怎么用VBA完成15位数值以每5个数字主动换行。

　　

 

　　按ALT+F11，打开VBE窗口，单击刺进——模块，复制下面代码，按F5键运行即可主动完成excel单元格内换行。

　　Sub 单元格内换行()

　　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)

　　Next x

　　End Sub

　　excel单元格内换行实例二：

　　excel一个单元格内换行内容，如A1所示，怎么主动将A1主动换行的内容转换为多个单元格，如A3：A5的效果。

　　

 

　　按ALT+F11，打开VBE窗口，单击刺进——模块，复制下面代码，按F5键运行即可主动完成excel单元格内换行。

　　Sub 单元格内换行()

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

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

　　End Sub

　　excel单元格内换行实例三：

　　Excel工作表中以分号隔开的数据，怎么操作可以完成这些信息在Excel单元格内换行?

　　

 

　　将A1单元格处完成单元格内换行。在B1单元格输入公式： B1=substitute(A1,\";\",CHAR(10))，然后调整B1单元格的列宽和行高。

 

　　经过三个小实例介绍了除上一篇文章的基础用法以外的用公式和VBA来完成excel单元格内换行。