软件:EXCEL
版本:2010
一个工作表的版面设定假如已经有自订页尾(置中)
如果我想只更改一件事
那就是将自订页尾的"字型" 改成"Times New Roman"
请问要如何以VBA实现呢
原本自订页尾有可能是各种文字 或者是如&P、&N之类的变量
若是页尾原本从无到有的话我可以录制后加以修改成
.CenterFooter = _
"&12&""Times New Roman,标准""第&""Times New Roman,标准""&P&""Times
New Roman,标准""页，共&""Times New Roman,标准""&N&""Times New Roman,标准""页"
可是针对已经存在的页尾要修改他的格式 我就卡关了
请指教谢谢

可以用个变量=录制后的字串(如内文"&12&""..."页")要改字型的话，取代replace，centerfooter=取代后的变量如要针对已存在的页尾的话，可以变量=.centerfooter取得再去取代

谢S大 但若不知道原本人家所用的字型 恐怕就也无法取代了是吧

如以变量=.centerfooter，再对变量来抓取字型名称出现于该字串内位置，如instr找到逗号(,)，往instrrev回找"，这为字型名称；或以split来取得。

了解 谢谢S大