Excel Hyperlink не работи

Боря се с този уж прост проблем вече 2 часа и просто не мога да го разбера. Опитвам се да направя връзка и без значение колко " знака опитах, винаги завършва с грешка или връзката казва & Poracun(Z).Ime & Може ли някой да ми намери начин, по който мога да променя името на връзката? Ето моя код:

Cells(i, "B").Formula = "=HYPERLINK(""[" & ActiveWorkbook.Path & "\" & "DN_Pokalkulacija.xlsx" & "]" & "'" & "Sheet1" & "'" & "!E" & Poracun(Z).Vrstica & ""","" & Poracun(Z).Ime & "")"

person Uroš Grum    schedule 15.12.2015    source източник


Отговори (2)


Два въпроса:

  1. Вашето " разделяне не е съвсем правилно
  2. Формулата очаква ' около името на файла, а не на листа. като '[FileName]SheetName'!

Опитвам

Cells(5, "B").Formula = "=HYPERLINK('[" & ActiveWorkbook.Path & "\" & "DN_Pokalkulacija.xlsx" & "]" & "Sheet1" & "'" & "!E" & Poracun(Z).Vrstica & ",""" & Poracun(Z).Ime & """)"
person chris neilsen    schedule 15.12.2015
comment
благодаря ви, но вашето решение напълно прекъсва връзката, мисля, че това е проблемът с reagon. - person Uroš Grum; 15.12.2015

Разбрах го, това беше проблем с кавички, забравих всичко за него и сега прочетох за него в низ от кавички, трябва да направите двойни кавички, които да използвате като единични в крайния низ. Ето един работещ линк:

g = "=HYPERLINK(""[" & ActiveWorkbook.Path & "\" & "DN_Pokalkulacija.xlsx" & "]" & "'" & "Sheet1" & "'" & "!E" & Poracun(Z).Vrstica & """,""" & Poracun(Z).Ime & """)"

Всичко беше в кавички (") :)

person Uroš Grum    schedule 15.12.2015