使用VBA插入/更新PowerPoint中的圖像？

我正在製作一個交互式Powerpoint演示文稿，此演示文稿先前已從本地服務器（XAMPP）中讀取了一個文本文件並將其顯示出來。我想現在更新它，以便用戶可以手寫他們的回覆，並在幻燈片上顯示。我有一個jQuery插件，可以讓別人使用手寫筆，並將「繪圖」保存爲本地服務器上的圖像。使用VBA插入/更新PowerPoint中的圖像？

我的問題是，如何使用VBA宏將圖像插入到PowerPoint中？或者，由於圖像總是具有相同的文件路徑，但會被替換爲不同的圖像，我能以某種方式「更新」幻燈片上的圖像嗎？對不起，如果它很混亂。

這是我試過的VBA：

Sub insert() 
    Dim oPic As Shape 
    Set oPic = ActivePresentation.Slides(1).Shapes.AddPicture("http://localhost/image.png", False, True, 0, 0, -1, -1) 
End Sub

我也可以拿到電腦，而不是服務器上的圖像的路徑。

當我運行宏時，出現「文件未找到」錯誤。有誰知道什麼是錯的？

謝謝！

PS：如果有人有興趣，這個插件叫做Signature Pad。

來源

2013-04-02 Caleb

貌似我可以將圖像，如果它在完全相同的文件夾：

Sub insert() 
    Dim oPic As Shape 
    Set oPic = ActivePresentation.Slides(1).Shapes.AddPicture("image.png", False, True, 0, 0, -1, -1) 
End Sub

這工作，但如果有人知道如何去到另一個文件夾，請讓我知道。如果我嘗試folder/image.png或/folder/image.png作爲文件路徑，它不起作用。

來源

2013-04-02 15:09:09 Caleb

我不知道你的第一個代碼有什麼問題，因爲當我爲網絡中的任何圖片運行它時，它都會放在我的演示文稿中。對於計算機上的圖片，您應該使用'ChDir c：\ my path \ here'將狀態更改爲您的選擇之一來設置完整路徑或設置'當前目錄'。 –

@KazJaw也許它在Mac上有所不同？ – Caleb

是的，絕對可以...... –

它並不需要在完全相同的文件夾，但你需要使用的是Mac風格的路徑：

#If Mac Then 
    imagePath = (MacScript("get path to startup disk as string") & "Users:name:Desktop:SomeFolder:My_Picture.png") 
#Else 
    imagePath = "C:\path\to\My_Picture.png" 
#End If 

activeSlide.Shapes.AddPicture(imagePath, False, True, 10, 10)

希望有所幫助。

來源

2014-05-01 08:08:38 Rob

使用VBA插入/更新PowerPoint中的圖像？

回答

相關問題