標題: [發問] excel若想超連結資料夾，可以嗎？ [打印本頁]

---

作者: 馨。    時間: 2017-3-27 23:13     標題: excel若想超連結資料夾，可以嗎？

想請教各位高手大大們
若是在excel中，想超連結整個資料夾檔案的話，可以嗎？

---

作者: fengetianxia    時間: 2017-3-28 12:11

=HYPERLINK("文件夾地址","顯示的名稱")

---

作者: rouber590324    時間: 2017-4-7 16:33

1.自動列出資料夾中所有檔案於存儲存格中+自動建立超連結如下
1.1 "C:\AAA\" 自行變更為需求資料夾address

Sub yy()
Dim s$, mpath$, mypath$, myname$, i%
s = "*.xls"
mpath = "C:\AAA\"
mypath = mpath & s
myname = Dir(mypath, vbNormal)
i = 1
Do While myname <> ""
Cells(i, 1) = myname
ActiveSheet.Hyperlinks.Add Anchor:=Cells(i, 1), Address:= _
mpath & myname, TextToDisplay:=Cells(i, 1).Text
  i = i + 1
myname = Dir
Loop
End Sub

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)