Excel：如何將分隔文本拆分為行
假設這是一個工作表中包含三列的表格，第一列列出了價格水平，第二列列出了在單元格中用逗號分隔的水果名稱，第三列列出了水果的價格。 工作是將分隔的水果名稱分成行，並重複相關的價格水平和價格行，如下圖所示：
這裡介紹兩種方法來解決這個工作。
這是一個 VBA 代碼，可以快速將分隔文本拆分為行。
1。 按 其他 + F11 啟用 Microsoft Visual Basic for Applications 窗口。
2。 點擊 插入 標籤> 模塊 創建一個新的空白模塊。
3. 將以下代碼複製並粘貼到空白模塊。
VBA：將分隔文本拆分為行
Public Sub SplitTextInCellsToRows()
'UpdatebyExtendoffice20220622
Dim xSRg, xIptRg, xCrRg, xRg As Range
Dim xSplitChar As String
Dim xArr As Variant
Dim xFNum, xFFNum, xRow, xColumn, xNum As Integer
Dim xWSh As Worksheet
Set xSRg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
If xSRg Is Nothing Then Exit Sub
xSplitChar = Application.InputBox("Type delimiter:", "Kutools for Excel", , , , , , 2)
If xSplitChar = "" Then Exit Sub
Application.ScreenUpdating = False
xRow = xSRg.Row
xColumn = xSRg.Column
Set xWSh = xSRg.Worksheet
For xFNum = xSRg.Rows.Count To 1 Step -1
Set xRg = xWSh.Cells.Item(xRow + xFNum - 1, xColumn)
Debug.Print xRg.Address
xArr = Split(xRg, xSplitChar)
For xFFNum = LBound(xArr) To UBound(xArr)
xRg.EntireRow.Copy
xRg.Offset(1, 0).EntireRow.Insert Shift:=xlShiftDown
xRg.Worksheet.Cells(xRow + xFNum, xColumn) = xArr(xFFNum)
Next
xRg.EntireRow.Delete
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub4。 按 F5 鍵單擊運行按鈕 
要激活代碼，會彈出一個對話框供您選擇排除包含需要拆分為行的分隔文本的標題的列。 點擊 OK.
5. 然後彈出第二個對話框，輸入您使用的分隔符。 這裡輸入逗號 (,)。 點擊 OK.
現在，分隔文本已被拆分為行，並且其他相關列已被重複。
VBA 會更改原始數據，您最好先保存一份副本。
如果您使用的是 Excel 2013 或更高版本，則 Power Query 將是解決這項工作的好選擇。
1.選擇數據范圍，點擊 數據 > 從表/範圍.
2.在彈出 創建表格 對話框，檢查 我的桌子有標題 根據需要，然後單擊 OK.
然後， Power Query 編輯頁 窗口顯示，數據已顯示在其中。
3. 單擊要將分隔文本拆分為行的列，然後單擊 改造 標籤> 拆分列 > 按分隔符.
或者您也可以選擇列並右鍵單擊列標題以在上下文菜單中選擇此功能。
4。 在裡面 按分隔符拆分列 窗口中，根據需要從 選擇或輸入分隔符 部分，然後選擇 每次出現的分隔符 選項，然後展開 高級選項 選擇部分 行 選項。 點擊 OK.
現在分隔的文本已被拆分為行。
5.然後關閉窗口，彈出對話框，點擊 保持 按鈕。
然後將使用該表創建一個新工作表。
如何在Excel中根據組替換行顏色？
在Excel中，為其他大多數人著色可能對我們大多數人來說都比較容易，但是，您是否曾經嘗試過根據列值的變化來為行分別著色–列A如下面的截圖所示，在本文中，我將討論根據Excel中的組替換行顏色。
如何減小 Excel 文件大小？
有時，如果 Excel 文件太大，打開或保存需要幾分鐘。 為了解決這個問題，在本教程中，它告訴您如何通過刪除不必要或從未使用過的內容或格式來減小 Excel 文件的大小。
Excel：如何創建或插入書籤
您有沒有想過在工作表或工作簿中有大量數據時創建或插入書籤以快速跳轉到特定數據范圍？
如何在Excel中將陰影應用於奇數或偶數（替代）行/列？
在設計工作表時，許多人傾向於對奇數或偶數（替代）行或列應用陰影，以使工作表更直觀。 本文將向您展示兩種在Excel中將陰影應用於奇數行或偶數行/列的方法。
- 超級公式欄 （輕鬆編輯多行文本和公式）； 閱讀版式 （輕鬆讀取和編輯大量單元格）； 粘貼到過濾範圍...
- 合併單元格/行/列 和保存數據； 拆分單元格內容； 合併重複的行和總和/平均值...防止細胞重複； 比較範圍...
- 選擇重複或唯一 行; 選擇空白行 （所有單元格都是空的）； 超級查找和模糊查找 在許多工作簿中； 隨機選擇...
- 確切的副本 多個單元格，無需更改公式參考； 自動創建參考 到多張紙； 插入項目符號，複選框等...
- 收藏并快速插入公式，範圍，圖表和圖片； 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
- 提取文字，添加文本，按位置刪除， 刪除空間; 創建和打印分頁小計； 在單元格內容和註釋之間轉換...
- 超級濾鏡 （將過濾方案保存並應用於其他工作表）； 高級排序 按月/週/日，頻率及更多； 特殊過濾器 用粗體，斜體...
- 結合工作簿和工作表; 根據關鍵列合併表； 將數據分割成多個工作表; 批量轉換xls，xlsx和PDF...
- 數據透視表分組依據 週號，週幾等 顯示未鎖定的單元格 用不同的顏色 突出顯示具有公式/名稱的單元格...
- 在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發布者，Access，Visio和Project。
- 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
- 將您的工作效率提高 50%，每天為您減少數百次鼠標點擊！
