Извлечение адреса Гиперссылки

RSS

paganafora

Пользователь

Сообщений: 65 Регистрация: 12.01.2014

01.10.2025 09:34:44

Добрый день, подскажите пожалуйста.

Есть колонка (в некоторые ячейки которой) вставлены гиперссылки.

Вопросы:

Можно ли без макросов (стандартными методами) извлечь адреса этих ссылок, Например в соседние ячейки?

Если нет, то как правильно написать функцию для этой цели?

Прикрепленные файлы

Hyperlink_primer_0.xlsx (10.68 КБ)

Изменено: paganafora - 01.10.2025 11:52:03 (добавка файла примера)

Msi2102 Пользователь Сообщений: 4256 Регистрация: 31.03.2014	#2 01.10.2025 10:04:45 paganafora, Добрый день! Приложите файл с примером

paganafora

Пользователь

Сообщений: 65 Регистрация: 12.01.2014

01.10.2025 11:55:04

Цитата
написал: Приложите файл с примером

Добрый день, не знаю как правильно создать пример, ибо это просто ряд ячеек с ссылками, но так-как понял,
добавил в тело описания темы.

могу описать задачу текстом:
нужна Функция с одним параметром - адрес ячейки просмотра.
если в указанной ячейке есть гиперссылка, то поместить этот адрес (гиперссылки) в ячейку,
если ссылки нет, то "" (оставить пустой).

извините если путано объяснил.

Изменено: paganafora - 01.10.2025 12:10:14 (пояснение)

Msi2102 Пользователь Сообщений: 4256 Регистрация: 31.03.2014	#4 01.10.2025 12:01:39 Может ТУТ

Sanja

Модератор

Сообщений: 20107 Регистрация: 10.01.2013

01.10.2025 12:04:05

UDF

Код
Function ПОЛУЧИТЬ_АДРЕС(iCl As Range) ПОЛУЧИТЬ_АДРЕС = iCl.Hyperlinks(1).ScreenTip End Function

Прикрепленные файлы

Hyperlink_primer_0.xlsm (16.32 КБ)

Изменено: Sanja - 01.10.2025 12:14:01

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

paganafora Пользователь Сообщений: 65 Регистрация: 12.01.2014	#6 01.10.2025 13:18:10 Спасибо, поменял скрин-тип на адрес, всё отображается. Но только в файле примера, при попытке вставить эту функцию в другую книгу, всё ломается(( но видимо это я чего-то не догоняю попробую сам разобраться, если не получится, обращусь за пояснением. Ещё раз Спасибо за помощь!

Читают тему