excel 透過函式公式和VBA來實現excel單元格內換行的具體方法

excel單元格內換行的方法，比如透過alt+enter組合鍵等等方法。

　　注：如果使用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).RowCells(x, 1) = Left(Cells(x, 1), 5) & Chr(10) & Mid(Cells(x, 1), 6, 5) & Chr(10) & Right(Cells(x, 1), 5)Next xEnd 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單元格的列寬和行高。