Добавление гиперссылке с Excel VBA

Я пытаюсь добавить гиперссылку в ячейку первенствовать, как это, но получаю сообщение об ошибке:Добавление гиперссылке с Excel VBA

rng.Formula = "=HYPERLINK(cell.Offset(0, 3).Value,"">"")"

В основном гиперссылка находится в другой ячейке, и я хочу, чтобы текст ">" появится в новой ячейке гиперссылки.

источник

2015-06-18 Joanna Mikalai

что отношения между ** ГСЧ ** и ** ячейка ** ?? –

none ... rng - это диапазон в новом листе. cell - диапазон в старом листе –

Попробуйте использовать коллекцию Гиперссылки:

Sheet1.Hyperlinks.Add Sheet1.Range("A1"), "http://longLinkAddressHere", , , ">"

источник

2015-06-19 00:14:07

ok это действительно работает безупречно! простите, Гэри, чтобы перейти на этот ответ! –

Вы отсутствуют некоторые двойные кавычки:

Sub dural() 
    Dim rng As Range, cell As Range 
    Set rng = Range("A1") 
    Set cell = Range("A2") 

    rng.Formula = "=HYPERLINK(""" & cell.Offset(0, 3).Value & ""","">"" )" 

End Sub

Например:

enter image description here

источник

2015-06-18 23:33:02

Моя последняя формула - это, но я получаю сообщение об ошибке, когда я запускаю его rng2.Offset (0, 1) .Formula = "= HYPERLINK (" "" & cell.Offset (0, 3) .Value & "" "," ">" ")" –

вы уверены, что этот синтаксис работает, если ячейки не определены так просто? –

@JoannaMikalai Попробуйте ** MsgBox ** строку, прежде чем использовать ее в формуле. –

Добавление гиперссылке с Excel VBA

ответ

Смежные вопросы