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

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


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

Выпуск рассылки №133 от 2009-05-25 09:08

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

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

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

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

Команды работы с рисунками в Word 2007

Никита спрашивает:
Мне часто необходимо вставлять в документы чертежи из программ Компас, Автокад, Архикад и т.д. В 2003 ворде с этим не возниккало никаких проблем, так как вставленный объект можно было обрезать до необходимых размеров, убрав не нужное. Появлялась панель такая же как для работы с вставленным рисунком. А вот в 2007 ворде такой панели не нашёл, в справке так же ничего подобного не нашёл. Есть ли какие-нибудь пути решения этой проблемы?

Никита, выделите мышью рисунок (кликните на рисунке), откроется контекстная вкладка Работа с рисунками (рисунок).

Перейдите на вкладку Формат и вы увидите группы команд для изменения рисунка. Последняя группа команд на этой вкладке с одной единственной кнопкой - Размер. Нажмите эту кнопку, чтобы открыть вложенное меню (рисунок).

Теперь выбираете команду Обрезка.
На этой ленте, конечно, все разбросано, но найти аналогичные команды, как в редакторе Word 2003, при желании можно - кликайте на все кнопки и сопоставляйте.
Оставить комментарий | Задать вопрос

Макрос печати копий документа в один клик

Александр интересуется:
Часто необходимо распечатывать две копии одного документа. Приходится использовать меню «Файл-печать». Помогите создать макрос позволяющий выполнять это в один клик. Необходимо учесть возможность появления предупреждения о строках, расположенных вне области печати.

Александр, попробуйте такой макрос:
Sub printDocCopy2()
   ActiveDocument.PrintOut copies:=2
End Sub
Создайте для этого макроса кнопку на панели инструментов и пользуйтесь. В коде можно изменить количество копий, указав нужное вам число.

Что касается предупреждений, то это внутренние ресурсы редактора и при программировании их учитывать не обязательно. К тому же, поля могут отличаться от минимальных для редактора Word и используемого принтера.
Оставить комментарий | Задать вопрос

Вставка скопированного текста в предопределенном формате

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


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

Либо, есть еще решение использовать макрос, который бы брал текст из буфера обмена, вставлял его и уже потом применял к вставленному тексту нужное форматирование. Для макроса нужно создать кнопку на панели инструментов и после того, как скопировали текст, следует установить курсор в нужное вам место документа и нажать эту кнопку.
Вот примерный код макроса. После того, как вы скопировали текст из любого источника, поставьте указатель мыши в то место документа, где вам нужно вставить цитату, и нажмите кнопку макроса.
Sub insertQuotes()
'Вставка текста из буфера обмена в качестве цитаты и задание форматирования
On Error Resume Next    'игнорируем ошибку
Dim MyData As DataObject
Set MyData = New DataObject
MyData.GetFromClipboard
Selection.Text = MyData.GetText(1) 'вставляем текст
'удаляем лишние пробелы в конце выделения и знак абзаца
If Right(Selection.Text, 1) = Chr(32) Or _
   Right(Selection.Text, 1) = Chr(13) Then
   Selection.MoveLeft wdCharacter, 1, wdExtend
End If
'обрамляем выделенный текст кавычками
With Selection
   .InsertBefore Chr(148)
   .InsertAfter Chr(147)
End With
'устанавливаем отступы сверху, снизу и по бокам цитаты
With Selection.ParagraphFormat
   .LeftIndent = CentimetersToPoints(1)
   .RightIndent = CentimetersToPoints(0.5)
   .SpaceBefore = 12
   .SpaceAfter = 12
End With
'форматируем шрифт
With Selection.Font
   .Name = "Times New Roman"
   .Size = 11
   .Italic = True
   .Color = wdColorGray50
End With
End Sub
Оставить комментарий | Задать вопрос

Как разместить текст горизонтально на листе с альбомной ориентацией

Андрей спрашивает:
Подскажите пожалуйста, как в альбомной ориентации страницы разместить текст вертикально (как в книжной)? Word 2007.

Андрей, это можно сделать с помощью простого макроса. Выделяете текст на странице с альбомной ориентацией и применяете следующий макрос:
Sub rotating()
Selection.Orientation = wdTextOrientationVerticalFarEast
End Sub
Если вы не знаете, как подключить к документу и применить эти макросы, изучите следующие заметки с сайта:
Создание макроса из готового кода
Автоматическая запись макроса

Оставить комментарий | Задать вопрос

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

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

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

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

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

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


В избранное