Форум программистов  
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Microsoft Office и VBA > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 12.11.2017, 02:54   #1
vens2962
Новичок
 
Регистрация: 12.11.2017
Сообщений: 2
Репутация: 10
По умолчанию Оформление по выделению

Здравствуйте всем.
Прошу помощи с макросом для ворда.
Функционал следующий: нужно выделенный текстовый фрагмент (слово, несколько слов, отдельный символ) оформить звездочками, в начале и в конце.

Вот так:
Код:

*пример*

При этом нужно учесть пробелы — если они попали в выделение, их надо за оформление вынести — т.е. не так:
Код:

Здрасти, я *ваша *тетя.

А вот так:
Код:

Здрасти, я *ваша* тетя.

Используется ворд 2007, если это важно.
Заранее спасибо.
vens2962 вне форума   Ответить с цитированием
Старый 13.11.2017, 19:44   #2
vens2962
Новичок
 
Регистрация: 12.11.2017
Сообщений: 2
Репутация: 10
По умолчанию

http://wordexpert.ru/page/obramlyaem...tekst-skobkami
Вот тут решена сходная проблема, минимум коррекции и макрос готов.

Код:

Sub InsParens()
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 "*"
   .InsertAfter "*"
End With
End Sub

Вопрос закрыт.
vens2962 вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Оформление!? Ponch_Begginer C++ Builder 12 17.11.2015 22:42
оФОРМЛЕНИЕ Akcentbek Паскаль 4 20.03.2012 15:51
Вопрос по выделению ячейки в stringgrid robin39 Помощь студентам 8 08.07.2010 10:18
Програмка по выделению и замене байтов florion Помощь студентам 1 28.02.2009 01:00
оформление FIIR Помощь студентам 1 16.06.2008 20:40




08:41.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru