使用Python删除PPT中所有超链接的操作步骤

from spire.presentation import Presentation, IAutoShape, ITable, FileFormat

# 创建 Presentation 类的实例并加载一个 PowerPoint 演示文稿
演示文稿 = Presentation()
演示文稿.LoadFromFile("G:/Documents/Sample16.pptx")

# 遍历演示文稿中的幻灯片
for 幻灯片 in 演示文稿.Slides:
    # 遍历幻灯片中的形状
    for 形状 in 幻灯片.Shapes:
        # 检查形状是否有超链接
        if 形状.Click is not None:
            # 移除超链接
            形状.Click = 形状.Click.get_NoAction()
        # 检查形状是否为 IAutoShape 对象
        if isinstance(形状, IAutoShape):
            自动形状 = IAutoShape(形状)
            # 遍历自动形状中的段落
            for 段落 in 自动形状.TextFrame.Paragraphs:
                # 遍历段落中的文本范围
                for 文本范围 in 段落.TextRanges:
                    # 检查文本范围是否有超链接
                    if 文本范围.ClickAction is not None:
                        # 移除超链接
                        文本范围.ClickAction = None
        # 检查形状是否为 ITable 对象
        if isinstance(形状, ITable):
            表格 = ITable(形状)
            # 遍历表格中的行
            for 行 in 表格.TableRows:
                # 遍历行中的单元格
                for 单元格 in 行:
                    # 遍历单元格中的段落
                    for 段落 in 单元格.TextFrame.Paragraphs:
                        # 遍历段落中的文本范围
                        for 文本范围 in 段落.TextRanges:
                            # 检查文本范围是否有超链接
                            if 文本范围.ClickAction is not None:
                                # 移除超链接
                                文本范围.ClickAction = None

# 保存演示文稿
演示文稿.SaveToFile("output/RemovePresentationHyperlinks.pptx", FileFormat.Pptx2019)
演示文稿.Dispose()