MS Word 2007 - целевое количество слов

Question

Я хотел бы установить ежедневное или частичное количество слов в MS Word 2007?

Кажется, что отображается только общее количество слов или количество для выбранного текста. Но не счетчик, который отображает текущие слова, набранные против цели, например, 500 (текущий) / 1500 (последний)

спасибо

Answer 1

Мне не известен ни один метод отображения настраиваемых переменных в строке состояния, но вы можете включить макрос, чтобы показать все, что вы хотите. Пример:

Sub Macro1()
'
' Macro1 Macro
'
Dim WordCount As Long
Dim myRange As Range

Set myRange = ActiveDocument.Range

WordCount = 500 - myRange.ComputeStatistics(wdStatisticWords)
MsgBox WordCount & " words left"

End Sub