关于用vba进行页码设置的问题

请教各位高手。想实现以下目标； 按公文标准要求，自动添加页码，并设为外侧；页码字号为4号，其左右各放一条4号一字线（“减号”）。经过学习，了解到通过以下代码可以自动添页码，并设为外侧。但找不到设置页码字号和一字线的方法，请指导。
Selection.Sections(1).Footers(1).PageNumbers.Add PageNumberAlignment:= _
        wdAlignPageNumberOutside, FirstPage:=True

ActiveSheet.PageSetup.RightFooter = "&""黑体,常规""&14&P"

楼上之解好像仍不太对。查了一下，似乎与frame（图文框）有关，敬请高手指点。