WORD中VBA插入页码 Sub 插入页码() With ActiveWindow.ActivePane.View .SeekView = wdSeekCurrentPageFooter With Selection .Expand wdStory .ParagraphFormat.Alignment = wdAlignPa