Друзья! Позволю себе дать личное объявление в этой рассылке. Если кто-то из вас увлекается походами, охотой, рыбалкой или другими активными видами деятельности, то я могу предложить вам новый спутниковый навигатор GPSMAP 60CSx на гарантии. Незаменимая вещь, но для меня сейчас не необходимая. Пишите мне или звоните: 8-919-962-4716.
Советы и подсказки
Если у вас есть идея или совет по эффективному использованию редактора Word, то пишите мне через форму контактов на сайте. Любые ваши дельные советы и подсказки будут размещены в очередных выпусках рассылки и на сайте (с указанием вашего авторства).
Макрос вставки колонтитулов на нечетные страницы
Алена задала вопрос: Как вставить колонтитулы на нечетных страницах документа?
Есть две возможности вставить колонтитул на нечетные страницы: в первый раздел документа (если он, например, единственный), или во все разделы документа. Вот примеры макросов, позволяющие реализовать эти два способа.
Sub insertHFoddPages()
'Вставка нижнего колонтитула на нечетные страницы
'в первом разделе документа
Dim str As String
str = "Текст нижнего колонтитула на нечетной странице"
ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = True
ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range.text = str
End Sub
Если нужно вставить текст во все нижние колонтитулы во всех разделах документа, то используйте второй макрос:
Sub insertHFoddPages2()
'Вставка нижнего колонтитула
'на нечетных страницах во всех разделах документа
Dim str As String
Dim Sec As Section
str = "Текст нижнего колонтитула на нечетной странице"
ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = True
For Each Sec In ActiveDocument.Sections
Sec.Footers(wdHeaderFooterPrimary).Range.Text = str
Next Sec
End Sub
Ольга задала вопрос: У меня пропала функция автоматического написания заглавной буквы в начале предложения, то есть пишет всё строчными. Как исправить?
Если вы пользуетесь редактором Word 2003, то в меню Сервис выберите команду Параметры автозамены и на вкладке Автозамена установите флажок на параметре "Делать первые буквы предложений прописными". Все восстановиться.
В редакторе Word 2007 откройте диалоговое окно Параметры Word и перейдите на вкладку Правописание. Нажмите кнопку Параметры автозамены и на вкладке Автозамена аналогично установите флажок на параметре "Делать первые буквы предложений прописными".
Елена работает с документами, в которых титульный лист (первый по счету) не должен учитываться в общем количестве листов в документе. Количество страниц необходимо вывести в колонтитул. Елена написала автоматический макрос, который создает поле следующего вида: {={NUMPAGES}-1},
но затрудняется вставить его в колонтитул. Она спрашивает: как можно вставить в колонтитул такое поле с помощью макроса?
Это можно сделать с помощью следующего макроса.
Обратите внимание: этот макрос очищает колонтитул от любого текста, который там содержится. Будьте внимательны!
Sub ins_HF_nested_fields()
'Вставка вложенного поля (общее кол-во страниц минус 1) в нижний колонтитул
'формула поля: { ={ numpages } - 1 }
Dim myRange As Range
Dim hfRange As Range
Set myRange = ActiveDocument.Range(0, 0)
ActiveDocument.ActiveWindow.View.ShowFieldCodes = True
Set hfRange = ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range
With hfRange
.Delete
.Text = "Всего листов: "
.MoveEnd wdCharacter, 1
.Collapse wdCollapseEnd
.Select
.Fields.Add Range:=hfRange, Type:=wdFieldExpression, PreserveFormatting:=False
End With
With Selection
.MoveRight wdCharacter, 3
.Fields.Add Range:=Selection.Range, Type:=wdFieldNumPages, PreserveFormatting:=False
.TypeText " -1"
.Fields.Update
End With
With ActiveDocument
.Range(0, 0).Select
.ActiveWindow.View.Type = wdPrintView
.ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit
.ActiveWindow.View.ShowFieldCodes = False
End With
End Sub
Игорь спрашивает: Как сохранить настройки Microsoft Word 2007?
Подобный вопрос мне однажды уже задавали и я ответил на него в рассылке от 26 августа 2007 года. Приведу на всякий случай этот вопрос, поскольку у меня появилась новая информация на эту тему.
Меня спрашивали: В Office 2003 была такая классная вещь в тулзах (ПУСК -> ПРОГРАМЫ -> Microsoft Office -> Средства Microsoft Office -> Мастер сохранения настроек Office 2003): сохранение и восстановление настроек Office. То есть сохраняла эта вещь всё: макросы, автотекст, автозамену и т.д., что настроил сам. В Office 2007 этого не увидел..... может, не по глазам, или есть какая-нибудь утилитка?
Действительно, в Office 2003 была возможность сохранить все свои настройки с помощью команды "Мастер сохранения настроек Office 2003". В Office 2007 ее нет (исключили), возложив эту роль на операционную систему. Но!
В поисках новой информации по этому вопросу я обнаружил в сети ссылку на одну программу, разработанную компанией Computer Network Consultants, LLC (сертифицированный партнер Microsoft) и позволяющая заменить функции "убранной" команды. Вот ссылка (на английском языке). Нужно быть подключенным к сети, чтобы установилась (а, впоследствии, и работала) программа Office 2007 Settings Backup Wizard.
После установки в меню Пуск=>Программы появится группа с ярлыками для нее (рисунок).
Впрочем, программа сразу же запускается после ее установки на компьютер и пользователь видит такое окно (рисунок).
Если нужно сохранить свои настройки (шаблоны, макросы, списки автозамены, словарь и др.), достаточно выбрать папку, в которую будут сохраняться настройки, и нажать кнопку Backup. Для восстановления настроек следует нажать кнопку Restore.
Как сообщают разработчики, это бета-версия, поэтому никаких гарантий относительно ее работоспособности они не дают. Но, на мой взгляд, все работает нормально.
Программа работает в ОС Windows XP, Vista. Для работоспособности требуется дополнительно установить (если не установлен) .NET Framework 2.0 или выше.
Программа сохраняет и восстанавливает настройки для следующих продуктов пакета Microsoft Office:
Вся информация, представленная на сайте WordExpert.ru и в этой рассылке, никаким образом не связана с корпорацией Microsoft. В рассылке упоминаются компании и продукты, которые могут быть зарегистрированными торговыми марками и принадлежать различным физическим и юридическим лицам как на территории РФ, так и за ее пределами.
Авторские права на все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке (включая текст, фотографии, подборку, расположение и т.п.) принадлежат Кокину Антону Вадимовичу, если не указано иное. Вы можете свободно использовать и распространять эти материалы с обязательной ссылкой вида "Информация с сайта WordExpert.ru" и с обязательным указанием автора материала.
Все материалы, опубликованные на сайте WordExpert.ru и в этой рассылке, представлены на информационной основе. Вы можете использовать любую информацию с сайта WordExpert.ru или из данной рассылки исключительно на свой страх и риск. Тем не менее, я рекомендую перед применением какой-либо информации с сайта WordExpert.ru или из данной рассылки обязательно сохранять и создавать резервные копии ваших документов.
В этой рассылке также упоминаются различные web-страницы с соответствующими ссылками. Эти ссылки указываются исключительно в информационных целях и никакой рекомендации или одобрения с моей стороны данных веб-страниц не подразумевается, если не указано иное.