Excel UDF приводит к гиперссылке в виде текста

350
Frank B.

Все UDF для отображения гиперссылок (которые я видел) работают только там, где гиперссылка - это URL, но они не работают там, где гиперссылка - это другая ячейка в той же книге. Может кто-нибудь помочь мне найти UDF, который приводит к гиперссылке в виде текста, где гиперссылка является другой ячейкой в ​​той же книге? Благодарю.

Вот снимок экрана с гиперссылкой, которая была создана с помощью> Вставка> Гиперссылка ... и ссылка на ячейку, которая отображается в всплывающем окне, когда я наводю курсор мыши на ячейку гиперссылки ...

Это ссылка на ячейку, которую я хочу, чтобы UDF возвращал как текст в любой другой ячейке.

Screenshot

-1
Не могли бы вы показать пример UDF, который не работает? Mark Fitzgerald 6 лет назад 0
UDF обычно не могут использоваться для изменения рабочей книги или рабочего листа. Обычно они принимают какой-либо параметр (ы) и обрабатывают его, чтобы вернуть результат, как встроенные функции, такие как `= SUM (range1, range2 ....)`. Процедура (`Sub`) предназначена для изменения вещей на листах или в рабочих книгах. Итак, когда вы спрашиваете о UDF, вы имеете в виду `Function` или` Sub`? Mark Fitzgerald 6 лет назад 0

1 ответ на вопрос

0
Akina

Используйте код ниже:

' Add hyperlink to a cess on Sheet2 Sheets("Sheet2").Hyperlinks.Add _ ' Hyperlink must follow to a single cell A1 on Sheet1 ' To follow another object (multicell range, chart, etc.) specify it Anchor:=Sheets("Sheet1").Range("A1"), _ ' Address must be empty - it is local hyperlink Address:="", _ ' Specify destination address where hyperlink will be placed SubAddress:= "Sheet2!A1", _ ' Specify the text of a hyperlink TextToDisplay:="HyperLink to A1 on Sheet2"