跳到主要内容

如何在Excel中识别并选择所有合并的单元格?

您知道如何在 Excel 中查找并选择所有合并单元格吗? 以下是三种很酷、技巧性的方法,可以快速识别和选择 Excel 中的选区或区域中的所有合并单元格。

doc选择合并的单元格4

使用“查找”命令识别并选择所有合并的单元格

使用 Kutools for Excel 快速选择并计算所有合并的单元格

用VBA代码识别所有合并的单元格


使用“查找”命令识别并选择所有合并的单元格

您可以通过以下方式识别并选择活动工作表中的所有合并单元格: 找到最适合您的地方 命令,包括以下步骤:

1。 点击 主页 > 查找和选择 > 找到最适合您的地方 打开 查找和替换 对话框。 您也可以打开 查找和替换 对话框,按 Ctrl + F 键。

2。 点击 格式 对话框中的按钮,(如果找不到 格式 按钮,请点击 附加选项 按钮以展开对话框。)请参见屏幕截图:

doc选择合并的单元格1

3。 在弹出 查找格式 对话框中,仅选中 合并单元格 在选项 文字控制 根据第 对准 选项卡,然后单击 OK.

doc选择合并的单元格2

4。 现在您回到 查找和替换 对话框,单击 找到所有 按钮。 所有合并的单元格都在此对话框的底部列出。 按住并选择所有查找结果 转移 键。

现在,当您选择所有查找结果时,将选中活动工作表中的所有合并单元格。 看截图:

doc选择合并的单元格3

提示: 如果您只想识别,查找并选择所选内容中的合并单元格,则需要首先选择范围。


使用 Kutools for Excel 选择并计算所有合并的单元格

Kutools for Excel's 选择合并的单元格 该工具将帮助您一键确定,找到并选择所有合并单元格。

Kutools for Excel : 带有300多个便捷的Excel加载项,可以在30天内免费试用. 

安装后 Kutools for Excel,请执行以下操作: 立即免费下载Kutools for Excel! )

1。 选择您要选择合并的单元格的数据范围。

2。 点击 库工具 > 选择 > 选择合并的单元格,请参见屏幕截图:

3。 并且一次选择了所有合并的单元格,并且合并的单元格数也被计数,请参见屏幕截图:

doc选择合并的单元格7

Tips::要使用此功能,您应该安装 Kutools for Excel 首先,请 点击下载并享受 30 天免费试用 现在。

用VBA代码识别所有合并的单元格

VBA 1:识别并突出显示所有合并的单元格

1。 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块,然后将以下宏粘贴到 模块 窗口。

Sub FindMergedcells()
'updateby Extendoffice
Dim x As Range
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
x.Interior.ColorIndex = 8
End If
Next
End Sub

3。 按 F5 运行此宏的键。 标识并突出显示活动工作表中的所有合并单元格,请参见屏幕截图:

doc选择合并的单元格4

VBA 2:识别并列出所有合并的单元格

1。 按住 ALT + F11 键,然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页模块,然后将以下宏粘贴到 模块 窗口。

Sub ListMergedcells()
'updateby Extendoffice
Dim x As Range
Dim sMsg As String
sMsg = ""
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
If sMsg = "" Then
sMsg = "Merged cells:" & vbCr
End If
sMsg = sMsg & Replace(x.Address, "$", "") & vbCr
End If
Next
If sMsg = "" Then
sMsg = "No merged cells."
End If
MsgBox sMsg
End Sub

3。 按 F5 键以运行此宏,所有合并的单元格都在弹出对话框中列出。 看截图:

doc选择合并的单元格5

Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Is it possible to identify the first and the last column number of the merged range in vba?
This comment was minimized by the moderator on the site
I require code to list merged ranges in a worksheet where the merged ranges are individually entered in cells starting at "A1" thus a3:c3 b2:b7 etc...........
This comment was minimized by the moderator on the site
well done You are a star... Thanks :-)
This comment was minimized by the moderator on the site
Very Nice thanks a lot
This comment was minimized by the moderator on the site
Actually I just about went mental trying to fix this in a spreadsheet. In desperation I selected all the cells (control A) clicked "merge and centre" and presto! it was fixed.
This comment was minimized by the moderator on the site
Probably obvious, but: In my last comment I should have made it clear you need to "select" each column, in turn, before scanning visually. Though really you only need to scan certain columns, I think: To the best of my knowledge, it's only cells containing text that will occasionally annex an adjoining cell, and numeric-only columns can be trusted not to do so. Even with text columns, you should be OK just checking every other column, because if any cell in the selected column has been involved in an annexation (to the right or from the left), that will show up in a visual scan of the selected column. I have never seen annexations occurring vertically, only horizontally. But if such a thing happened (a vertical annexation), you could try the same technique going row by row instead of column by column. The procedure is tedious, definitely. A royal pain, in fact. But if you have to sort your data, and Microsoft refuses to fix their bug, it's the only recourse I know of. Nowadays I try to remember to put a space character into each cell of the area I expect to use, prior to entering any other data, thus ensuring no annexations will occur.
This comment was minimized by the moderator on the site
thank u this help me to find merged cell in my excel
This comment was minimized by the moderator on the site
... so in the spreadsheet you spoke of, which was not set up with those protective space characters, my approach would be to visually scan each column which lies just to the right of any text column; and immediately after identifying & unmerging each occurrence, I would put a space character in the empty cell so the merging will not recur. Probably there's a VBA or other coding means to accomplish this much more efficiently. Anyone???
This comment was minimized by the moderator on the site
Actually I think this can be avoided entirely, if you remember to do so before entering data into any text column. In my experience the only time cells are clandestinely merged is when an empty cell is to the right of a text cell, where normally the display of the text would be extended to take advantage of the otherwise unused display space provided by the empty cell. Therefore, when initially setting up your spreadsheet, before entering any data, you can fill every "susceptible" cell with a single space—as many rows down as you expect to have data to fill. That space will be honored like any other text, and the cell to the left will not annex it.
This comment was minimized by the moderator on the site
If your spreadsheet is small (or you are desperate enough), the best way I've found is to select one column at a time and scroll all the way down to the bottom. Any merged cells will be obvious, because the entire merged cell is highlighted. You can then fix each one, one by one. But you risk wasting a lot of time doing this, since Excel continues to merge cells "behind your back" whenever it feels like doing so.* Therefore, cells you have just unmerged (or others which hadn't been merged before) may become merged while you believe you are finishing the unmerging process. I tried to find a way to completely disable the merging of cells but haven't found it. Better, of course, would be some way to keep Excel from engaging in this psychopathic behavior! *Yesterday, desperate, I did try to unmerge cells in a not-so-large spreadsheet (22 columns and fewer than 1,000 rows). Each time I thought I had finished and tried to sort, I got that same message. So then I tried another way to identify where the merged cells were—selecting a screenful of rows at a time and trying the sort on just those rows. Each time I got the message, I would try half the screenful at a time (etc.) until I identified the row(s) with merged cells. By going through the entire spreadsheet until each screenful had been successfully sorted, I figured the entire sort should work. But, NOT. Excel had been gleefully merging cells I had just unmerged. Please, someone, post a solution!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations