|
Компьютерный форум OSzone.net » Компьютеры + Интернет » Хочу все знать » [решено] Вставка символа щелчком мыши |
|
|
[решено] Вставка символа щелчком мыши
|
Ветеран Сообщения: 4527 |
Предположим, мне надо в тексте Word взять по тексту в кавычки по отдельности три десятка слов.
Я нахожу слово, ставлю в нужной место курсор (щелчок левой кнопкой), снимаю руку с мышки, жму на клавиатуре Shift и клавишу ", затем снова хватаюсь за мышку. И так 60 раз. Нет ли какой-то программы, в которой можно было бы назначить действие: вставка кавычки по щелчку левой кнопкой? Чтобы, допустим, висела эта программа в трее, активизировалась при необходимости вручную, после чего бы мне оставалось только клацнуть мышкой 60 раз без использования клавиатуры? |
|
------- Отправлено: 00:12, 16-11-2016 |
Ветеран Сообщения: 5380
|
Профиль | Отправить PM | Цитировать |
------- Отправлено: 00:15, 16-11-2016 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 4527
|
Профиль | Сайт | Отправить PM | Цитировать Спасибо, любопытно, но вроде же платная...
|
------- Отправлено: 00:24, 16-11-2016 | #3 |
Ветеран Сообщения: 5380
|
Профиль | Отправить PM | Цитировать |
------- Отправлено: 00:43, 16-11-2016 | #4 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать truvo, назначьте такой макрос:
Скрытый текст
Option Explicit Sub Sample() Dim strLetters As String Dim i As Integer Dim objPrevSelection As Range strLetters = "" For i = Asc("a") To Asc("z") strLetters = strLetters & Chr(i) Next i For i = Asc("A") To Asc("Z") strLetters = strLetters & Chr(i) Next i For i = Asc("а") To Asc("я") strLetters = strLetters & Chr(i) Next i For i = Asc("А") To Asc("Я") strLetters = strLetters & Chr(i) Next i strLetters = strLetters & "ё" strLetters = strLetters & "Ё" With Selection Set objPrevSelection = .Range .MoveStartWhile Cset:=strLetters, Count:=wdBackward .InsertBefore Text:="«" .MoveEndWhile Cset:=strLetters, Count:=wdForward .InsertAfter Text:="»" .SetRange objPrevSelection.Start, objPrevSelection.End Set objPrevSelection = Nothing End With End Sub на какую-либо горячую клавишу. Прокручиваете документ до нужного места, щёлкаете мышкой на потребном слове, нажимаете горячую клавишу. |
|
Отправлено: 01:44, 16-11-2016 | #5 |
Ветеран Сообщения: 20133
|
Профиль | Отправить PM | Цитировать Цитата truvo:
В любом текстовом редакторе есть в Найти,функция Найти всё и заменить искомое на нужное. Например в Liibre Office выглядит так- ![]() |
|
------- Последний раз редактировалось yurfed, 16-11-2016 в 09:25. Отправлено: 08:41, 16-11-2016 | #6 |
Ветеран Сообщения: 2270
|
Профиль | Отправить PM | Цитировать Цитата yurfed:
|
|
Отправлено: 09:41, 16-11-2016 | #7 |
Ветеран Сообщения: 1011
|
Профиль | Отправить PM | Цитировать Тут макрос - самое простое решение. Вывести кнопку в меню ворда, вот и будет "без использования клавиатуры".
|
Отправлено: 09:55, 16-11-2016 | #8 |
![]() Ветеран Сообщения: 2798
|
Профиль | Отправить PM | Цитировать Цитата topotun32:
|
|
Отправлено: 10:12, 16-11-2016 | #9 |
![]() Новый участник Сообщения: 27
|
Профиль | Отправить PM | Цитировать В общем написал я решение тут. Может пригодится потомкам.
https://forum.simplix.ks.ua/viewtopi...d=23231#p23231 На английской раскладке будет лепить @, на русской " |
Отправлено: 21:15, 16-11-2016 | #10 |
|
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
CMD/BAT - [решено] Замена после символа, вставка перед символом | AlexVong | Скриптовые языки администрирования Windows | 4 | 05-08-2012 13:31 | |
2010 - Excel не открывает файлы двойным щелчком мыши | wiznv | Microsoft Office (Word, Excel, Outlook и т.д.) | 4 | 29-09-2011 11:22 | |
Интерфейс - Открывать двойным щелчком через реестр! | bor0v | Microsoft Windows 2000/XP | 1 | 14-09-2011 18:22 | |
Службы - Нельзя запустить никакое приложение двойным щелчком мышки. | Re.i | Microsoft Windows 2000/XP | 3 | 22-09-2008 20:44 | |
Разное - запустить от имени одним щелчком | pva | Microsoft Windows 2000/XP | 1 | 08-08-2008 10:29 |
|