RevisionsBalloonWidth Property
Sets or returns a Single representing the global setting in Microsoft Word that specifies the width of the revision balloons. Read/write.
expression.RevisionsBalloonWidth
expression Required. An expression that returns one a View object.
Remarks
The width of revision balloons includes padding of one-half inch between the document margin and the edge of the balloon and one-eighth of an inch between the edge of the balloon and the edge of the paper. Microsoft Word adds space along the left or right edge of the paper. This width is extended into the margin and does not change the width of the document or paper size. Use the RevisionsBalloonWidthType property to specify the measurement to use when setting the RevisionsBalloonWidth property.
Example
This example sets the width of the revision balloons to one inch and displays the revision balloons in the left margin. This example assumes that the document in the active window contains revisions made by one or more reviewers and that revisions are displayed in balloons.
Sub BalloonWidth()
With ActiveWindow.View
.RevisionsBalloonWidthType = wdBalloonWidthPoints
.RevisionsBalloonWidth = InchesToPoints(1)
.RevisionsBalloonSide = wdLeftMargin
End With
End Sub