返回列表 上一主題 發帖

在工作表中加入超連結, vba如何寫法

pcwh3

帖子
51 
主題
14 
精華
0 
積分
143 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-5-11 
最後登錄
2023-5-8 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-2-14 14:30 | 只看該作者

在工作表中加入超連結, vba如何寫法

worksheet, 超連結
我相將一workbook中的每一worksheet名稱列示於"worksheet list"工作表中,並要在每一worksheet名中加入超連結,以達至可以按一下該workshet名便可以到達該worksheet中,請問vba如何寫法?
List Worksheet.zip (7.21 KB)
收藏 分享

wang

帖子
12 
主題
0 
精華
0 
積分
108 
點名
0  
作業系統
winxp 
軟體版本
office2003 
閱讀權限
20 
註冊時間
2010-5-23 
最後登錄
2020-11-16 
2#
發表於 2012-2-14 20:43 | 只看該作者
For I = 2 To Sheets.Count
     ActiveSheet.Hyperlinks.Add Anchor:=Range("a" & I), Address:="", SubAddress:= _
        Worksheets(I).Name & "!A1", TextToDisplay:=Sheets(I).Name
Next

TOP

pcwh3

帖子
51 
主題
14 
精華
0 
積分
143 
點名
0  
作業系統
xp 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-5-11 
最後登錄
2023-5-8 
3#
發表於 2012-2-14 22:30 | 只看該作者
回復 2# wang
多謝指導。

TOP

cake1234

帖子
6 
主題
1 
精華
0 
積分
55 
點名
0  
作業系統
Win10 
軟體版本
Office 2016 
閱讀權限
20 
性別
男 
註冊時間
2016-4-23 
最後登錄
2020-4-19 
4#
發表於 2016-12-2 16:32 | 只看該作者
正需要，謝謝指導教學

TOP

        靜思自在 : 能付出愛心就是福，能消除煩惱就是慧。
返回列表 上一主題