Propriedade ShapeRange.PictureFormat (Publisher)

Retorna um objeto PictureFormat que contém a imagem de formatação de propriedades para o objeto especificado. Se aplica aos objetos Shape ou ShapeRange que representam imagens ou objetos OLE. Somente leitura.

Sintaxe

expressão. PictureFormat

Expressão Uma variável que representa um objeto ShapeRange .

Exemplo

Este exemplo configura o brilho e o contraste de todas as imagens na primeira página da publicação ativa.

Sub FixPictureContrastBrightness() 
 Dim shp As Shape 
 For Each shp In ActiveDocument.Pages(1).Shapes 
 If shp.Type = pbPicture Then 
 With shp.PictureFormat 
 .Brightness = 0.6 
 .Contrast = 0.6 
 End With 
 End If 
 Next shp 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.