Hi Konrad,
hm..., as this can easily be recorded by the macro recorder,
I'm inclined to think that you are in normalview, in which case
the table seems to stay where it is.
ActiveWindow.View.Type = wdPrintView
before something like this:
With Selection.Tables(1).Rows
.WrapAroundText = True
.HorizontalPosition = wdTableCenter
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin
.DistanceLeft = CentimetersToPoints(0.25)
.DistanceRight = CentimetersToPoints(0.25)
.VerticalPosition = wdTableCenter
.RelativeVerticalPosition = wdRelativeVerticalPositionMargin
.DistanceTop = CentimetersToPoints(0)
.DistanceBottom = CentimetersToPoints(0)
.AllowOverlap = False
End With
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word XP, Win 98
to PrintView ActiveWindow.View.Type =wdNormalView
