VB MAcro não está funcionando no 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 plano de fundo porque estou usando Fill.Solid.

Não estava dando nenhuma cor de plano de fundo no Word 2003, mas agora a instalação de 2010 mudou.

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

Que 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
Manoj VI
fonte
Que tipo de objeto você está usando para o gráfico? Eu tentei o seu código com um gráfico do excel copiado / colado e um gráfico do word ole, e ambos parecem funcionar bem (no Word 2013).
Jdh #