Цитата:
Сообщение от
Gustav
Ну эту-то бэйсиковщину надо, наверное, разложить на простые одноточечные операторы, как обычно для коллекций, типа:
X++:
shapes = comsheet.Shapes();
shape = shapes.Item("Garant");
Осталось немного бесыковщины

, а именно подставить свойство
Код:
Selection.ShapeRange.Fill.ForeColor.SchemeColor = 57