怎样用VBA更改某一文件夹下所有PowerPoint文件母版的页脚字体？
PowerPoint文件母版页脚有两部分组成，一部分是页码，还有一部分是“Confidential”字样。
现在用的字体是Calibri，需要更改成Arial。
需要将一个文件夹下所有的PowerPoint文件都做这样的改动。

请问应该怎样写啊？

End With

ActiveWindow.ViewType = ppViewSlide
pres.Save
pres.Close
End If
Next

End Sub