Excel超链接不起作用

Question

我现在已经打了两个小时这个简单易懂的问题了，我只是想弄清楚。我试图建立一个链接，无论多少＆＃34;标记我尝试它总是错误或链接说& Poracun(Z).Ime &任何人都可以找到我一种方法，我可以更改链接名称？ 这是我的代码：

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

Answer 1

两个问题：

1. 您的"分隔不太正确
2. 公式在文件名周围需要'，而不是图纸。与'[FileName]SheetName'!
一样

尝试

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

Answer 2

我已经弄明白了，这是引用问题，我忘记了所有这一切，现在我已经在引号字符串中读了它你需要在双字引号中用作最终字符串中的单引号。这是一个工作链接：

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

全部用引号（＆＃34;）标记:)