Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Макрос для группировки строк по заданному значению
 
#1
27.09.2013 08:32:28
Добрый день! Помогите, пожалуйста, написать макрос  :oops:  
Нужно сгруппировать строки по значению в столбце. Т.е если значения для строк в этом столбце равны, то группировать. Дело в том что таблица будет динамической, текст для строк будет разный. Поэтому какие строки, и сколько строк нужно будет группировать, и какой в них будет текст заранее не знаю. И строки будут не все группироваться, а только те, для которых проставлено значение в столбце....
Пример в файле, итоговая строка уже будет, нужно только сгруппировать данные
Изменено: sss96 - 27.09.2013 17:09:36
 
 
 
#2
27.09.2013 08:47:47
Здесь почитайте, практически готовое:
http://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=51392&MID=427262&sessid=0ade4386810daed836e8001609fdc057&MESSAGE_TYPE=EDIT&result=edit#message427262
Я сам - дурнее всякого примера! ...
 
 
 
#3
27.09.2013 11:04:10
Это не совсем то..В общем коллега на работе сделал))) выкладываю, может кому пригодится)
 
 
 
#4
27.09.2013 11:25:16
Да что Вы говорите! Это если сидеть и ждать, что кто-то все за Вас сделает. А у меня вот совсем то, только проверяемый диапазон изменил.
Код
Public Sub www()
    Dim r As Range, a As Range
        With ActiveSheet.Outline
        .SummaryRow = xlAbove
        .SummaryColumn = xlLeft
    End With
    Application.ScreenUpdating = 0
    Set r = ActiveSheet.UsedRange.Columns(8).SpecialCells(2, 1)
    For Each a In r.Areas
        a.EntireRow.Group
    Next
    Application.ScreenUpdating = -1
End Sub
Я сам - дурнее всякого примера! ...
 
 
 
Страницы: 1
Читают тему
Наверх