Vba 将powerpoint演示文稿另存为图像、自定义图片文件名。

我想使用vba将演示文稿另存为png图像。为此，我使用以下代码行：

ActivePresentation.SaveAs myLocation, ppSaveAsPNG, msoTrue

这是最简单的部分，下面是我想知道的。例如，如果您使用的是英语powerpoint版本，则图像将被称为Slide1.png、Slide2.png。。。但是如果语言是西班牙语，它将是Diapositiva1.png，Diapositiva2.png。创建图像后，我需要在VBA中使用它们，因此我需要知道它们的名称，以便复制或引用它们。如何为它们设置自定义名称

---

或者根据powerpoint的语言，是否有一个可能的名称列表

看看这里。使用幻灯片导出而不是另存为。。。使您能够更好地控制导出图像的范围、命名方式以及导出图像的分辨率

---

在

myLocation

路径中是否还有其他文件？如果没有，您当然可以编写一些代码来分别重命名它们。即使存在其他文件，您也可以使用文件属性和

FileSystemObject

重命名所有PNG文件，例如，这些文件是在最近1分钟内创建的（如果没有其他人在同一位置写入，则应该相当安全）。另请参见此处了解如何获取语言ID：您可以使用该ID并构造一个哈希表/枚举，以使用您预期的多种语言。如果您知道语言ID，那么您就知道语言，从中只需翻译“幻灯片”并以这种方式构建哈希表。如果遇到“新”语言，您需要修改代码，但假设您只使用少数几种常规语言，这应该是一种很好的方法。