Microsoft PowerPoint中的Visual Basic for Applications（VBA）
[我想为PowerPoint创建一个宏，它可以构建许多不同的幻灯片，这些幻灯片由一组12个元素组成（我称它们为”模具”-每个幻灯片仅包含元素的顺序和文本...
对于我们的一份报告，我试图将圆弧定位在一个圆上，以显示客户表现的范围。到目前为止，sub确实构建了与......>
Microsoft VBA Powerpoint IndentLevel未正确计数
我正在尝试编写一个python脚本，该脚本将访问powerpoint的信息并将其存储到字典中。我遇到了缩进的项目符号被分配为...
在PrintOptions下添加范围并在变量PrintRanges对象（PowerPoint）中确定范围
我能够添加一个范围，但是无法添加多个范围并在变量中确定它：Set PR = ActivePresentation.PrintOptions.Ranges.Add（1，1）是否可以向...添加更多范围
Dim n作为整数公共AAA（）作为整数公共QQQ（）作为字符串Sub Initialize（）n = 0 End Sub Sub WrongAnswer（oShape As Shape）A = oShape.TextEffect.Text SendWrongAnswer End Sub Sub ...
Dim n作为整数公共AAA（）作为整数公共QQQ（）作为字符串Sub Initialize（）n = 0 End Sub Sub WrongAnswer（oShape As Shape）A = oShape.TextEffect.Text SendWrongAnswer End Sub Sub ...
如何在Powerpoint 2007 VBA中检测主题字体？
有人知道如何使用VBA在Powerpoint 2007幻灯片对象中检测主题字体的使用吗？如果查看Shape.TextFrame.TextRange.Font.Name，则字体名称显示为简单名称（例如：“ Arial” ...
Powerpoint-VBA：获取支持的语言列表/将语言ID映射到名称/显示语言选择器
我正在使用适当的GUI选择语言的“整个文档中的固定语言”脚本。但是，我无法以编程方式生成Powerpoint知道的所有语言的列表...
对于带有Slide.Shapes（“ BOXNAME”）的Slide.Shapes中的每个形状，选择一个名为BOXNAME的框，如何一次通过名称选择多个形状？
如何在PowerPoint中选择多张幻灯片，然后将其重复多次？
我正在尝试在同一演示文稿中多次复制选定的幻灯片。有人可以告诉我我要去哪里错吗？谢谢Public Sub DuplicateSlideMultipleTimes（）Dim n As ...
使用VBA PowerPoint修改幻灯片中项目符号和项目符号文本之间的缩进
如何修改项目符号和项目符号文本之间的缩进或间距？我想一次修复所有幻灯片中项目符号和项目符号文本之间的缩进。我正在尝试使用...
Sub Combine_ppt（）昏暗的父项作为PowerPoint.Application暗淡的子项作为PowerPoint.Application昏暗的pname，cname作为字符串pname =“ C：\ PPT \ ParentFile.ppt”错误恢复下一个时，设置父= CreateObject（“ ...] >
如何将内置Office枚举中的参数正确地从功能区传递到VBA宏？
我正在广泛使用多种语言的PowerPoint，并且我有一个宏，可以更改演示文稿中每个框的语言。我用功能区中的参数调用宏，并传递...
PowerPoint VBA：如何将每张幻灯片分别保存为新的演示文稿？
我正在处理一个巨大的Powerpoint文件，该文件似乎太大。为了弄清楚哪些幻灯片会导致文件变大并使其变小，我试图保存每个...
我需要将特定的版式应用于来自特定母版的幻灯片。假设我在甲板上有两个主模板，并且我想从第二个主模板应用“仅标题”布局。代码是...
我有一个PowerPoint模板，可与Excel链接。 Excel中的某些区域已使用链接复制，因此它将自动更新。每当此PowerPoint模板将是...
我正在尝试从文件夹中拍摄图像，然后检查其宽度。为此，我使用以下和平代码：Dim pic As IPictureDisp Dim var As Variant var =“ ...
我在两个（或多个）不同的PowerPoint幻灯片上有两个（或多个）相同的表，每个幻灯片一个表。每当我在其中一个表上修改此单元格时，就需要更新所有表中的相应单元格。 ...
下面的Sub应该将Excel图表粘贴到新创建的PowerPoint幻灯片中。然后将图表导出为PNG：Sub ChartsToPowerPoint（）Dim pptApp as PowerPoint.Application Dim ...
我正在尝试检查所选形状是否为图表，以及随后是否为折线图。我的尝试：Sub ChartSmooth（ByVal control as IRibbonControl）Dim activeShape As Shape'Determine ...