Adicionar e formatar um cabeçalho e rodapé em um documento de Word

Para editar o cabeçalho e o rodapé em um documento Word, utilize os códigos abaixo.

Abrir o cabeçalho para edição:

docDoc.Content.Application.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekCurrentPageHeader

Abrir o rodapé para edição:

docDoc.Content.Application.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekCurrentPageFooter

Para fechar a edição tanto para o cabeçalho quanto para o rodapé, utilize o código abaixo:

docDoc.Content.Application.ActiveWindow.ActivePane.View.SeekView = Word.WdSeekView.wdSeekMainDocument

Abaixo, alguns códigos para inserir elementos no cabeçalho ou rodapé enquanto a edição do campo está aberta:

With docDoc.Content.Application.Selection
      .TypeText(Text:="Texto") 'Insere texto
      .ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphLeft 'Altera o alinhamento do texto
      .Font.Name = "Arial" 'Altera a fonte do texto
      .Font.Size =10 'Altera o tamanho da fonte do texto
      .Font.Bold = 0 'Coloca em negrito ou não o texto
      .InlineShapes.AddPicture("Caminho da figura/nome.extensão") 'Insere figura
      .Fields.Add(Range:=docDoc.Content.Application.Selection.Range, Type:=CInt(Word.WdFieldType.wdFieldEmpty), Text:="page") 'Insere o número da página
      .Fields.Add(Range:=docDoc.Content.Application.Selection.Range, Type:=CInt(Word.WdFieldType.wdFieldEmpty), Text:="numpages") 'Insere o número total de páginas
End With

Uma boa maneira de aprender novos códigos é utilizar a macro do Word. Grave as alterações que queira fazer e adapte para o código VB.NET.

Simples, não?