VB MAcro não está funcionando em documento do Word 2010

1

Eu estava usando o trecho de código abaixo para inserir um gráfico no Word através da macro VB. Ele estava funcionando bem em versões mais antigas do Word, mas no Word 2010 estou enfrentando algumas dificuldades.

O problema que identifiquei é que, ao inserir o gráfico, estou obtendo uma cor de segundo plano porque estou usando Fill.Solid .

Não estava dando uma cor de fundo no Word 2003, mas agora a configuração de 2010 mudou.

Alguém pode me ajudar a obter uma opção alternativa para obter a cor de plano de fundo branco no Word 2010 ?.

Qual opção devo usar para o mesmo?

With Selection.PageSetup
 .LineNumbering.Active = False
 .Orientation = wdOrientLandscape
End With
With ActiveDocument.InlineShapes(ActiveDocument.InlineShapes.Count)
    .Fill.Visible = msoFalse
    .Fill.Solid
 .Fill.Transparency = 0#
 .Line.Weight = 0.75
 .Line.Transparency = 0#
 .Line.Visible = msoFalse
 .LockAspectRatio = msoTrue
 .Height = 330.85
 .Width = 500.05
 .PictureFormat.Brightness = 0.5
 .PictureFormat.Contrast = 0.5
 .PictureFormat.ColorType = msoPictureAutomatic
 .PictureFormat.CropLeft = 0#
 .PictureFormat.CropRight = 0#
 .PictureFormat.CropTop = 0#
 .PictureFormat.CropBottom = 0#
End With
End Sub
    
por Manoj V I 14.11.2014 / 06:05

0 respostas