☰

在 Microsoft Word 中快速显示可读性统计数据

tag-icon • tag-icon microsoft-word statistics grammar
在 Microsoft Word 中快速显示可读性统计数据

有没有一种快速的方法可以显示 Microsoft Word 2013 或 2016 文档的可读性统计数据，而无需先对其进行更正？

我知道如何启用可读性统计这样它们就会在您完成拼写和语法检查时显示出来。但是，微软的说明说：

重要提示：您必须纠正或忽略文档中发现的所有拼写错误，然后才会显示可读性统计数据。如果文件中仍有红色波浪线，则不会显示可读性统计数据。

我想获取长篇、写得不好的文档的可读性统计数据，这些文档通常包含许多非词典术语，所以我不想先纠正所有内容。即使只是反复点击“忽略”也要花很长时间。有没有办法让我触发统计数据对话框而不进行整个拼写检查？也许使用 VBA？

我尝试将整个文本标记为“不检查拼写或语法”，但我只看到所有统计数据都为零。

答案1

您需要一个 VBA 宏来显示这些值而无需完成拼写检查。

应首先将文档保存为.docm允许宏，然后使用 Alt+F11进入 VBA 编辑器，使用菜单插入 > 模块 并将内容设置为以下内容：

Sub Readability()
    Dim DocStats As String
    Dim MBTitle As String
    Dim J As Integer

    MBTitle = "Readability Statistics"
    DocStats = ""
    With ActiveDocument.Content
        For J = 1 to 10
            DocStats = DocStats & .ReadabilityStatistics(J)
            DocStats = DocStats & ": "
            DocStats = DocStats & .ReadabilityStatistics(J).Value
            DocStats = DocStats & vbCrLf
        Next J
    End With
    MsgBox DocStats, vbOKOnly, MBTitle
End Sub

您可以F5在编辑器中使用来运行/测试宏。在日常使用中，您可以从 “开发人员”选项卡 或者 将宏分配给功能区按钮 或者 将宏添加到快速访问工具栏。

来源 ：仅显示可读性统计数据。

相关内容