Программное свёртывание слоёв

Нужен макрос по программному свёртыванию (и развёртыванию) состава слоёв менеджере объектов.
Готов оплатить.