使用dynamic超链接中的variables值
我有一个汇总表,我用它作为索引,通过超链接访问多个工作表。 我正在对它进行扩展,以便它们直接链接到每个表格中的相应行。
我对VBA很陌生,对语法不太确定。 我基本上试图使用variablesj
的值作为单元格引用中的行号。 "'!A"
是我在下面的代码中的单元格的第一部分。 然后我试图连接string以将j
添加为行号。 这可以使用下面的代码来完成吗? 我试图用括号括起来,撇号无济于事。
For j = 2 To LastUsedRow link = "=Hyperlink(""#'" & (ThisWorkbook.Worksheets(i).Name) & "'!A" & j",""" & (ThisWorkbook.Worksheets(i).Name) & """)"
非常感谢
Debug.Print
是你的朋友。 这是你现在的代码(假设j = 1
和ThisWorkbook.Worksheets(i).Name = "Sheet1"
):
=Hyperlink("#'Sheet1'!A1,"Sheet1")
公式应该是这样的:
=HYPERLINK("#'Sheet2'!A1","Sheet2")
所以…添加只是添加缺less的"
:
link = "=HYPERLINK(""#'" & (ThisWorkbook.Worksheets(i).Name) & _ "'!A" & j & """,""" & (ThisWorkbook.Worksheets(i).Name) & """)"
包含VBAstring中的双引号是棘手的。
link = "=Hyperlink(""#'" & (ThisWorkbook.Worksheets(i).Name) & "'!A" & j & """,""" & (ThisWorkbook.Worksheets(i).Name) & """)"
将link
as =Hyperlink("#'SheetName'!A2","SheetName")
你需要调用你想要从j拉什么,如:j.Value