W
Ward
Hi,
I am trying to add a Logo to an Header in an template. Positioning with
..Left and .Right works fine. But not when there is a Table in the Header.
Then Word does not use the RelativeHorizontal(&Vertical)PositionPage
correctly. With an table in the Header, Word will position the Picture
against the upper left corner of the Table. And I am not allowed to remove
the table...
Is there a work-around?
Thanks
PS: i use the following code (i removed the part for the different Header
types and the Section part for your convenience...)
Set myShape = mySection.Headers(wdHeaderFooterPrimary).Shapes.AddPicture( _
FileName:=strLogoFullName)
With myShape
.LockAspectRatio = True
.ZOrder msoSendBehindText
.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
.RelativeVerticalPosition = wdRelativeHorizontalPositionPage
.Left = CentimetersToPoints(1)
.Top = CentimetersToPoints(1)
.Width = CentimetersToPoints(5)
End with
I am trying to add a Logo to an Header in an template. Positioning with
..Left and .Right works fine. But not when there is a Table in the Header.
Then Word does not use the RelativeHorizontal(&Vertical)PositionPage
correctly. With an table in the Header, Word will position the Picture
against the upper left corner of the Table. And I am not allowed to remove
the table...
Is there a work-around?
Thanks
PS: i use the following code (i removed the part for the different Header
types and the Section part for your convenience...)
Set myShape = mySection.Headers(wdHeaderFooterPrimary).Shapes.AddPicture( _
FileName:=strLogoFullName)
With myShape
.LockAspectRatio = True
.ZOrder msoSendBehindText
.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
.RelativeVerticalPosition = wdRelativeHorizontalPositionPage
.Left = CentimetersToPoints(1)
.Top = CentimetersToPoints(1)
.Width = CentimetersToPoints(5)
End with