【发布时间】:2014-06-05 03:28:06
【问题描述】:
使用 vba 我想将演示文稿保存为 png 图像。为此,我使用以下代码行:
ActivePresentation.SaveAs myLocation, ppSaveAsPNG, msoTrue
这是最简单的部分,我想知道的就在这里。例如,如果您使用的是英文 powerpoint 版本,图像将被称为 Slide1.png、Slide2.png……但如果语言是西班牙语,则图像将是 Diapositiva1.png、Diapositiva2.png。创建图像后,我需要在 VBA 中使用它们,因此我需要知道它们的名称以便复制或引用它们。如何为它们设置自定义名称?
或者是否有一个可能的名称列表,取决于PowerPoint 的语言?
【问题讨论】:
-
myLocation路径下还有其他文件吗?如果没有,您当然可以编写一些代码来单独重命名它们。即使有其他文件,您也可以使用带有FileSystemObject的文件属性来重命名所有 PNG 文件,例如,在过去 1 分钟内创建的文件(应该是相当安全的,假设没有其他人正在写入同一地点)。 -
另请参阅此处了解如何获取语言 ID:stackoverflow.com/a/8588756/1467082 您可以使用它并构造一个哈希表/枚举以使用您预期的尽可能多的语言。如果您知道语言 ID,那么您就知道该语言,然后只需翻译“Slide”并以这种方式构建您的哈希表。如果遇到“新”语言,则需要修改代码,但假设您只使用少数常规语言,这应该是一个好方法。
标签: vba powerpoint