2017-06-14 120 views
1

因此,在挖掘之後,我找到了一些幫助來找到將圖表從Excel導出到Powerpoint的代碼,問題在於它只是選擇了一個對象。使用VBA將圖表從Excel導出到Powerpoint

Sub ertert() 
    With New PowerPoint.Application 
     With .Presentations.Add 
      With .Slides.Add(1, 12) 
       ActiveSheet.ChartObjects(1).CopyPicture xlPrinter, xlPicture 
       .Shapes.Paste 
       .Shapes(1).Select 
       .Application.ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True 
       .Application.ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True 
      End With 
     End With 
    End With 
End Sub 

它的選擇的對象是一個較大的圖(本身是指定的對象),以便基本上它只獲得項目本身的一小部分內部的圖表/ VLOOKUP圖像結果。

問題是我錯了只是選擇一個項目?另外,我想知道如何修改此代碼以添加到現有的Powerpoint(假設現有的Powerpoint已經打開)。

回答

0

你究竟想要做什麼?

如果您只是想根據您的excel工作簿的內容顯示更新的圖表,您可以簡單地複製圖表,並在兩者之間建立鏈接。當演示文稿和工作簿都打開時,它將自動更新圖表而不需要VBA。

+0

嗨, 不,excel中的圖表會根據變量和用戶輸入進行更新。因此,某個值會更改圖表配置和輸出以及縮略圖。 我想要做的是將整個圖表(和其中的任何內容)以.png/.jpeg等格式導出到PowerPoint幻燈片中。我一直在看其他腳本,並且我似乎得到了我無法診斷的錯誤消息,但是使用這個腳本,它得到了圖表的一部分,只有一個元素,但不是全部。 容克 – Junker

相關問題