Microsoft Word копировать текст от заголовка к заголовку

@aLanti40 · Регистрация: 03.09.2020

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

Ребят плиз помогите ( у меня есть большой документ Word с рецептами ) мне нужно с помощью макроса выделить текст ( со Стиль 1 до стиль1 ). - короче от заголовка к заголовку
Как это сделать ? есть код может какой то

@Dinoxromniy · 03.09.2020, 19:28

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

мне нужно с помощью макроса

aLanti40, почему именно с помощью макроса?

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

короче от заголовка к заголовку

1. ctrl+H, там в графе Найти "больше"→"Стиль"→ выбираете стиль вашего заголовка, в графе заменить - символ #
2. Там же в найти убираете форматирование, меняете сочетание ^p на символ $
3. Выделяете весь текст, вставка → Таблица → преобразовать в текст, разделитель - символ # , после указания символа внесите число столбцов = 1
4. меняете символ $ на сочетание ^p

Получаете таблицу, в каждой ячейке которой текст который вы хотели выделить. Дальше - кнопка "выделить ячейку", или например скопировать текст в Эксель, или любой другое решение.

@Ваю · 04.09.2020, 21:22

aLanti40, вы бы лучше объяснили что вы хотите получить и для чего это

Dinoxromniy, начерта такие сложности?

Если заголовки являются заголовками, а не тестом, выровненным по центру, то:

Вариант 1: при наведении мыши на заголовок слева от него появляется треугольная стрелка - нажимаешь на неё и весь текст под заголовком до следующего заголовка сворачивается, далее просто дважды щёлкаешь за полем текста слева при перевёрнутом указателе мыши и жмёшь цтрл+ц или цтрл+икс, всё. После вставки текста жмёшь по стрелке ещё раз для разворачивания текста.

Вариант 2: цтрл+ф и тягаешь мышкой заголовки вверх-вниз в том порядке как надо пересортировать. Там же в контексте можно менять уровень заголовков, правда иногда всё же придётся лазить в свойства абзацев поскольку это сделано как всегда криво ибо мелкософт иначе не может.

@Dinoxromniy · 04.09.2020, 22:41

Сообщение от Ваю

После вставки текста жмёшь по стрелке ещё раз для разворачивания текста.

Копируется текст вместе с заголовком, тс нужен текст между заголовками.

Сообщение от Ваю

в том порядке как надо пересортировать.

Что следует делать, если задачи пересортировки не стоит?

Сообщение от Ваю

начерта такие сложности?

Если у ТС книга рецептов с например 200 заголовками, то по предложенным вами способам нужно сделать 200 действий. При преобразовании в таблицу это будет 4 действия, и если таких заголовков будет 5000 - это все равно 4 действия.

Сообщение от Ваю

Там же в контексте можно менять уровень заголовков

Напротив, как раз там менять не следует.

Сообщение от Ваю

правда иногда всё же придётся лазить в свойства абзацев поскольку это сделано как всегда криво ибо мелкософт иначе не может.

Половину места на главной вкладке Word отведено под стили. Под стили Word и заточен. Разумеется, если пренебрегать стилями, придется много куда лазить, однако это ваш выбор.

@aLanti40 0 / 0 / 0 Регистрация: 03.09.2020 Сообщений: 1
		1
	Microsoft Word копировать текст от заголовка к заголовку 03.09.2020, 15:53. Показов 992. Ответов 3 Метки microsoft, word (Все метки) Ребят плиз помогите ( у меня есть большой документ Word с рецептами ) мне нужно с помощью макроса выделить текст ( со Стиль 1 до стиль1 ). - короче от заголовка к заголовку Как это сделать ? есть код может какой то 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,337
	03.09.2020, 19:28	2
	Сообщение от aLanti40 мне нужно с помощью макроса aLanti40, почему именно с помощью макроса? Сообщение от aLanti40 короче от заголовка к заголовку 1. ctrl+H, там в графе Найти "больше"→"Стиль"→ выбираете стиль вашего заголовка, в графе заменить - символ # 2. Там же в найти убираете форматирование, меняете сочетание ^p на символ $ 3. Выделяете весь текст, вставка → Таблица → преобразовать в текст, разделитель - символ # , после указания символа внесите число столбцов = 1 4. меняете символ $ на сочетание ^p Получаете таблицу, в каждой ячейке которой текст который вы хотели выделить. Дальше - кнопка "выделить ячейку", или например скопировать текст в Эксель, или любой другое решение. 0

@Ваю 27 / 27 / 9 Регистрация: 21.04.2015 Сообщений: 697
	04.09.2020, 21:22	3
	aLanti40, вы бы лучше объяснили что вы хотите получить и для чего это Dinoxromniy, начерта такие сложности? Если заголовки являются заголовками, а не тестом, выровненным по центру, то: Вариант 1: при наведении мыши на заголовок слева от него появляется треугольная стрелка - нажимаешь на неё и весь текст под заголовком до следующего заголовка сворачивается, далее просто дважды щёлкаешь за полем текста слева при перевёрнутом указателе мыши и жмёшь цтрл+ц или цтрл+икс, всё. После вставки текста жмёшь по стрелке ещё раз для разворачивания текста. Вариант 2: цтрл+ф и тягаешь мышкой заголовки вверх-вниз в том порядке как надо пересортировать. Там же в контексте можно менять уровень заголовков, правда иногда всё же придётся лазить в свойства абзацев поскольку это сделано как всегда криво ибо мелкософт иначе не может. 0

@Dinoxromniy Динохромный 1375 / 749 / 271 Регистрация: 22.12.2015 Сообщений: 2,337
	04.09.2020, 22:41	4
	Сообщение от Ваю После вставки текста жмёшь по стрелке ещё раз для разворачивания текста. Копируется текст вместе с заголовком, тс нужен текст между заголовками. Сообщение от Ваю в том порядке как надо пересортировать. Что следует делать, если задачи пересортировки не стоит? Сообщение от Ваю начерта такие сложности? Если у ТС книга рецептов с например 200 заголовками, то по предложенным вами способам нужно сделать 200 действий. При преобразовании в таблицу это будет 4 действия, и если таких заголовков будет 5000 - это все равно 4 действия. Сообщение от Ваю Там же в контексте можно менять уровень заголовков Напротив, как раз там менять не следует. Сообщение от Ваю правда иногда всё же придётся лазить в свойства абзацев поскольку это сделано как всегда криво ибо мелкософт иначе не может. Половину места на главной вкладке Word отведено под стили. Под стили Word и заточен. Разумеется, если пренебрегать стилями, придется много куда лазить, однако это ваш выбор. 0

Опции темы