Cuestión : Gráficos de copiado de Excel 2007 para redactar 2007 usar VBA

Hola Folks

I tiene una hoja de balance de Excel que cree algunos gráficos y quiero automatizar un proceso de descargarlos en un documento de la palabra entonces que ahorra ese documento de la palabra. el

I tiene el código que hace esto ya y trabaja bien, problema es que cuando intento incorporar mi segunda carta substituye la carta anterior que pegué en cualquier ayuda sería grande, intravenoso consiguió mi goma del below

' del código en el primer chart
fijado oPara3 = oDoc.Content.Paragraphs.Add (oDoc.Bookmarks (“\ endofdoc”).
del Range) oPara3.Range.Text =
de la “carta número 1 " copia de oPara3.Format.SpaceAfter = de 6
oPara3.Range.InsertParagraphAfter
' que la carta de Excel
cubre (“ChartNumber1”). Aspecto del _
de Select
ActiveChart.CopyPicture: =xlScreen, clasificar: =xlScreen, dar formato: =xlPicture
'paste en el document
oPara3.Range.Paste

'Paste de la palabra en el segundo chart
determinado oPara4 = oDoc.Content.Paragraphs.Add (oDoc.Bookmarks (” \ endofdoc ").
del Range) oPara4.Range.Text =
de la “2da carta " hojas de oPara4.Format.SpaceAfter = de 6
oPara4.Range.InsertParagraphAfter
(“ChartNumber2”). Aspecto del _
de Select
ActiveChart.CopyPicture: =xlScreen, clasificar: =xlScreen, dar formato: =xlPicture
     oPara4.Range.Paste
    class= del

Respuesta : Gráficos de copiado de Excel 2007 para redactar 2007 usar VBA

el soultion es utilizar
  oPara4.Format.SpaceAfter = 6
    oPara4.Range.InsertParagraphAfter
   
después de pegar la carta adentro.