Como adicionar imagens e Word Art a documentos programaticamente

Artigo
02/25/2013

Você pode adicionar imagens e objetos de desenho aos documentos em tempo de design ou durante o tempo de execução.WordArt permite que você adicione texto decorativo aos documentos Microsoft Office Word.Esses efeitos de texto são especiais desenhar objetos que você pode personalizar e inserir em seu documento.

Aplicável a: As informações neste tópico se aplicam a projetos de nível de documento e projetos de nível de aplicativo para Word 2013 e Word 2010. Para obter mais informações, consulte Recursos disponíveis pelo aplicativo do Office e o tipo de projeto.

Adicionando uma imagem em tempo de design

Se você estiver desenvolvendo um personalização da nível de usuário, você pode adicionar uma imagem ao documento em tempo de design.

Para adicionar uma imagem para uma palavra documento em tempo de design

Coloque o cursor onde você deseja inserir a imagem no documento.
Clique na guia de Inserir de fita.
Em o grupo de Ilustrações , clique Imagem.
Em a caixa de diálogo de Inserir Imagem , navegue para a imagem que você deseja inserir, e clique Inserir.

A imagem é adicionada ao seu documento no local atual do cursor.

adicionando uma imagem em tempo de execução

Você pode inserir uma imagem em um documento no local atual do cursor.

Para adicionar uma imagem no local do cursor

Chame o método de AddPicture de coleção de InlineShapes e passar em nome do arquivo.

Me.Application.Selection.InlineShapes.AddPicture("C:\SamplePicture.jpg")

this.Application.Selection.InlineShapes.AddPicture(@"C:\SamplePicture.jpg");

Adicionando WordArt em tempo de design

Se você estiver desenvolvendo um personalização da nível de usuário, você pode adicionar WordArt ao documento em tempo de design.

Para adicionar WordArt a uma palavra documento em tempo de design

Coloque o cursor onde você deseja inserir o WordArt no documento.
Clique na guia de Inserir de fita.
Em o grupo de Texto , clique em WordArt, e então seleciona um estilo de WordArt.
Adicione o texto que você deseja aparecer no documento para a caixa de diálogo de Editar texto da WordArt e clique OK.

O texto é adicionado ao seu documento com o estilo selecionado de WordArt aplicado.

adicionando WordArt em tempo de execução

Você pode inserir WordArt em um documento no local atual do cursor.O procedimento é diferente para personalizações de suplementos e a nível de aplicativo.

Para adicionar WordArt no local do cursor em uma personalização da nível

Obtenha a posição da esquerda e superior do local atual do cursor.

Dim leftPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdHorizontalPositionRelativeToPage)

Dim topPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdVerticalPositionRelativeToPage)

float leftPosition = (float)this.Application.Selection.Information[
    Word.WdInformation.wdHorizontalPositionRelativeToPage];

float topPosition = (float)this.Application.Selection.Information[
    Word.WdInformation.wdVerticalPositionRelativeToPage];

Chame o método de AddTextEffect do objeto de Shapes no documento.

Me.Shapes.AddTextEffect( _
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText", _
    "Arial Black", 24, _
    Office.MsoTriState.msoFalse, Office.MsoTriState.msoFalse, _
    leftPosition, topPosition)

this.Shapes.AddTextEffect(Office.MsoPresetTextEffect.msoTextEffect29, "SampleText",
    "Arial Black", 24, Office.MsoTriState.msoFalse, Office.MsoTriState.msoFalse,
    leftPosition, topPosition);

Para adicionar WordArt no local do cursor em um suplemento ao nível

Obtenha a posição da esquerda e superior do local atual do cursor.

Dim leftPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdHorizontalPositionRelativeToPage)

Dim topPosition As Double = Me.Application.Selection.Information( _
    Word.WdInformation.wdVerticalPositionRelativeToPage)

float leftPosition = (float)this.Application.Selection.Information[
    Word.WdInformation.wdHorizontalPositionRelativeToPage];

float topPosition = (float)this.Application.Selection.Information[
    Word.WdInformation.wdVerticalPositionRelativeToPage];

Chame o método de AddTextEffect do objeto de Shapes de documento ativo (ou documento diferente que você especificar.)

Me.Application.ActiveDocument.Shapes.AddTextEffect( _
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText", _
    "Arial Black", 24, Office.MsoTriState.msoFalse, _
    Office.MsoTriState.msoFalse, leftPosition, topPosition)

this.Application.ActiveDocument.Shapes.AddTextEffect(
    Office.MsoPresetTextEffect.msoTextEffect29, "SampleText",
    "Arial Black", 24, Office.MsoTriState.msoFalse, 
    Office.MsoTriState.msoFalse, leftPosition, topPosition);