国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

`
發(fā)表于2022/11/26 13:58:32 樓主 
頭像 等級:初學者
積分:0
財富值:2.00
身份:普通用戶
Sub 添加超鏈接()
ActiveSheet.Hyperlinks.Add Anchor:=Range("a1"), Address:="#跳轉(zhuǎn)至函數(shù)(A1)"
End Sub

Function 跳轉(zhuǎn)至函數(shù)(a)
    Range("a2") = a
    Set 跳轉(zhuǎn)至函數(shù) = Selection

End Function


在vba模塊中可以使用，在方方格子DIY工具箱中無法使用（貼在sheet1或thisWorkbook中也無法使用），主要是想放在DIY工具箱中用，有手段可以解決么？

我的個性簽名
發(fā)表于 2022/11/28 9:09:50   
頭像 等級:傳說級人物
積分:2734
財富值:4
身份:普通用戶

快速回復(fù)

目前不允許游客發(fā)表，請 登錄 注冊 后再發(fā)貼。