Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
For Each s In ActivePage.Layers("circuits").Shapes Next s
For Each s In ActivePage.Layers("circuits").Shapes.All s.Outline.SetNoOutline Next s