Бывают случаи, когда вы разработали документ и хотите поделиться планом — своими заголовками — с другими людьми. К счастью, Word позволяет сделать это довольно легко. Самый простой способ, конечно, — просто распечатать контур. Для этого выполните следующие действия:

  1. Переключитесь в режим структуры документа.

  2. Используйте панель инструментов Outlining, чтобы указать уровни заголовков, которые должны отображаться.

  3. Щелкните инструмент «Печать» на стандартной панели инструментов или выберите «Печать» в меню «Файл».

Вы должны отметить, что когда вы просматриваете схему, то, как вы печатаете, очень важно. Если вы выберете «Предварительный просмотр», Word не отобразит только заголовки в вашем документе, а это означает, что вы не увидите, что действительно будет печатать. Кроме того, если вы выберете «Печать» из «Предварительного просмотра», будут напечатаны не только заголовки. Это может заставить некоторых читателей поверить в то, что вы не можете распечатать только свой план. Это просто заблуждение; Если вы будете следовать приведенным выше инструкциям, вы можете легко распечатать свой план.

Этим планом затем можно поделиться с другими по желанию.

Но что, если вы хотите поделиться документом (а не распечаткой), состоящим только из схемы? Здесь все становится немного сложнее. Идея в том, что вы должны найти способ удалить все, кроме заголовков. Очевидный способ сделать это — использовать оглавление или поля RD. (Обе эти техники были рассмотрены в других выпусках WordTips.)

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

Sub ReduceToHeadings()

Dim docActive As Document     Dim objPara As Paragraph     Dim objShape As Shape

' set fixed ref to the working document     Set docActive = ActiveDocument

' loop and remove any non-"Heading" paragraphs     For Each objPara In docActive.Content.Paragraphs         If LCase(Left(objPara.Style, 7)) <> "heading" Then             objPara.Range.Delete         End If     Next objPara End Sub

Этот макрос просто выполняет цикл для удаления абзацев из основной части документа, если в абзаце не используется стиль заголовка. Это, конечно, предполагает, что стили заголовков не были переименованы. Когда он будет запущен, останутся только заголовки. Вы должны сразу же использовать команду «Сохранить как», чтобы получить документ, которым можно поделиться с другими. Не используйте команду «Сохранить», иначе вы перезапишете исходный документ (это определенно плохо).

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

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

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

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

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1780) применим к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:

link: / wordribbon-Sharing_Headings_with_Others [Совместное использование заголовков с другими].