Джерри обычно приходится работать с длинными документами (около 30 страниц)

где ему нужно изменить порядок абзацев в документе.

Он задается вопросом, есть ли способ легко изменить порядок всех абзацев, чтобы последний был первым, а первый — последним.

Если вам нужно сделать это всего один или два раза, самым простым способом будет отсортировать абзацы. Все, что вам нужно сделать, это убедиться, что каждый абзац начинается с трехзначного числа в последовательном порядке. Затем выберите все абзацы и отсортируйте их, как обычно, — в порядке убывания — и все будет готово.

Подобно этому подходу, вы можете использовать Excel для сортировки. Это хорошо работает, если ваши абзацы довольно короткие:

  1. Убедитесь, что открыты и Word, и Excel. Word должен содержать документ, абзацы которого вы хотите отсортировать, а Excel должен содержать пустой лист.

  2. В Word нажмите Ctrl + A, чтобы выделить весь документ.

  3. Нажмите Ctrl + C. Это копирует абзацы в буфер обмена.

  4. В Excel выберите ячейку B1.

  5. Нажмите Ctrl + V. Все абзацы вставляются в столбец B.

  6. Заполните столбец A серией последовательных чисел для необходимого количества строк. Excel предлагает несколько простых способов сделать это; просто убедитесь, что столбец A содержит фактические значения, а не формулы.

  7. Выберите ячейку A1.

  8. Откройте вкладку «Данные» на ленте.

  9. Щелкните стрелку вниз рядом с инструментом сортировки, а затем щелкните по убыванию.

Excel меняет порядок столбцов A и B. Теперь ваши абзацы расположены в обратном порядке.

  1. Выберите ячейку B1.

  2. Нажмите Shift + Ctrl + стрелка вниз. Теперь все ваши абзацы должны быть выделены.

  3. Нажмите Ctrl + C. Это копирует абзацы в буфер обмена.

  4. Вернитесь в Word. Все абзацы в документе должны быть выделены.

  5. Используя Специальную вставку, выберите вставку только текста. (Если вы этого не сделаете, в вашем документе будет таблица Excel.)

Обратной стороной этого подхода является то, что в тексте не сохраняется никакого форматирования; он теряется при переводе между Excel и Word. Если вы хотите сохранить форматирование, вам нужно выполнить сортировку в Word (как описано ранее), или вам нужно использовать макрос для сортировки.

Макро-подход также является хорошей идеей, если вам необходимо регулярно выполнять такую ​​обработку документов.

Sub ReveresParagraphs()

Dim J As Long     Dim Source As Document

Set Source = ActiveDocument     Documents.Add     With Source         For J = .Paragraphs.Count To 1 Step -1             .Paragraphs(J).Range.Copy             Selection.Paste         Next J     End With End Sub

Этот макрос создает новый документ, а затем копирует каждый абзац в обратном порядке из исходного документа в новый документ. Любое форматирование исходного документа также следует скопировать в новый документ.

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

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

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

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

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (4803) относится к Microsoft Word 2007, 2010, 2013 и 2016.