Как Поставить Ударение В Редакторе Word 2007
Эта заметка посвящается пользователям редактора Word 2007, которым необходимо использовать знаки ударений в словах.
К сожалению, обычный способ вставки ударения для буквы в слове в редакторе Word 2007 не работает, в отличии от прошлых версий этого текстового редактора. Но можно воспользоваться следующим макросом, который прекрасно справится с этой задачей в новой версии редактора. Этот макрос позволяет как устанавливать знак ударения над выделенной буквой, так и удалять знак.
В редакторе Word существует несколько типов символов ударения. В описываемом макросе я использую знак с кодом 769 из таблицы символов Unicode.
Код макроса:
Sub setAndDeleteAccent()
' Установка и удаление знаков ударения
' @A.Kokin WordExpert.ru - профессиональная работа с текстом
Dim rAcc As Range
Dim rTmp As Range
Set rTmp = Selection.Range
If Selection.Type = wdSelectionIP Then
MsgBox prompt:="Не выделена буква"
ElseIf Len(rTmp.Characters(1)) = 1 Then
rTmp.Collapse direction:=wdCollapseEnd
rTmp.InsertSymbol CharacterNumber:=769, Unicode:=True
Selection.Collapse direction:=wdCollapseEnd
Else
For Each rAcc In rTmp.Characters
If AscW(Right(rAcc, 1)) = 769 Then
rAcc = Left(rAcc, 1)
End If
Next rAcc
End If
End Sub
Чтобы вставить ударение над буквой, выделите эту букву и запустите макрос. Чтобы удалить знак ударения, снова выделите букву, находящуюся под ударением. Если в тексте ничего не выделено, то будет показано сообщение в диалоговом окне.
Чтобы иметь быстрый доступ к этому макросу, назначьте для него сочетание клавиш или создайте кнопку на панели инструментов (или в панели быстрого доступа для Word 2007).
Статьи по теме:
Автоматизация ДелопроизводстваПоколения ЭВМУправление СКСMPR II Популярно Про Ddos-АтакиПрокси-Сервер - Это Действенный Способ Защиты Информации, А Также Преграда Для Атак ХакеровШифрование. PGP-ключДрукувальні пристрої, графобудівники Методическая сущность деловой игрыЗарождение кибернетикиДругие отличил NetWare 4.xGoogle о вредоносных программах ИнтернетаРобот Саламандра Помогает Разгадывать Загадки ЭволюцииАвтоматизации планирования печатного издания под Apple (Mac)Отремонтируйте разрешения для вялого компьютераМонтаж фильма Возможные проблемы при загрузке WindowsРазработка и распространение компьютерных вирусовПросмотр графики в Программе просмотра изображений и факсов ТипизацияРазработка контрольно-информационных инструментов для PADSIBM передаёт фреймворк ACTF в дар Eclipse Протокол управления передачей (TCP) и протокол пользовательских дейтаграмм (UDP)Электромагнитные поляПорядок формирования таблицы по своему вариантуНекоторые характеристики ПЛАТЕЖНОЙ СИСТЕМЫВерсии языка Java. Средства разработкиПолитика ограничений Microsoft Internet ExplorerКибернетика – наука ХХ векаКлассификация прикладных систем и классификация кабельных системРисование прямой линии Отправка и получение файловОбмен данными : Excel - другие приложенияMs Word Vs NotepadАлее Софтвер Приглашает На Docflow 2008!Устройства выводаРесурсная и социокультурная концепции информационной среды как пространства социальных коммуникацийВсе О Шрифтах - Использование Type1 И TruetypeХакеры, как субъекты компьютерных преступленийМатематические основы функционирования квантовых компьютеровLinux: Gentoo Vs Ubuntu ФункциональностьГлобальный уровеньОперационные системы которые могут управлять CompactPCI- компьютерамиИспользование компьютеровКак структура Internet сказывается на Пользователе?Подделка компьютерной информацииСоздание, использование и распространение вредоносных программ для ЭВМ (ст. 273 УК)Какое сжатие файлов лучшее?Базовая система классов JavaХищение компьютерной информацииЗагрузка нескольких различных ОСРазработка Программного Обеспечения, Разработка ПрограммАвтоматическая очистка Рабочего стола Жесткие дискиПоиск людей (Кто есть Who)