Если Вы давно используете PowerPoint, то могли заметить, что в очень старых версиях у нас была возможность изменения прозрачности узорной заливки в фигурах. В более современных версия программы эту возможность на ленте или на панелях уже не найти. Но прозрачность узорной заливки по-прежнему можно поменять. Например, с помощью коротенького макроса: Sub ChangeTransparency() ActiveWindow.Selection.ShapeRange(1).Fill.Transparency = 0.8 End Sub Изменяйте величину прозрачности на нужную. Здесь она установлена на 80% (значение 0.8). Указывайте своё десятичное число от 0 до 1 с разделителем "точка". А затем выделяете нужную фигуру и запускаете макрос. #PP_Макросы