Список проголосовавших за комментарий "Дмитрий Можаев, спасибо.<br/> Нечто подобное я проверял. В таком виде выдается #ЗНАЧ!<br/> Если переделать так:<br/> <br/> Function ConditionalHyperlink(link As Range, display_text As Range) As Variant<br/> If link.Value <> "" Then<br/> ConditionalHyperlink = Hyperlink(link, display_text)<br/> Else<br/> ConditionalHyperlink = display_text.Value<br/> End If<br/> End Function<br/> <br/> — то начинает работать, но выдает ошибку, что не знает, что такое Hyperlink. Такое свойство есть у Shape, а у Range нету.<br/> <br/> А если так (где ААА – сама ячейка с формулой):<br/> <br/> Function ConditionalHyperlink(link As Range, display_text As Range, AAA As Range) As Variant<br/> If link.Value <> "" Then<br/> Hyperlinks.Add Anchor:=AAA, Address:=link.Value, TextToDisplay:=display_text.Value<br/> Else<br/> ConditionalHyperlink = display_text.Value<br/> End If<br/> End Function<br/> <br/> — то снова ошибка значения в случае с гиперссылкой (с текстом работает)."