Word включает программу проверки правописания, которая позволяет определить, какие слова в документе требуют вашего внимания. Иногда может быть полезно собрать все слова с ошибками в одном месте, а не по всему документу. Если у вас есть такая необходимость, следующий макрос VBA соберет все слова с ошибками из одного документа и поместит их в новый документ.

Sub GetSpellingErrors()

Dim DocThis As Document     Dim iErrorCnt As Integer     Dim J As Integer

Set DocThis = ActiveDocument     Documents.Add

iErrorCnt = DocThis.SpellingErrors.Count     For J = 1 To iErrorCnt         Selection.TypeText Text:=DocThis.SpellingErrors(J)

Selection.TypeParagraph     Next J End Sub

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1465) применим к Microsoft Word 97, 2000, 2002 и 2003.