программно группирую строки из 1с и вот такая фигня получается

http://s2.ipicture.ru/uploads/20120918/awXym76g.jpg

как быть?

они сворачиваются , но после того как свернулись, плюсика нету и развернуть не получается, а надо

процедура сгруппировать(лист1, всегострок1)
   
   // начало объединяшки    
 ybeg=2;
 
 
 для строка=2 по (всегострок1+1) цикл
 //For y = y To yend
   если Лист1.Cells(строка, 1).value <> Лист1.Cells(строка + 1, 1).value или строка = всегострок1+1 тогда
       если ybeg + 1 <= строка тогда
           Лист1.Rows(строка(ybeg + 1) + ":" + строка(строка)).Rows.Group();
             ybeg = строка + 1;
     конецесли;
     конецесли;
 конеццикла;
 
   
конецпроцедуры

попытка
Лист1.Rows("2:"+строка(всегострок1)).Rows.UnGroup();
исключение
конецпопытки;
Лист1.Activate();
//Лист1.Range("A1").Select();
ExcelApplication.Range(Лист1.Cells(2,1),Лист1.Cells(всегострок1,всегоколонок1)).Select();
Key1=ExcelApplication.Range("A2");
ExcelApplication.Selection.Sort(Key1);

сгруппировать(лист1, таблица1.Количество());

плюсик на след. строке есть, с тебя она "спрятана"

ну так почему так происходит? я ничего не скрываю там как видно

процедура сгруппировать(лист1, всегострок1)
   
   // начало объединяшки    

Буээээ. Ушёл за тазиком.

(6) )))))))))хахах