標題: [發問] EXCEL吃Word資料 [打印本頁]

---

作者: jhwish    時間: 2014-3-21 21:17     標題: EXCEL吃Word資料

如題word的指定欄位可以以，複製在excel貼上連結的方式連接資料

excel 會顯示=Word.Document.8|'H:\Book1.doc'!'!OLE_LINK1'

有沒有什麼快速一點的方式整理EXCEL的資料..

我有幾百個檔案要連會瘋掉 =    =" 只要word更新excel也會跟著更新就可以了 ~"~

求高手!!

---

作者: wl02353427    時間: 2014-3-22 09:54

回復 1# jhwish

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

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

複製代碼

---

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