VBA for Powerpoint：通过选择另一个Powerpoint中的按钮更改一个Powerpoint中的幻灯片

我是VBA的初学者

我正在设计一个互动的Powerpoint演示文稿。我希望能够打开三个单独的Powerpoint演示文稿，它们将链接在一起。我一直在尝试（没有成功）用VBA创建代码，通过单击另一个Powerpoint文件中的按钮来更改当前显示的幻灯片。我可以超链接到设置的幻灯片，但这会导致此幻灯片在单击它的同一屏幕上弹出，尽管它已在另一屏幕中打开（我不希望这样）

提前感谢您的帮助，

---

Holly

VBA使用一个对象模型，它是一个庞大的属性和函数层次结构，代表应用程序。您可以使用此模型查看和更新属性，以获取文本、调整大小和修改应用程序。你应该看一些教程来开始学习。编辑代码时，可以按F2键查看和浏览此对象模型。您可以按F8键逐行运行代码（调试模式），并查看发生了什么。

---

对于您的问题，您可以访问application.presentations对象（）中打开的演示文稿。然后可以使用该列表中的演示文稿，并使用

ActiveWindow.View.goToSlide

函数（）。这是我在VBA旅程（）中使用的免费教程

VBA使用一个对象模型，该对象模型是表示应用程序的属性和函数的庞大层次结构。您可以使用此模型查看和更新属性，以获取文本、调整大小和修改应用程序。你应该看一些教程来开始学习。编辑代码时，可以按F2键查看和浏览此对象模型。您可以按F8键逐行运行代码（调试模式），并查看发生了什么。

---

对于您的问题，您可以访问application.presentations对象（）中打开的演示文稿。然后可以使用该列表中的演示文稿，并使用

ActiveWindow.View.goToSlide

函数（）。这是我在VBA旅程（）中使用的免费教程

PowerPoint有一个演示文稿集合，其中包含所有当前打开的演示文稿。您可以通过演示文稿（“名称”）获取对其中任何内容的引用，其中“名称”是演示文稿的文件名，即SAN扩展名

所以。。。假设您打开了三个演示文稿，a.pptx、b.pptx、c.pptx，您可以执行以下操作：

Sub SlideChange()
    With Presentations("c")
        .SlideShowWindow.View.GotoSlide (3)
    End With
End Sub

---

如果在任何演示文稿中运行上述操作，它会将显示演示文稿c的幻灯片放映窗口更改为第三张幻灯片。

PowerPoint有一个演示文稿集合，其中包含当前打开的所有演示文稿。您可以通过演示文稿（“名称”）获取对其中任何内容的引用，其中“名称”是演示文稿的文件名，即SAN扩展名

所以。。。假设您打开了三个演示文稿，a.pptx、b.pptx、c.pptx，您可以执行以下操作：

Sub SlideChange()
    With Presentations("c")
        .SlideShowWindow.View.GotoSlide (3)
    End With
End Sub

---

如果您在任何演示文稿中运行上述操作，它会将显示演示文稿c的幻灯片放映窗口更改为第三张幻灯片。

如果您使用当前代码回答问题，将有所帮助，谢谢！我还没有真正得到任何，我尝试了很多东西，但正如我所说，初学者！我有使用其他语言的经验，但发现VBA语法非常混乱。任何帮助都将不胜感激…如果您使用当前代码回答您的问题，将有所帮助，谢谢！我还没有真正得到任何，我尝试了很多东西，但正如我所说，初学者！我有使用其他语言的经验，但发现VBA语法非常混乱。任何帮助都将不胜感激…嗨，院长，非常感谢您的回复。这真的很有用，我在搜索时遇到了其中一些函数。我真的需要尽快完成这项工作-你有没有可能有一分钟时间把一些示例代码放在一起，我可以试试？再次感谢-霍莉：）很高兴我能帮上忙。我偶然发现了这篇文章，它演示了如何链接到可能根本不需要任何代码或VBA的其他演示文稿（）。作为提醒，堆栈溢出准则建议您发布您尝试过的代码，并寻求有关其实现的帮助。我们不能为你写。你好，很抱歉，我没意识到我必须发布一些代码。我尝试了一些，但它不起作用，因为我对VBA了解很少，我真的很困惑该写什么。我看过这篇文章，但它设置了它，所以新幻灯片与我原来的Powerpoint在同一屏幕上播放-我希望它在第二个屏幕上更改，并使原来的幻灯片保持不变。嗨，Dean，非常感谢您的回复。这真的很有用，我在搜索时遇到了其中一些函数。我真的需要尽快完成这项工作-你有没有可能有一分钟时间把一些示例代码放在一起，我可以试试？再次感谢-霍莉：）很高兴我能帮上忙。我偶然发现了这篇文章，它演示了如何链接到可能根本不需要任何代码或VBA的其他演示文稿（）。作为提醒，堆栈溢出准则建议您发布您尝试过的代码，并寻求有关其实现的帮助。我们不能为你写。你好，很抱歉，我没意识到我必须发布一些代码。我尝试了一些，但它不起作用，因为我对VBA了解很少，我真的很困惑该写什么。我看过这篇文章，但它设置好了，所以新幻灯片与我原来的Powerpoint在同一个屏幕上播放-我希望它在第二个屏幕上更改，使原来的幻灯片保持原样。非常感谢，这很有效，我花了一整天的时间在工作中尝试这样做！！！！非常感谢你们，这很有效，我花了一整天的时间在工作中试着这么做！！！！