Thiết lập font cho Footer trong VBA

[chibi]

Chào các bạn.
Cho tôi hỏi cách thiết lập font của Footer trong VBA.
Ví dụ

With ActiveSheet.PageSetup
.PrintArea = vung_in
.RightFooter = chan_trang 
End With

Không biết đưa font style, font size vào chỗ nào?

 

[tedaynui]

Chào Chibi
không biết thế này có phải ý Chibi không (Đặt Font Arial, đậm, Size 12) :

With ActiveSheet.PageSetup
     .PrintArea = vung_in
     [B].RightFooter = "&""Arial,Bold""&12&P"[/B]
End With

TDN