Как достать из текста ссылок, сами ссылки? - Мир MS Excel

Регистрация

Напомнить пароль

= Мир MS Excel/Как достать из текста ссылок, сами ссылки? - Мир MS Excel

Старая форма входа

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

Как достать из текста ссылок, сами ссылки? (Формулы/Formulas)

Как достать из текста ссылок, сами ссылки?

Дата: Вторник, 13.02.2024, 11:46 | Сообщение № 1

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

Ранг: Новичок

Сообщений: 24

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

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

excel 2021

Как достать из текста ссылок, сами ссылки?
почему-то все ссылки скопировались тайтлами, а нужны сами урлы.

Каталог товаров AIKEN | Кувалда.ру - официальный дилер AIKEN в Москве (kuvalda.ru)
А должно быть
https://www.kuvalda.ru/catalog/brands/aiken/

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

Ответить

Дата: Вторник, 13.02.2024, 12:06 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 9005

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

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

Excel 2010

[vba]

Код

Sub u_7()
    Application.ScreenUpdating = False
    For a = 1 To Cells(Rows.Count, "a").End(xlUp).Row
        ActiveSheet.Hyperlinks.Add Anchor:=Range("b" & a), _
        Address:=Range("a" & a).Hyperlinks.Item(1).Address
    Next
    Application.ScreenUpdating = True
End Sub

[/vba]

К сообщению приложен файл: kniga4.xlsm (25.8 Kb)

ЮMoney 41001841029809

Ответить

Как достать из текста ссылок, сами ссылки? (Формулы/Formulas)

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

© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!