ShapeRange.IncrementLeft Method
Moves the specified shape range horizontally by the specified number of points.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub IncrementLeft ( _
Increment As Single _
)
'Usage
Dim instance As ShapeRange
Dim Increment As Single
instance.IncrementLeft(Increment)
void IncrementLeft(
float Increment
)
Parameters
- Increment
Type: System.Single
Specifies how far the shape range is to be moved horizontally, in points. A positive value moves the shape range to the right; a negative value moves it to the left.
Examples
This example duplicates shape one on myDocument, sets the fill for the duplicate, moves it 70 points to the right and 50 points up, and rotates it 30 degrees clockwise.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).Duplicate
.Fill.PresetTextured msoTextureGranite
.IncrementLeft70
.IncrementTop -50
.IncrementRotation 30
End With