PPT中如何用宏对标题框遍历，作一个处理

☆☆☆光璀璨

我用以下这个宏将标题栏固定位置，但需一页一页的选择后再设置，能否用循环命令解决，对各页的标题栏运行这个设置？
SubMacro2()
WithActiveWindow.Selection.ShapeRange
.Fill.Transparency=0#
.Height=54.38
.Width=598.25
.Left=5.62
.Top=0#
EndWith
EndSub

user_egzry

如题

user_exgbf

恳请赐教