EXCEL吃Word資料 - Excelㄧ般區 - 麻辣家族討論版版

[發問] EXCEL吃Word資料

1^# 跳轉到 »

發表於 2014-3-22 09:54 | 顯示全部帖子

回復 1# jhwish

呃，小弟也是新手，不知版大的意思是不是超連結丟入迴圈的意思，以下是小弟的某一個檔案可以做參考

Sub 超連結()
Dim i As Long
With Worksheets("Sheet1") '你要選的資料表
For i = 2 To 152
On Error Resume Next
.Cells(i, 4).Hyperlinks.Delete
On Error GoTo 0
.Hyperlinks.Add Anchor:=.Cells(i, 4), _
Address:="LIST\Section" & Left(.Cells(i, 4).Text, 1) & "\" & .Cells(i, 4).Text, _
TextToDisplay:=.Cells(i, 4).Text '超連結的資料夾及資料路徑, 但我的是文字檔形式, word....應該可以吧....
Next
End With
End Sub

複製代碼

初新者~指教囉~

靜思自在 : 為人處世要小心細心，但不要「小心眼」。