1

Тема: VBA: Изъять из текста ссылки и изменить их

Имеется текст в Ворде - по сути это исходный код сайта. В этом тексте есть ссылки, все они имеют вид http://название сайта/название раздела/название статьи
Нужно сделать списки на отдельном листе из названия статьи и раздела (которые берутся из ссылок), сайт во всех случаях один.

Например в тексте: http://все-для-родителей.рф/беременность/токсикоз
Надо сделать: токсикоз-беременность

Кто может, помогите, вручную делать очень долго, файл большой...

2

Re: VBA: Изъять из текста ссылки и изменить их

Ссылки на отдельном листе - это можно попробовать сделать через так называмое "Оглавление". А чтобы вставить спец.символы элемента оглавления в свой текст, надо поиграться созданием макроса, т.е. сохранить в макрос ручные действия поискаа начала и конца своих ссылок и, например, вручную (присвоить "горячую клавишу") этот макрос запускать столько раз, сколько ссылок есть в тексте. Сначала попробуйте вручную создать оглавнение и посмотрите - устраивает ли Вас такое.

WBR. Roman

3

Re: VBA: Изъять из текста ссылки и изменить их

Какой ворд? В 2010 кажется появилась возможность пользоваться регулярными выражениями.

Нас невозможно сбить с пути, нам пофигу куда идти.

4

Re: VBA: Изъять из текста ссылки и изменить их

Во, попробовал.
В ворде 2003 открываете диалог "Найти и заменить". Тыкаете кнопку "Больше", устанавливаете галку "Подстановочные знаки"
Найти: http://<*>/(<*>)/(<*>)
Заменить: \2-\1

Думаю если немного подумать головой, возможно будет вырезать остальной текст и оставить только ссылки.
А вообще давайте файл сюда.

Нас невозможно сбить с пути, нам пофигу куда идти.

5 (изменено: Rumata, 2012-11-09 10:38:14)

Re: VBA: Изъять из текста ссылки и изменить их

minibelka пишет:

Имеется текст в Ворде - по сути это исходный код сайта

сохраните в нормальный текстовый файл в формате HTML. И работайте с ним из командной строки, создав предварительно небольшой скрипт.

( 2 * b ) || ! ( 2 * b )