SnapToGrid Property

expression.SnapToGrid

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

This example toggles snapping shapes to the grid lines in the active presentation.

Sub ToggleSnapToGrid()
    With ActivePresentation
        If .SnapToGrid = msoTrue Then
            .SnapToGrid = msoFalse
        Else
            .SnapToGrid = msoTrue
        End If
    End With
End Sub