Вырезание гиперссылки из html кода.

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Вырезание гиперссылки из html кода. (Формулы/Formulas)

Hermes

Дата: Среда, 13.05.2015, 14:08 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Всем привет и с прошедшими праздниками!

Ребят, есть кусок кода вида

Цитата

<div><a href='http://www.pwer.com/photos/3205817/austin'><img src='http://st.pwer.com/simgs/aed15e5d0140ed70_8-5431/rustic-bedroom.jpg' border=0 width='500' height='332' /></a></div><div style='color:#444;'><small><a style='text-decoration:none;color:#444;' href='http://www.pwer.com/photos/rustic/bedroom'>Rustic Bedroom</a> by <a style='text-decoration:none;color:#444;' href='http://www.houzz.com/professionals/home-builders/c/Waco--TX'>Waco</a> <a style='text-decoration:none;color:#444;' href='http://www.pwer.com/pro/livebarn/heritage'>Heritage.com</a></small></div>

из него требуется оставить только это

Цитата

http://st.pwer.com/simgs/aed15e5d0140ed70_8-5431/rustic.jpg

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

Цитата

src='

включая сам маркер и после

Цитата

' border

, начиная с этого маркера.
В теории все просто. Я думаю, даже в VBA это сделать не сложно, анализируя группы символов последовательно.
Но вот можно ли это сделать без использования VBA (с которым я не особо дружу, т.к. давно не работал).
Если какие нибудь есть идеи, было бы здорово! yes

Сообщение отредактировал Hermes - Среда, 13.05.2015, 14:10

Ответить

_Boroda_

Дата: Среда, 13.05.2015, 14:23 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16895

Репутация: 6613 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Так нужно?

Код

=ПСТР(A1;ПОИСК("src='";A1)+5;ПОИСК("' border";A1)-ПОИСК("src='";A1)-5)

К сообщению приложен файл: 3_755.xlsx (8.6 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Hermes

Дата: Среда, 13.05.2015, 14:40 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 8

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Цитата _Boroda_, 13.05.2015 в 14:23, в сообщении № 2

Так нужно?

Hallelujah!! Странно, почему я не справился с такой задачей.
Сейчас покурю формулу и проведу работу над ошибками.
PS спасибо, сумма конечно небольшая, но все же...

Сообщение отредактировал Hermes - Среда, 13.05.2015, 14:44

Ответить

Вырезание гиперссылки из html кода. (Формулы/Formulas)

Страница 1 из 1
1