Мои приветствия!  
 
Группирую строки вот этими строчками  
Rows(i & ":" & q).Group  
но не могу понять как их свернуть автоматически (на листе это делается нажатием появившейся кнопочки "-"  
 
Помогите, будьте добры