使用VBA在Word Doc中创建页脚并右对齐

时间:2018-11-16 14:31:06

标签: vba ms-word

我正在使用VBA创建Word文档,我只需要编辑页眉/页脚。当我在下面运行VBA时,页脚居中...如何右对齐?谢谢!

mylist = [1,5,7,10,13]
mydict = {
          1:face1,2:face2,3:face3,4:face4,5:face5,6:face6,7:face7,
          8:face8,9:face9,10:face10,11:face11,12:face12,13:face13
         }

output = [mydict[key] for key in mylist]

>>> [face1, face5, face7, face10, face13]

1 个答案:

答案 0 :(得分:2)

格式化页脚的内容有多种方法...

  1. 最“正确”的方法是更改​​页脚样式的定义。这将包括问题代码直接应用的字体格式。

例如:

With ActiveDocument.Styles("Footer")
  .Font.Name = "Arial"
  .Font.Size = 9
  .ParagraphFormat.Alignment = wdAlignParagraphRight
End With
  1. 如果应直接应用格式设置,则可以直接直接应用正确的对齐方式:

基于问题代码的示例

.Footers(wdHeaderFooterPrimary).range.ParagraphFormat.Alignment = wdAlignParagraphRight
  1. 默认的页脚样式定义了三个制表位:左对齐,居中和右对齐。这允许内容在页面上对齐。为了使用此功能,请将段落对齐方式从(1)或(2)中移出,并在要写入页脚的字符串的开头放置两个TAB字符(vbTab):

基于问题代码的示例

.Footers(wdHeaderFooterPrimary).range.Text = vbTab & vbTab & Format(Date, "Long Date")