SideMargin Property
Returns or sets the side margin widths (in points) for the specified custom mailing label. Read/write Single.
expression.SideMargin
expression Required. An expression that returns a CustomLabel object.
Remarks
If this property is changed to a value that isn't valid for the specified mailing label layout, an error occurs.
Example
This example creates a custom label named "VisitorPass" and defines its layout. The left and right margins for each label are 0.75 inch.
Set myLabel = Application.MailingLabel.CustomLabels _
.Add(Name:="VisitorPass", DotMatrix:=False)
With myLabel
.Height = InchesToPoints(2.17)
.HorizontalPitch = InchesToPoints(3.5)
.NumberAcross = 2
.NumberDown = 4
.PageSize = wdCustomLabelLetter
.SideMargin = InchesToPoints(0.75)
.TopMargin = InchesToPoints(0.17)
.VerticalPitch = InchesToPoints(2.17)
.Width = InchesToPoints(3.5)
End With