京寵展信息指南
313
2025-03-31
如何在Excel中按定界符拆分和轉(zhuǎn)置單元格？
如何在Excel中按定界符拆分和轉(zhuǎn)置單元格？
在本文中，我介紹了通過特定的定界符分割范圍然后將其轉(zhuǎn)置到Excel中的方法，如下圖所示。 如果您對此任務(wù)感興趣，請轉(zhuǎn)到以下詳細信息。
用VBA分割和轉(zhuǎn)置
拆分和轉(zhuǎn)置 Kutools for Excel
用VBA分割和轉(zhuǎn)置 沒有直接的方法可以通過特定的分隔符拆分和轉(zhuǎn)置數(shù)據(jù)，但是我可以引入VBA代碼來幫助您快速解決此問題。1。 按 Alt + F11鍵 顯示鍵 Microsoft Visual Basic應(yīng)用程序 窗口。
2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到新代碼中 模塊 窗口。
VBA：拆分和轉(zhuǎn)置
Sub Vertical()
UpdatebyExtendoffice20161125
Dim i As Long, strTxt As String
Dim startP As Range
Dim xRg As Range, yRg As Range
On Error Resume Next
Set xRg = Application.InputBox _
(Prompt:="Range Selection...", _
Title:="Kutools For Excel", Type:=8)
i = 1
Application.ScreenUpdating = False
For Each yRg In xRg
If i = 1 Then
strTxt = yRg.Text
i = 2
Else
strTxt = strTxt & "," & yRg.Text
End If
Next
Application.ScreenUpdating = True
Set startP = Application.InputBox _
(Prompt:="paste range...", _
Title:="Kutools For Excel", Type:=8)
ary = Split(strTxt, ",")
i = 1
Application.ScreenUpdating = False
For Each a In ary
startP(i, 1).Value = a
i = i + 1
Next a
Application.ScreenUpdating = True
End Sub
Copy
3。 按 F5
鍵運行代碼，會彈出一個對話框，供您選擇要分割和轉(zhuǎn)置的范圍。
4。 點擊 OK
。 彈出對話框，選擇放置數(shù)據(jù)的位置。
5。 點擊 OK
，并且所選內(nèi)容已被逗號分割和轉(zhuǎn)置。
請注意： 在代碼中，逗號 strTxt & "," 和 ary = 拆分（strTxt，“，”） 是您拆分?jǐn)?shù)據(jù)所依據(jù)的分隔符，您可以根據(jù)需要更改它們。
拆分和轉(zhuǎn)置 Kutools for ExcelKutools for Excel，您可以應(yīng)用它 分裂細胞 首先用定界符分割單元格，然后應(yīng)用 變換范圍 實用程序?qū)卧褶D(zhuǎn)換為一列。
安裝后 Kutools for Excel, 請按以下步驟:(免費下載 Kutools for Excel 現(xiàn)在！）
1.選擇要拆分的單元格，然后單擊 Kutools > 合并與拆分 > 分裂細胞
。 看截圖：
2.在 分裂細胞 對話框，檢查 拆分為列 選項，然后指定要分割的定界符，單擊 Ok。 然后選擇一個空白單元格將結(jié)果放置在第二個單元格中 分裂細胞
對話。 看截圖：
3。 點擊 OK，然后將單元格拆分為列，然后單擊 Kutools > Range > 變換范圍
。 看截圖：
4.在 變換范圍 對話框，檢查 范圍到單列，單擊“ Ok
，然后選擇一個單元格以放置結(jié)果。 看截圖：
5。 點擊 OK
，現(xiàn)在范圍已轉(zhuǎn)置為一列。
小費。 如果您想免費試用 分裂細胞 和 變換范圍 功能， 請去免費試用 Kutools for Excel 首先，然后按照上述步驟進行操作。
最佳辦公生產(chǎn)力工具
將小時轉(zhuǎn)化為分鐘 Kutools for Excel!
準(zhǔn)備好增強您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗 Excel！
為什么需要 Kutools for Excel
??? 超過 300 項強大功能: Kutools 包含 300 多項高級功能，可簡化您在 1500 多種場景中的工作。
?? 卓越的數(shù)據(jù)處理能力：合并單元格、刪除重復(fù)項并執(zhí)行高級數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費吹灰之力！
?? 高效的批量操作：當(dāng)你可以聰明地工作時，為什么還要付出額外的努力呢？ 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。
?? 可定制的圖表和報告：訪問各種附加圖表并生成富有洞察力的報告。
??? 強大的導(dǎo)航窗格：通過強大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢。
?? 七種類型的下拉列表：通過各種功能和類型的下拉列表使數(shù)據(jù)輸入變得輕而易舉。
?? 用戶友好：對于初學(xué)者來說輕而易舉，對于專家來說是一個強大的工具。
立即下載，與 Excel 一起穿越時空！
閱讀更多
免費下載... 采購...
Office Tab 為 Office 帶來選項卡式界面，讓您的工作更輕松
在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發(fā)布者，Access，Visio和Project。
在同一窗口的新選項卡中而不是在新窗口中打開并創(chuàng)建多個文檔。
每天將您的工作效率提高50％，并減少數(shù)百次鼠標(biāo)單擊！
閱讀更多
免費下載... 采購...
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實的內(nèi)容，請聯(lián)系我們jiasou666@gmail.com 處理，核實后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。
相關(guān)文章
