Перейти к основному содержанию

Как определить и выделить все объединенные ячейки в Excel?

Знаете ли вы, как найти и выбрать все объединенные ячейки в Excel? Вот три интересных и хитрых способа быстро идентифицировать и выбрать все объединенные ячейки в выделенном фрагменте или диапазоне в Excel.

документ выберите объединенные ячейки 4

Определите и выберите все объединенные ячейки с помощью команды Найти

Быстро выберите и подсчитайте все объединенные ячейки с помощью Kutools for Excel

Определите все объединенные ячейки с кодом VBA

Определите и выберите все объединенные ячейки с помощью команды Найти

Вы можете определить и выбрать все объединенные ячейки на активном листе с помощью Найдите команду со следующими шагами:

1, Нажмите Главная > Найти и выбрать > Найдите для открытия Найти и заменить диалоговое окно. Вы также можете открыть Найти и заменить диалоговое окно с нажатием Ctrl + F ключи.

2, Нажмите Формат в диалоговом окне, (Если вы не можете узнать Формат кнопку, нажмите Опции кнопку, чтобы развернуть диалоговое окно.) см. снимок экрана:

документ выберите объединенные ячейки 1

3. В всплывающем Найти формат диалоговое окно, только отметьте Объединить ячейки вариант в Текстовый контроль Раздел под центровка вкладку и щелкните OK.

документ выберите объединенные ячейки 2

4. Теперь вы вернетесь к Найти и заменить диалоговое окно, нажмите Найти все кнопка. Все объединенные ячейки перечислены в нижней части этого диалогового окна. Выберите все результаты поиска, удерживая Shift .

Теперь при выборе всех результатов поиска выделяются все объединенные ячейки на активном листе. Смотрите скриншот:

документ выберите объединенные ячейки 3

Советы: Если вы хотите только идентифицировать, находить и выбирать объединенные ячейки в выделенном фрагменте, вам необходимо сначала выбрать диапазон.

Выберите и подсчитайте все объединенные ячейки с помощью Kutools for Excel

Kutools for Excel's Выбрать объединенные ячейки Инструмент поможет вам идентифицировать, найти и выбрать все объединенные ячейки в выделении одним щелчком мыши.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. 
Перейти к загрузке
Бесплатная пробная версия 30 днейКупите
PayPal / Моя коммерция

После установки Kutools for Excel, пожалуйста, сделайте следующее :( Скачать бесплатно Kutools for Excel прямо сейчас! )

1. Выберите диапазон данных, в котором вы хотите выделить объединенные ячейки.

2. Нажмите Кутулс > Выберите > Выбрать объединенные ячейки, см. снимок экрана:

3. И все объединенные ячейки в выделении были выбраны сразу, и количество объединенных ячеек также подсчитывается, см. Снимок экрана:

документ выберите объединенные ячейки 7

Функции: Чтобы использовать эту функцию, вам необходимо установить 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 ключ для запуска этого макроса. Все объединенные ячейки в активном листе идентифицируются и выделяются, см. Снимок экрана:

документ выберите объединенные ячейки 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 Нажмите клавишу для запуска этого макроса, все объединенные ячейки будут перечислены во всплывающем диалоговом окне. Смотрите скриншот:

документ выберите объединенные ячейки 5

Comments (12)
No ratings yet. Be the first to rate!
Natalia
Natalia
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?
Reply
0
0
Ivor Shaer
Ivor Shaer
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...........
Reply
0
0
Senthooran
Senthooran
This comment was minimized by the moderator on the site
well done You are a star... Thanks :-)
Reply
0
0
srinivasan
srinivasan
This comment was minimized by the moderator on the site
Very Nice thanks a lot
Reply
0
0
JEAN
JEAN
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.
Reply
0
0
Chamundi
Chamundi
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.
Reply
0
0
pavithraravindar
pavithraravindar
This comment was minimized by the moderator on the site
thank u this help me to find merged cell in my excel
Reply
0
0
Chamundi
Chamundi
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???
Reply
0
0
Chamundi
Chamundi
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.
Reply
0
0
Chamundi
Chamundi
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!
Reply
0
0
There are no comments posted here yet
Load More
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations