Questione : Grafici di copiatura da Excel 2007 per esprimere 2007 using VBA

Ciao Folks

I ha un foglio elettronico di Excel che genera alcuni grafici e voglio automatizzare un processo di dumping loro in un documento di parola allora che conserva quel documento di parola. il

I ha il codice che fa già questo e funziona bene, problema è che quando tento di entrare nella mia seconda tabella sostituisce la tabella che precedente ho incollato in tutto l'aiuto sarei grande, dispositivo di venipunzione ha ottenuto la mia colla del below

'di codice nel primo chart
regolato oPara3 = oDoc.Content.Paragraphs.Add (oDoc.Bookmarks (“\ endofdoc„).
del Range) oPara3.Range.Text = “
della tabella numero 1 " copia che di 6
oPara3.Range.InsertParagraphAfter
'la tabella da Excel
riveste (“ChartNumber1„). Apparenza del _
di Select
ActiveChart.CopyPicture: =xlScreen, graduare: =xlScreen, formattare: =xlPicture
'paste nel document
oPara3.Range.Paste

'Paste di parola nel secondo chart
stabilito oPara4 = oDoc.Content.Paragraphs.Add (oDoc.Bookmarks („ \ endofdoc ").
del Range) oPara4.Range.Text = “
della seconda tabella " strati di 6
oPara4.Range.InsertParagraphAfter
(“ChartNumber2„). Apparenza del _
di Select
ActiveChart.CopyPicture: =xlScreen, graduare: =xlScreen, formattare: =xlPicture
     oPara4.Range.Paste
    class= del

Risposta : Grafici di copiatura da Excel 2007 per esprimere 2007 using VBA

il soultion è di usare
  oPara4.Format.SpaceAfter = 6
    oPara4.Range.InsertParagraphAfter
   
dopo l'incollatura della tabella dentro.