获取隐藏字段的VBA代码

Question

谁能帮我编写一个从 word 2007 文件中获取隐藏字段值的宏代码？

Answer 1

你可以试试这个：

Sub mySub()
Dim f As Variant

For Each f In ActiveDocument.Fields
    f.Select
    If Selection.Font.Hidden = True Then
        MsgBox "Field is hidden"
    End If
Next
End Sub