快捷導(dǎo)航

Python 操作 PowerPoint OLE 對象的實現(xiàn)

更新時間：2026年05月24日 09:14:04 作者：用戶835629078051

本文詳細(xì)介紹如何使用Python在PowerPoint中嵌入、管理和操作OLE對象,包括嵌入Excel文件、ZIP壓縮包等,并提取、修改已嵌入的OLE對象數(shù)據(jù),通過這些技術(shù),可以構(gòu)建自動化工具處理包含多種類型數(shù)據(jù)的復(fù)雜演示文稿

在現(xiàn)代辦公自動化場景中，經(jīng)常需要在 PowerPoint 演示文稿中嵌入外部應(yīng)用程序的對象，例如 Excel 電子表格、Word 文檔或 ZIP 壓縮包等。OLE（Object Linking and Embedding）技術(shù)允許將這些對象直接嵌入到幻燈片中，并保持其原有的編輯功能。使用 Python 自動化處理 OLE 對象，可以實現(xiàn)批量創(chuàng)建包含復(fù)雜數(shù)據(jù)對象的演示文稿，滿足企業(yè)報告、數(shù)據(jù)分析和文檔集成的需求。

本文將介紹如何使用 Python 在 PowerPoint 中嵌入、管理和操作 OLE 對象，包括嵌入 Excel 文件、ZIP 壓縮包以及如何提取和修改已有的 OLE 對象。

環(huán)境設(shè)置

首先安裝所需的庫：

pip install Spire.Presentation

核心實現(xiàn)

嵌入 Excel 文件作為 OLE 對象

在 PowerPoint 中嵌入 Excel 文件，可以使其在演示文稿中保持可編輯的狀態(tài)。當(dāng)雙擊嵌入的 Excel 對象時，會啟動 Excel 應(yīng)用程序來編輯該對象。

from spire.presentation.common import *
from spire.presentation import *

inputFile = "./Data/EmbedExcelAsOLE.xlsx"
outputFile = "EmbedExcelAsOLE.pptx"

# 創(chuàng)建 PowerPoint 文檔
ppt = Presentation()

# 加載一個圖片文件作為 OLE 對象的預(yù)覽圖
stream = Stream("Data/EmbedExcelAsOLE.png")
oleImage = ppt.Images.AppendStream(stream)
stream.Close()

# 定義 OLE 對象的位置和大小
rec = RectangleF.FromLTRB(80, 60, oleImage.Width+80, oleImage.Height+60)

# 插入基于 Excel 數(shù)據(jù)的 OLE 對象
oleStream = Stream(inputFile)
oleObject = ppt.Slides[0].Shapes.AppendOleObject("excel", oleStream, rec)
oleObject.SubstituteImagePictureFillFormat.Picture.EmbedImage = oleImage
oleObject.ProgId = "Excel.Sheet.12"
oleStream.Close()

# 保存文檔
ppt.SaveToFile(outputFile, FileFormat.Pptx2010)
ppt.Dispose()

代碼解析：

首先加載 Excel 文件和預(yù)覽圖片
定義 OLE 對象在幻燈片上的矩形區(qū)域
使用 AppendOleObject 方法將 Excel 文件作為 OLE 對象添加到幻燈片中
設(shè)置 OLE 對象的預(yù)覽圖片和 ProgID（標(biāo)識應(yīng)用程序類型）

ProgID 是關(guān)鍵參數(shù)，它標(biāo)識了用于打開對象的應(yīng)用程序：

Excel.Sheet.8 或 Excel.Sheet.12 - Excel 97-2003 工作簿或 Excel 2007+ 工作簿
Word.Document.8 或 Word.Document.12 - Word 97-2003 文檔或 Word 2007+ 文檔
PowerPoint.Show.8 或 PowerPoint.Show.12 - PowerPoint 97-2003 演示文稿或 PowerPoint 2007+ 演示文稿

嵌入其他類型的 OLE 對象

除了 Excel 文件，還可以嵌入 ZIP 壓縮包或其他類型的文件：

from spire.presentation.common import *
from spire.presentation import *

inputFile = "./Data/EmbedZipIntoPPT.pptx"
inputFile_z = "./Data/test.zip"
inputFile_i = "./Data/icon.png"
outputFile = "EmbedZipIntoPPT.pptx"

# 創(chuàng)建 PowerPoint 文檔
ppt = Presentation()
ppt.LoadFromFile(inputFile)

# 加載 ZIP 文件流
stream = Stream(inputFile_z)

# 定義 OLE 對象的位置和大小
rec = RectangleF.FromLTRB(80, 60, 180, 160)

# 插入 ZIP 對象到演示文稿
ole = ppt.Slides[0].Shapes.AppendOleObject(inputFile_z, stream, rec)
ole.ProgId = "Package"  # Package ProgID 用于 ZIP 等壓縮文件

# 加載并設(shè)置圖標(biāo)圖片
image = Stream(inputFile_i)
oleImage = ppt.Images.AppendStream(image)
ole.SubstituteImagePictureFillFormat.Picture.EmbedImage = oleImage

# 保存文檔
ppt.SaveToFile(outputFile, FileFormat.Pptx2010)
ppt.Dispose()

提取 OLE 對象數(shù)據(jù)

可以從 PowerPoint 演示文稿中提取已嵌入的 OLE 對象數(shù)據(jù)：

from spire.presentation.common import *
from spire.presentation import *

inputFile = "./Data/ExtractOLEObject.pptx"
outputFile_xls = "ExtractOLEObject.xls"
outputFile_xlsx = "ExtractOLEObject.xlsx"
outputFile_doc = "ExtractOLEObject.doc"
outputFile_docx = "ExtractOLEObject.docx"

# 創(chuàng)建 PowerPoint 文檔
presentation = Presentation()

# 從磁盤加載文檔
presentation.LoadFromFile(inputFile)

# 遍歷幻燈片和形狀
for slide in presentation.Slides:
    for shape in slide.Shapes:
        if isinstance(shape, IOleObject):
            # 找到 OLE 對象
            oleObject = shape if isinstance(shape, IOleObject) else None

            # 獲取其數(shù)據(jù)并寫入文件
            stream = oleObject.Data
            if oleObject.ProgId == "Excel.Sheet.8":
                stream.Save(outputFile_xls)
            elif oleObject.ProgId == "Excel.Sheet.12":
                stream.Save(outputFile_xlsx)
            elif oleObject.ProgId == "Word.Document.8":
                stream.Save(outputFile_doc)
            elif oleObject.ProgId == "Word.Document.12":
                stream.Save(outputFile_docx)
            
            stream.Dispose()

presentation.Dispose()

修改 OLE 對象內(nèi)容

可以修改 PowerPoint 中已存在的 OLE 對象內(nèi)容：

from spire.presentation.common import *
from spire.presentation import *

inputFile = "./Data/ModifyOLEData.pptx"
outputFile = "ModifyOLEData.pptx"

# 創(chuàng)建 PowerPoint 文檔
presentation = Presentation()

# 從磁盤加載文檔
presentation.LoadFromFile(inputFile)

# 遍歷幻燈片和形狀
for slide in presentation.Slides:
    for shape in slide.Shapes:
        if isinstance(shape, IOleObject):
            # 找到 OLE 對象
            oleObject = shape if isinstance(shape, IOleObject) else None

            # 獲取其數(shù)據(jù)
            stream = oleObject.Data
            stream2 = Stream()
            if oleObject.ProgId == "PowerPoint.Show.12":
                # 加載 PowerPoint 流
                ppt = Presentation()
                ppt.LoadFromStream(stream, FileFormat.Auto)
                
                # 在幻燈片中追加一個圖像
                ppt.Slides[0].Shapes.AppendEmbedImageByPath(
                    ShapeType.Rectangle, "Data/Logo.png", RectangleF.FromLTRB(50, 50, 150, 150))
                
                # 保存到新的流
                ppt.SaveToFile(stream2, FileFormat.Pptx2013)
                stream2.Position = 0
                
                # 修改數(shù)據(jù)
                oleObject.Data = stream2

# 保存文檔
presentation.SaveToFile(outputFile, FileFormat.Pptx2013)
presentation.Dispose()

實用技巧

選擇合適的預(yù)覽圖片：為 OLE 對象設(shè)置有意義的預(yù)覽圖片，使演示文稿更加直觀。
正確設(shè)置 ProgID：確保 OLE 對象的 ProgID 與其實際內(nèi)容類型匹配，否則可能無法正確打開。
資源管理：始終記得在完成操作后調(diào)用 Dispose() 方法釋放資源。
錯誤處理：在生產(chǎn)環(huán)境中，應(yīng)該添加適當(dāng)?shù)漠惓Ｌ幚頇C(jī)制。

總結(jié)

本文展示了如何使用 Python 在 PowerPoint 中嵌入和管理 OLE 對象，包括嵌入不同類型的文件、提取 OLE 對象數(shù)據(jù)以及修改現(xiàn)有 OLE 對象內(nèi)容。通過這些技術(shù)，可以構(gòu)建強(qiáng)大的自動化工具來處理包含多種類型數(shù)據(jù)的復(fù)雜演示文稿。這些方法特別適用于需要將多個文檔整合到單一演示文稿中的業(yè)務(wù)場景，例如制作包含實時數(shù)據(jù)報表的企業(yè)匯報材料。

到此這篇關(guān)于Python 操作 PowerPoint OLE 對象的實現(xiàn)的文章就介紹到這了,更多相關(guān)Python 操作 PowerPoint OLE內(nèi)容請搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！

您可能感興趣的文章: