спасибо всем кто откликнулся...

хахаха если в таблице в ячейке А1 нет значения есть, то макрос работает не верно.  
если есть значение Есть, то все отлично....  
как это можно поправить.

пардон выкладываю с поддержкой макроса

прикладываю

прикладываю  
 
на лист2 результат после макроса. желтым я выделил ненужное объединение  
на лист3 до макроса. зеленым указал то что теряется после макроса.

сводная в данном случае не то. надо чтобы четко было видно, что объединенные ячейки связанны с группой необъединеных, = таблицу надо будет распечатываьь.  
 
вариант KukLP именно то что надо, тока проблемка в том, что он заодно объединяет ячейки и в первых двух строках.  
 
помогите пожалуйста

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

Помогите пожалуйста! Нужен фрагмент макроса.  
Есть большой диапазон ячеек (более 2000). Мне надо объединить повторяющиеся в столбце ячейки, а также ряд ячеек находящихся рядом с ними.  
 
пример таблицы приложил.    
 
В данном случае столбец с ячейками по которым идет отбор С:С. в нем и надо объединить ячейки, а вместе с ними ячеки в тех же строках в диапазоне А:Е.  
 
на форуме искал. есть похожее но все не то, а своих мозгов не хватает.  
 
заранее спасибо.

Отлично!!!  
А как еще при этом сохранить сохранить исходное форматирование?

У меня есть таблица в эксель. есть макрос который заканчавается так:    
 
Selection.SpecialCells (xlVisible)    
Selection.Copy    
 
далее мне надо создать новый документ ворд вставить скопированное выделение и  
вернуться в эксель    
условие приложение ворд не обязательно будет открыто заранее  
 
по форуму искал. не разобрался.