若要使用VBA修改所有PPT母版，可以使用以下代码：
```vba
Sub ModifyAllMasterSlides()
Dim pptApp As PowerPoint.Application
Dim pptPres As Presentation
Dim pptMaster As Master
' 创建PowerPoint应用程序对象
Set pptApp = New PowerPoint.Application
' 打开要修改的演示文稿
Set pptPres = pptApp.Presentations.Open("C:path oyourpresentation.pptx")
' 循环遍历所有的母版
For Each pptMaster In pptPres.SlideMaster.CustomLayouts
' 在此处添加你要进行的修改操作
' 可以使用 pptMaster 对象进行各种修改，例如修改标题文字、添加图片等
' 示例：修改标题文字
pptMaster.Shapes.Title.TextFrame.TextRange.Text = "新的标题"
Next pptMaster
' 保存并关闭演示文稿
pptPres.Save
pptPres.Close
' 关闭PowerPoint应用程序
pptApp.Quit
' 释放对象
Set pptMaster = Nothing
Set pptPres = Nothing
Set pptApp = Nothing
End Sub
```
请将代码中的 "C:path oyourpresentation.pptx" 替换为你要修改的演示文稿的文件路径。需要注意的是，此代码将遍历演示文稿中的所有母版，你可以在循环中添加你要进行的具体修改操作。示例代码是将所有母版的标题文字修改为 "新的标题"。
执行这段代码后，它将打开PPT文件、修改母版、保存并关闭文件，并最终退出PowerPoint应用程序。
要使用VBA修改所有PPT母版，可以按照以下步骤进行操作：
1. 打开你的PPT演示文稿，并按下ALT + F11键打开VBA编辑器。
2. 在VBA编辑器中，在左侧的"项目资源管理器"窗口中找到你的PPT演示文稿，并展开它。
3. 双击打开演示文稿的"Microsoft PowerPoint 对象"，然后双击打开"这个演示文稿"。
4. 在代码窗口中，输入以下VBA代码来修改所有母版的内容：
```vba
Sub ModifyMasterSlides()
Dim sld As Slide
Dim master As Master
' 遍历每个幻灯片
For Each sld In ActivePresentation.Slides
' 遍历每个母版
For Each master In sld.Master.Parent.Masters
' 在这里添加你想要的修改操作
' 例如修改标题文本框的内容
master.Shapes("Title Placeholder").TextFrame.TextRange.Text = "新标题"
Next master
Next sld
End Sub
```
5. 根据你的需求，在代码中添加你想要的修改操作。上述代码示例中，通过修改母版上名为"Title Placeholder"的形状的文本框内容。
6. 运行代码，可以点击VBA编辑器的工具栏上的运行按钮，或按下F5键。
7. 当代码执行完毕后，所有母版上指定的内容将被修改。
请注意，具体的修改操作需要根据你的需求来进行调整。你可以根据母版上的形状名称、文本框索引或其他属性来定位并修改相应的内容。
在使用VBA修改PPT母版之前，请确保备份你的演示文稿，以防止意外的修改。如果你对VBA编程不熟悉，建议先进行测试，并参考相关的VBA编程教程和PPT VBA参考资料。
