Question

我有一个单词模板，其中出现了可变数量的“SEQ”字段“testnum”标签（取决于需要包含多少信息 - 最小1个SEQ字段，没有最大值。）我想创建顶部的一个部分，用于计算SEQ在文档中出现的频率，并显示总计。为了使模板易于维护，我想使用F9功能键输入解决方案，而不是在vba中。

理想情况下，可以通过标记出现来计算，而无需创建其他书签，但我对任何解决方案都很开心。谢谢！

Answer 1

在Word中录制宏时，可以按Keyboard按钮为其指定键盘快捷键。我不会使用F9，因为它非常有用。（当您按下键盘组合时，Word将显示当前分配给哪个命令（如果有）。）

以下是您可以学习/探索的一些代码：

Sub CheckSEQs()
    Dim fld As Field
    Dim iTotal As Integer

    iTotal = 0
    For Each fld In ActiveDocument.Fields
        'Debug.Print fld.Code
        If InStr(fld.Code, "SEQ") > 0 Then
            'search for "testnum" as well
            iTotal = iTotal + 1
        End If
    Next fld
    MsgBox "There are " & iTotal & " SEQ fields."
End Sub

使用F9 word 2007计算特定字段的出现实例

1 个答案: