軟體: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大