Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

В этом выпуске опубликованы следующие советы:


Word Expert - профессиональная работа с текстом

Выпуск рассылки №116 от 2008-09-19 13:06

В этом выпуске:

  1. Советы и подсказки
  2. Полезные ссылки
  3. Информация об авторских правах

Советы и подсказки

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

Нумерованный список: как скрыть подпункты

Нина спрашивает:
В редакторе Word есть панель инструментов "Форматирование", которая позволяет создать нумерованный список с подпунктами. Мне сказали, что возможности редактора позволяют при необходимости скрывать подпункты, как бы сворачивая их (подобное действие есть в Excel - "группировать - разгруппировать"). Так ли это?

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

Интересно, может кто-то знает иной способ? Напишите в комментариях.
Оставить комментарий | Задать вопрос

Абзац с цветным фоном

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

Конкретный цвет фона можно поменять в строке:
.ParagraphFormat.Shading.BackgroundPatternColor = wdColorLightYellow
и/или цвет шрифта в строке:
.Font.ColorIndex = wdBlue
Код макроса:
Sub highliteColorParagraph()
'выделенный цветом абзац
'добавляем желтый фон и шрифт синего цвета для абзаца,
'в котором находится курсор ввода
With Selection
   .StartOf wdParagraph, wdMove
   .EndOf wdParagraph, wdExtend
   .ParagraphFormat.Shading.BackgroundPatternColor = wdColorLightYellow
   .Font.ColorIndex = wdBlue
   .Collapse wdCollapseStart
End With
End Sub
Оставить комментарий | Задать вопрос

Копирование таблиц из одного документа в новый

Михаил задал вопрос:
После использования сервиса "Слияние" в MS Word, я получил документ с большим количеством однотипных таблиц (с индивидуальным заполнением). Можно ли теперь сохранить этот документ в виде отдельных файлов с уникальными названиями, каждый из которых будет содержать отельную таблицу?

Это можно сделать с помощью следующего макроса (ниже). Но предварительно создайте в корне диска папку Test, так как именно в нее будут сохранены новые документы с таблицами:
Sub SplitTables()
'Разбиение документа с таблицами на отдельные файлы,
'содержащие по одной таблице из документа
Dim iDoc As Long        'нумерация документов
Dim dDc1 As Document    ' активный документ
Dim dDc2 As Document    ' новый документ
Dim rTmp As Range       
Set dDc1 = ActiveDocument
For iDoc = 1 To dDc1.Tables.Count
   Set rTmp = ActiveDocument.Tables(iDoc).Range
   rTmp.Copy
   Set dDc2 = Documents.Add(Visible:=False)
   dDc2.Activate
   Selection.Paste
   dDc2.SaveAs "C:\Test\" & Format(iDoc, "000") & ".doc"
   dDc2.Close
Next
Set dDc1 = Nothing
Set dDc2 = Nothing
End Sub
Оставить комментарий | Задать вопрос

Полезные ссылки

Информация об авторских правах

Вся информация, представленная на сайте WordExpert.ru и в этой рассылке, никаким образом не связана с корпорацией Microsoft. В рассылке упоминаются компании и продукты, которые могут быть зарегистрированными торговыми марками и принадлежать различным физическим и юридическим лицам как на территории РФ, так и за ее пределами.

Авторские права на все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке (включая текст, фотографии, подборку, расположение и т.п.) принадлежат Кокину Антону Вадимовичу, если не указано иное. Вы можете свободно использовать и распространять эти материалы с обязательной ссылкой вида "Информация с сайта WordExpert.ru" и с обязательным указанием автора материала.

Все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке, представлены на информационной основе. Вы можете использовать любую информацию с сайта WordExpert.ru или из данной рассылки исключительно на свой страх и риск. Тем не менее, я рекомендую перед применением какой-либо информации с сайта WordExpert.ru или из данной рассылки обязательно сохранять и создавать резервные копии ваших документов.

В этой рассылке также упоминаются различные web-страницы с соответствующими ссылками. Эти ссылки указываются исключительно в информационных целях и никакой рекомендации или одобрения с моей стороны данных веб-страниц не подразумевается, если не указано иное.


В избранное