0

我正在尝试使用 vb.net 通过 word 自动化将包含徽标和文本字段的标题插入到我的 word 文档的第一页。

到目前为止，我已经让徽标显示在右侧，但我似乎无法让文本显示在第一页标题的左侧。相反，它将显示在第二页上。

下面是我的代码：

'Insert header notes.
    oDoc.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
    With oDoc.Sections(1).Headers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range
        .Font.Bold = False
        .ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight
        .Text = "The Shareholder Communication Strategists"
        .Font.Size = 10
    End With

    oDoc.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
    With oDoc.Sections(1).Headers(Word.WdHeaderFooterIndex.wdHeaderFooterFirstPage).Range
        .InlineShapes.AddPicture("S:\Databases\^Tyler & Rich Database\GUI\Alliance_logo.png")
        .ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft
        .ParagraphFormat.SpaceAfter = 24
    End With

关于如何将徽标和文本放在第一页的同一页眉上的任何建议？

4

2 回答 2

1

您的第一个With-statement 定义了从第 2 页开始的页面标题（因为wdHeaderFooterPrimary），第二个With-statement 定义了第一页的标题（因为wdHeaderFooterFirstPage）。

如果将第一个With语句的内容移动到第二个语句，则所有内容都应显示在第一页上。

微软对WdHeaderFooterIndex Enumeration的引用说：

wdHeaderFooterPrimary 返回文档或部分第一页以外的所有页面的页眉或页脚。

我不知道它会如何显示。本文可能会给您一些有用的提示，告诉您如何在 Word 文档的特定位置插入图像。

此外，调用oDoc.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True两次也没有意义。

于 2014-06-20T14:44:12.127 回答
1

如果要在左侧、中间或右侧插入多个页眉或页脚，请使用wdAlignParagraphLeft制表符在位置之间切换。

With oDoc.Sections(1).Headers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range         
    .Font.Bold = False
    .Font.Size = 10
    .ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft     
    .Text = "Left" & vbTab & "Center" & vbTab & "Right"
End With
于 2020-06-15T17:10:46.280 回答