Word文档页脚页码对齐检测异常：9999999返回值问题咨询

问题描述 #

开发Word文档页面设置检查工具时，通过以下VBA代码检测页脚页码及对齐方式：

Sub CheckPageNumber()
    Dim footer As HeaderFooter, s As String
    Set footer = ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary)
    Debug.Print "Has Pagination: " & footer.PageNumbers.Count
    If footer.PageNumbers.Count > 0 Then
        Debug.Print "Alignment = " & footer.PageNumbers(1).Alignment
    End If
End Sub

测试时意外返回：

Has Pagination: 1
Alignment = 9999999

已知合法对齐枚举值为0-4（如wdAlignPageNumberCenter），无法手动设置回9999999（会触发运行时错误9118），需明确该数值含义及准确判断页码位置的方法。

9999999的含义 #

这个数值是Word内部的特殊状态标记，表示页码的对齐方式未通过PageNumbers.Alignment属性直接设置，而是由页码所在段落的对齐属性控制。常见场景包括：

• 手动选中页码所在段落，通过段落对齐按钮（左/中/右对齐）调整位置
• 页码所在段落应用了带有对齐设置的样式

此时PageNumbers.Alignment属性失效，返回该无效值，因为实际对齐逻辑由段落层级接管。

准确判断页码位置的替代方法 #

方法1：检查页码所在段落的对齐属性 #

直接读取页码对应Range的段落对齐，这是获取实际显示位置的可靠方式：

Sub CheckPageNumberActualAlignment()
    Dim footer As HeaderFooter
    Dim pgNumRange As Range
    Set footer = ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary)
    
    If footer.PageNumbers.Count > 0 Then
        Set pgNumRange = footer.PageNumbers(1).Range
        ' 获取实际段落对齐值
        Dim paraAlign As WdParagraphAlignment
        paraAlign = pgNumRange.ParagraphFormat.Alignment
        
        Debug.Print "页码实际对齐方式: " & paraAlign
        ' 判断是否居中
        If paraAlign = wdAlignParagraphCenter Then
            Debug.Print "页码为居中对齐"
        Else
            Debug.Print "页码非居中对齐"
        End If
    Else
        Debug.Print "当前页脚无页码"
    End If
End Sub

常用段落对齐枚举值：

• wdAlignParagraphLeft (0)：左对齐
• wdAlignParagraphCenter (1)：居中对齐
• wdAlignParagraphRight (2)：右对齐

方法2：检查页脚整体段落对齐（适用于页脚仅含页码的场景） #

如果页脚中只有页码元素，可直接检查页脚Range的段落对齐：

Sub CheckFooterParagraphAlignment()
    Dim footer As HeaderFooter
    Set footer = ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary)
    
    If footer.PageNumbers.Count > 0 Then
        Debug.Print "页脚段落对齐方式: " & footer.Range.ParagraphFormat.Alignment
    End If
End Sub

补充说明 #

• 当通过footer.PageNumbers(1).Alignment设置对齐时，Word会同步调整页码对象属性和所在段落的对齐，此时Alignment会返回合法枚举值；但手动修改段落对齐后，页码对象的属性会被覆盖，返回9999999。
• 9999999属于Word内部状态标记，不属于公开可设置的参数范围，因此手动赋值会触发参数越界错误。

内容的提问来源于stack exchange，提问作者FunThomas