大家好，今天跟大家分享如何利用VBA代碼快速将Excel工作表中的合并單元格批量進行拆分。
應用案例将下面圖1中C列“組别”列的所有合并單元格進行批量拆分，目标效果見圖2。
圖1
圖2
操作步驟1.打開工作表，單擊窗口上方“開發工具”選項卡“代碼”功能組中的“Visual Basic”按鈕。
2. 在打開的VBA編輯器窗口左側，找到“Microsoft Excel對象”列表中的“Sheet16（合并單元格批量拆分)”，也就是我們要進行處理的工作表，雙擊鼠标。
3.在彈出的代碼編輯窗口中輸入如下代碼：
Private Sub kbiji()Dim i As RangeFor Each i In ActiveSheet.UsedRangeIf i.Address <> i.MergeArea.Address And i.Address = i.MergeArea.Item(1).Address Theni.MergeArea.Selecti.MergeArea.UnMergeSelection.FillDownEnd IfNext iEnd Sub
4.單擊VBA編輯器窗口上方的“運行子過程／用戶窗體”按鈕。
5.返回工作表，可見C列“組别”列中所有合并單元格已經全部拆分為了獨立的單元格。
#職場技能##辦公技能#
,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
