Если у вас есть идея или совет по эффективному использованию редактора Word, то пишите мне через форму контактов на сайте. Любые ваши дельные советы и подсказки будут размещены в очередных выпусках рассылки и на сайте (с указанием вашего авторства).
Как назначить свою иконку для макроса в Word 2007
Несколько месяцев назад я получил письмо от пользователя, в котором меня спрашивали о возможности назначить для кнопки макроса (выведенного на панель быстрого доступа в редакторе Word 2007) своей иконки.
Как известно, в прежних версиях редактора можно было назначить для любой команды на панели инструментов свою собственную картинку. Можно было отредактировать иконку на кнопке или нарисовать собственную с помощью окна Редактор кнопок (рисунок).
В редакторе Word 2007 этой возможности нет.
Однако, на прошлой неделе я просматривал сайт Грэга Макси (Greg Maxey) и обнаружил у него статью, в которой он предлагает свое решения этой проблемы.
Мне показалось интересной его статья и я повторил эксперимент. Все удалось, но многое пришлось додумывать самостоятельно. В этой заметке я расскажу своими словами суть решения и покажу, как можно назначить свою иконку для собственных макросов.
Поиск заголовков и вставка разрывов страниц перед ними
Алексей спрашивает: Столкнулся со след. проблемой. Имеется документ на 25 000 стр. Этот документ получился в результате выгрузки из БД.
Как в этом документе сделать так чтобы определенные заголовки начинались с новой страницы, а не по окончании пред. текста. То есть, этот загловок начинается с середины, а мне нужно, чтобы с новой страницы.
Для начала вы должны определить, каким стилем у вас оформлены заголовки в тексте. Обычно это Заголовок 1, Заголовок 2 или другой стиль.
После того, как вы определили стиль заголовка, можете применить следующий макрос. Он ищет по тексту заголовки, оформленные стилем "Заголовок 1", а затем вставляет разрыв страницы перед найденным заголовком, оформленным этим стилем. Обратите внимание, что макрос ищет определенные заголовки, оформленные конкретным стилем - в примере это стиль "Заголовок 1". Если у вас эти заголовки оформлены другим стилем, или вообще не оформлены каким-либо стилем, то ничего изменено не будет.
Код макроса:
Sub headBreak()
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.Text = ""
.style="ActiveDocument.Styles(""Заголовок 1")
.Execute
End With
Selection.Collapse wdCollapseStart
Selection.InsertBreak Type:=wdSectionBreakNextPage
End Sub
Подскажите, как настроить word, чтобы при открытии любого документа текст был с переносами и чтобы не приходилось каждый раз выбирать сервис - язык - расстановка переносов?
Галина, полагаю, что у вас по каким-то причинам простая настройка (то есть установка принудительного переноса) действует только на конкретный документ и не может быть настроена по умолчанию для всех документов. Но можно обойти это, если воспользоваться следующим макросом:
Sub AutoOpen()
'Расстановка переносов
If ActiveDocument.AutoHyphenation = False Then ActiveDocument.AutoHyphenation = True
End Sub
Для того, чтобы этот макрос работал для всех открываемых вами документов, необходимо поместить его в шаблон Normal.dot (если вы используете редактор Word 2003).
Откройте этот шаблон в режиме редактирования, затем откройте редактор Visual Basic и вставьте этот код в модуль NewMacros.
Игорь задал вопрос: Есть документ microsoft word. в нем данные такого вида:
83 82.133.71.151:8080
48 82.133.71.152:8080
41 82.133.71.154:8080
Как написать макрос или как-то иначе заменить данные на следующий вид:
82.133.71.151:8080
82.133.71.152:8080
82.133.71.154:8080
То есть удалить все данные до пробела вместе с пробелом?
Игорь, вы можете воспользоваться диалоговым окном "Найти и заменить" («Ctrl+H»).
В поле "Найти" вставьте вот такое выражение: [0-9]{2}^32. Поле "Заменить" оставьте пустым. Отметьте флажком параметр "Подстановочные знаки". Нажмите кнопку "Заменить все".
Вся информация, представленная на сайте WordExpert.ru и в этой рассылке, никаким образом не связана с корпорацией Microsoft. В рассылке упоминаются компании и продукты, которые могут быть зарегистрированными торговыми марками и принадлежать различным физическим и юридическим лицам как на территории РФ, так и за ее пределами.
Авторские права на все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке (включая текст, фотографии, подборку, расположение и т.п.) принадлежат Кокину Антону Вадимовичу, если не указано иное. Вы можете свободно использовать и распространять эти материалы с обязательной ссылкой вида "Информация с сайта WordExpert.ru" и с обязательным указанием автора материала.
Все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке, представлены на информационной основе. Вы можете использовать любую информацию с сайта WordExpert.ru или из данной рассылки исключительно на свой страх и риск. Тем не менее, я рекомендую перед применением какой-либо информации с сайта WordExpert.ru или из данной рассылки обязательно сохранять и создавать резервные копии ваших документов.
В этой рассылке также упоминаются различные web-страницы с соответствующими ссылками. Эти ссылки указываются исключительно в информационных целях и никакой рекомендации или одобрения с моей стороны данных веб-страниц не подразумевается, если не указано иное.