PictureFormat Property
This content is no longer actively maintained. It is provided as is, for anyone who may still be using these technologies, with no warranties or claims of accuracy with regard to the most recent product version or service release.
Returns a PictureFormat object that contains picture formatting properties for the specified object. Applies to Shape or ShapeRange objects that represent pictures or OLE objects.
expression.PictureFormat
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example sets the brightness and contrast for all pictures on the first page of the active publication.
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