有時Excel工作表中包含許多合并的單元格,怎樣快速查找這些合并了的單元格呢?可以通過“查找和替換”對話框和使用VBA代碼來進行,方法如下:
一、用“查找和替換”對話框。
1.按快捷鍵Ctrl+F,打開“查找和替換”對話框。如果“格式”按鈕沒有出現,則單擊“選項”按鈕。
2.單擊“格式”按鈕,打開“查找格式”對話框。選擇“對齊”選項卡,勾選“合并單元格”,單擊“確定”按鈕。
3.單擊“查找全部”按鈕。Excel將在對話框下方的區域中找到所有合并的單元格。如果將“范圍”設置為“工作簿”,則可以查找出整個工作簿中合并的單元格。
二、用VBA代碼。
下面的代碼可以找到當前工作表中的所有合并單元格并解除其合并。
1.按快捷鍵Alt+F11,打開VBA編輯器。在“工程”窗口中雙擊選擇包含合并單元格的工作表,在右側的代碼窗口中粘貼下列代碼:
Sub UnMergeRange()
Dim i As Range
For Each i In ActiveSheet.UsedRange
If i.Address <> i.MergeArea.Address And i.Address = i.MergeArea.Item(1).Address Then
i.MergeArea.UnMerge
End If
Next i
End Sub
2.將光標定位到代碼中,單擊工具欄中的“運行子過程/用戶窗體”按鈕或按F5鍵運行代碼,當前工作表中的合并單元格都將被解除合并