2015-12-15 91 views
0

我一直搗這個簡單的問題現在2個小時,我只是不知道。我試圖做一個鏈接,無論有多少「我嘗試它的標記總是出錯或鏈接說& Poracun(Z).Ime &任何人都可以找到一種方法,我可以更改鏈接名稱嗎? 這是我的代碼:Excel超鏈接不起作用

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

回答

1

兩個問題:

  1. "界定是不完全正確
  2. 公式預計,周圍的文件名,而不是表''[FileName]SheetName'!
0123。

嘗試

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

謝謝你,但你的解決方案完全地破壞鏈接,我認爲它的里根問題。 –

0

我已經想通了,這是報價問題,我全忘了,現在我已閱讀起來就可以了引號字符串內,你需要做雙引號用在最終單串。這裏是一個工作環節:

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

這是所有在引號(「)標記:)