Использовать Shift чтобы копировать влево

@oobarbazanoo · Регистрация: 13.05.2015

Author24 — интернет-сервис помощи студентам

Пускай имеем выделенный текст. Зажмём Shift и клавишу вправо, тогда выделение текста продолжится вправо, Shift+клавиша влево выделение текста снимется с правого конца выделенного. Как производить подобные манипуляции с левым концом выделенного текста?

@Dinoxromniy · 22.01.2017, 11:23

Сообщение от oobarbazanoo

Зажмём Shift и клавишу вправо, тогда выделение текста продолжится вправо, Shift+клавиша влево выделение текста снимется с правого конца выделенного.

В этом случае курсор будет справа от выделения, и попытка его перенести влево от выделения сбросит выделение текста.
Наверное самый простой вариант - использовать VBA код:

Кликните здесь для просмотра всего текста

Код

Sub sel_to_the_left()
Dim i As Double, j As Double

    
    j = Selection.End
    Selection.Collapse (wdCollapseStart)
    Selection.MoveLeft Unit:=wdWord, Count:=1
    i = Selection.Start
     ActiveDocument.Range(i, j).Select
    
End Sub

Назначьте коду горячие клавиши, которые для вас удобны, либо кнопку.

@ViterAlex · 22.01.2017, 12:45

oobarbazanoo, такое поведение будет если выделить текст двойным кликом или по F8 и если текст пишется слева направо.
Если же выделить справа налево, то Shift+влево будет расширять выделение.

@Dinoxromniy · 22.01.2017, 13:24

Соответственно, тогда не будет выделять вправо, ибо курсор будет слева от выделения. Как я понимаю, ТС нужна возможность выделять и вправо, и влево.

@oobarbazanoo · 22.01.2017, 15:17 **[ТС]**

Dinoxromniy, а как назначить код клавише в ворде?

@Dinoxromniy · 22.01.2017, 15:50

Сообщение от oobarbazanoo

как назначить код клавише в ворде?

Откройте параметры→вкладка "настройки ленты"→ под колонкой команд будет надпись "сочетания клавиш" и рядом кнопка "настройка". Нажав кнопку попадаем в диалог "настройка клавиатуры", там в окошке "категории" отмотайте список до самого низа, до позиции "Макросы". Дальше - укажите имя кода и удобное сочетание клавиш.

@oobarbazanoo · 22.01.2017, 18:16 **[ТС]**

Dinoxromniy, где тут параметры?

@Dinoxromniy · 22.01.2017, 18:21

В самой первой вкладке.

@oobarbazanoo · 22.01.2017, 18:29 **[ТС]**

Dinoxromniy, куда нужно записать вставленный Вами код? Между прочим его не получается ввести ни в одно поле из скриншота.

@Dinoxromniy · 22.01.2017, 19:01

Сообщение от oobarbazanoo

куда нужно записать вставленный Вами код

Либо в шаблон (Normal.dotx), тогда программа будет доступна в любом файле либо в ваш экземпляр документа (тогда программа будет доступна только в одном вашем документе).

В любом случае, для этого: откройте word, нажмите сочетание alt+F11, чтобы открыть vba-редактор. В окне проекта (слева вверху) найдите ваш файл (отображаться он будет в виде project(имя_файла)), найдите относящуюся к нему иконку Ворд с надписью Thisdocument, щелкните по ней двойным щелчком, после чего скопируйте код в окно посередине.

Вот тогда в правом окне вашего скрина будет доступно имя макроса (в выпадающем меню "сохранить изменения в" нужно выбрать ваш файл)

Более подробно и с картинками можно почитать на msdn.microsoft.com
Еще вот это: vba редактор word

@oobarbazanoo · 23.01.2017, 10:05 **[ТС]**

Сообщение от Dinoxromniy

откройте word, нажмите сочетание alt+F11

Ничего не происходит. Может есть другой способ открыть vba-редактор?

@Dinoxromniy · 23.01.2017, 10:14

Сообщение от oobarbazanoo

другой способ открыть vba-редактор

Есть - через вкладку "разработчик", но у вас судя по скрину ее отображение отключено. Щелкните правой клавишей по любой вкладке, в контекстном меню выберите "Настройка ленты", откроется диалог (в котором устанавливаются горячие клавиши) в перечне справа найдите "Разработчик" и установите галочку. Левая крайняя кнопка вкладки "Разработчик"(Visual basic) должна открыть редактор VBA.
Практическое руководство. Отображение вкладки разработчика на ленте

@oobarbazanoo · 23.01.2017, 17:06 **[ТС]**

Dinoxromniy, что то никак не выходит. Всё равно в окне макросов ничего не меняется.

@oobarbazanoo · 23.01.2017, 17:09 **[ТС]**

Dinoxromniy, в горячее сочетание клавиш пока что не выходит добавить, но я смог через вкладку Макросы в Разработчике посмотреть действие вашего кода и он делает немного не то, что мне необходимо. Я бы хотел выделять один символ слева, а он выделяет целое слово.

@Dinoxromniy · 23.01.2017, 17:49

Сообщение от oobarbazanoo

Я бы хотел выделять один символ слева, а он выделяет целое слово.

Это проблемой не является, вот три программы (первый код выделяет символ, второй - слово, третий - всю строку влево)

Кликните здесь для просмотра всего текста

Код

Sub sel_to_the_left_chr()
    Dim i As Double, j As Double
    
    
    j = Selection.End
    Selection.Collapse (wdCollapseStart)
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    i = Selection.Start
    ActiveDocument.Range(i, j).Select
    
End Sub
Sub sel_to_the_left_word()
    Dim i As Double, j As Double
    
    
    j = Selection.End
    Selection.Collapse (wdCollapseStart)
    Selection.MoveLeft Unit:=wdWord, Count:=1
    i = Selection.Start
    ActiveDocument.Range(i, j).Select
    
End Sub
Sub sel_to_the_left_Line()
    Dim i As Double, j As Double
    
    
    j = Selection.End
    Selection.Collapse (wdCollapseStart)
    Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
    i = Selection.Start
    ActiveDocument.Range(i, j).Select
    
End Sub

Файл в приложении, кстати запускать макросы можно по alt+F8.

@Dinoxromniy · 23.01.2017, 17:58

Сообщение от oobarbazanoo

Всё равно в окне макросов ничего не меняется.

oobarbazanoo, а запуск макросов у вас разрешен?

@oobarbazanoo · 23.01.2017, 22:13 **[ТС]**

Dinoxromniy, спасибо большое за помощь.

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
		1
	Использовать Shift чтобы копировать влево 22.01.2017, 02:33. Показов 1498. Ответов 16 Метки нет (Все метки) Пускай имеем выделенный текст. Зажмём Shift и клавишу вправо, тогда выделение текста продолжится вправо, Shift+клавиша влево выделение текста снимется с правого конца выделенного. Как производить подобные манипуляции с левым концом выделенного текста? 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	22.01.2017, 11:23	2
	Сообщение от oobarbazanoo Зажмём Shift и клавишу вправо, тогда выделение текста продолжится вправо, Shift+клавиша влево выделение текста снимется с правого конца выделенного. В этом случае курсор будет справа от выделения, и попытка его перенести влево от выделения сбросит выделение текста. Наверное самый простой вариант - использовать VBA код: Кликните здесь для просмотра всего текста Код Sub sel_to_the_left() Dim i As Double, j As Double j = Selection.End Selection.Collapse (wdCollapseStart) Selection.MoveLeft Unit:=wdWord, Count:=1 i = Selection.Start ActiveDocument.Range(i, j).Select End Sub Назначьте коду горячие клавиши, которые для вас удобны, либо кнопку. 1

@ViterAlex 8940 / 4852 / 1886 Регистрация: 11.02.2013 Сообщений: 10,246
	22.01.2017, 12:45	3
	oobarbazanoo, такое поведение будет если выделить текст двойным кликом или по F8 и если текст пишется слева направо. Если же выделить справа налево, то Shift+влево будет расширять выделение. 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	22.01.2017, 13:24	4
	Соответственно, тогда не будет выделять вправо, ибо курсор будет слева от выделения. Как я понимаю, ТС нужна возможность выделять и вправо, и влево. 1

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	22.01.2017, 15:17 [ТС]	5
	Dinoxromniy, а как назначить код клавише в ворде? 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	22.01.2017, 15:50	6
	Сообщение от oobarbazanoo как назначить код клавише в ворде? Откройте параметры→вкладка "настройки ленты"→ под колонкой команд будет надпись "сочетания клавиш" и рядом кнопка "настройка". Нажав кнопку попадаем в диалог "настройка клавиатуры", там в окошке "категории" отмотайте список до самого низа, до позиции "Макросы". Дальше - укажите имя кода и удобное сочетание клавиш. 1

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	22.01.2017, 18:16 [ТС]	7
	Dinoxromniy, где тут параметры? Миниатюры 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	22.01.2017, 18:21	8
	В самой первой вкладке. 1

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	22.01.2017, 18:29 [ТС]	9
	Dinoxromniy, куда нужно записать вставленный Вами код? Между прочим его не получается ввести ни в одно поле из скриншота. Миниатюры 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	22.01.2017, 19:01	10
	Сообщение от oobarbazanoo куда нужно записать вставленный Вами код Либо в шаблон (Normal.dotx), тогда программа будет доступна в любом файле либо в ваш экземпляр документа (тогда программа будет доступна только в одном вашем документе). В любом случае, для этого: откройте word, нажмите сочетание alt+F11, чтобы открыть vba-редактор. В окне проекта (слева вверху) найдите ваш файл (отображаться он будет в виде project(имя_файла)), найдите относящуюся к нему иконку Ворд с надписью Thisdocument, щелкните по ней двойным щелчком, после чего скопируйте код в окно посередине. Вот тогда в правом окне вашего скрина будет доступно имя макроса (в выпадающем меню "сохранить изменения в" нужно выбрать ваш файл) Более подробно и с картинками можно почитать на msdn.microsoft.com Еще вот это: vba редактор word 1

	23.01.2017, 22:13

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	23.01.2017, 10:05 [ТС]	11
	Сообщение от Dinoxromniy откройте word, нажмите сочетание alt+F11 Ничего не происходит. Может есть другой способ открыть vba-редактор? 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	23.01.2017, 10:14	12
	Сообщение от oobarbazanoo другой способ открыть vba-редактор Есть - через вкладку "разработчик", но у вас судя по скрину ее отображение отключено. Щелкните правой клавишей по любой вкладке, в контекстном меню выберите "Настройка ленты", откроется диалог (в котором устанавливаются горячие клавиши) в перечне справа найдите "Разработчик" и установите галочку. Левая крайняя кнопка вкладки "Разработчик"(Visual basic) должна открыть редактор VBA. Практическое руководство. Отображение вкладки разработчика на ленте 1

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	23.01.2017, 17:06 [ТС]	13
	Dinoxromniy, что то никак не выходит. Всё равно в окне макросов ничего не меняется. Миниатюры 0

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	23.01.2017, 17:09 [ТС]	14
	Dinoxromniy, в горячее сочетание клавиш пока что не выходит добавить, но я смог через вкладку Макросы в Разработчике посмотреть действие вашего кода и он делает немного не то, что мне необходимо. Я бы хотел выделять один символ слева, а он выделяет целое слово. 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,341
	23.01.2017, 17:58	16
	Сообщение было отмечено oobarbazanoo как решение Решение Сообщение от oobarbazanoo Всё равно в окне макросов ничего не меняется. oobarbazanoo, а запуск макросов у вас разрешен? 1

@oobarbazanoo 7 / 30 / 9 Регистрация: 13.05.2015 Сообщений: 1,835
	23.01.2017, 22:13 [ТС]	17
	Dinoxromniy, спасибо большое за помощь. 0

Использовать Shift чтобы копировать влево

Решение