vba - 使用 Excel 中的数据在 PowerPoint 中触发动画

Question

背景资料

使用的软件:PowerPoint Mac 2011、Excel Mac 2011

我正在寻找创建一个完全自我更新的 PowerPoint 演示文稿。为此，我创建了一个启用宏的 Excel 文档，该文档每 30 秒更新一次，代码如下:

Sub clock()
    If ThisWorkbook.Worksheets(1).Range("B1").Value = "Off" Then Exit Sub
    ThisWorkbook.Worksheets(1).Range("A1").Value = Format(Now, "hh:mm:ss AM/PM")
    Application.OnTime Now + TimeSerial(0, 0, 30), "clock"
End Sub‹

Excel 文档使用 Excel 的外部数据源功能从 Web 中提取数据，然后通过一些公式传递并排列成表格。此表被复制到剪贴板并使用选择性粘贴粘贴到 PowerPoint 以指示它是 Microsoft Excel 工作表(代码)对象。然后将演示文稿另存为启用宏的 PowerPoint。这将创建一个包含自动更新的表格的演示文稿。

问题

我想知道的是如何(或者是否有可能)使用嵌入式 Excel 表中的数据编写宏来触发 PowerPoint 中的动画。

例如，如果单元格显示 0，则形状将激活填充颜色效果，将其颜色更改为红色。如果同一单元格显示 1，则该形状将激活另一个填充颜色效果，将其颜色更改为蓝色。

谢谢你的帮助。

Answer 1

当您将表格从 PowerPoint 链接到 Excel 时，该链接还会选择条件格式。这适用于我测试的文件，但这是在运行 Windows 2010 和 Excel 和 PowerPoint 2010 的 PC 上。