2011-01-27 51 views
2

如何將超鏈接添加到特定單元格並將其轉換爲Excel文件中的工作表?指向實際工作簿中現有工作表的超鏈接

這是我已經有了:

Cells(zeile, 1).Select 
Worksheets(1).Hyperlinks.Add Anchor:=Selection, Address:=Workbooks(1).Worksheets(fortnr), SubAddress:=Cells(1, 1).Address 

感謝

回答

3
ActiveSheet.Hyperlinks.Add ActiveCell, "", Sheets(fortnr).Name & "!A1" 

的地址應爲空和子地址應該是在工作表Sheet1形式A1!這會在activecell中放置一個鏈接,前提是您有一個名爲fortnr的變量,該變量在同一工作簿中包含有效的工作表名稱。

如果您想要指向不同工作簿中的單元格,則所有內容都是相同的,但地址需要爲該文件。

ActiveSheet.Hyperlinks.Add ActiveCell, Workbooks(1).FullName, Sheets(fortnr).Name & "!A1" 

假設工作簿(1)是一個不同的文件和先前保存的,並具有與所述正確的名稱的片材,等,等

+0

確定可行,但如果我打開一個不同的excel文件,它會嘗試將超鏈接鏈接到該文件。 是否可以始終將其鏈接到活動工作簿? excel文件的名稱會自行改變,因此文件名中沒有引用。 在此先感謝 – borlee 2011-01-28 08:10:26

0

理念1:超鏈接添加到當前有效小區

假設表名稱鏈接到是 「VBA1」

ActiveSheet.Hyperlinks.Add Activecell, 「」, 「VBA1!A1」

理念2:超鏈接添加到一個被命名爲 「CallButton」

ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes( 「CallButton」), 「形」,「VBA1 A1! 「

相關問題