偶爾會用到要取出一大堆網址中的超連結,不知該如何處理會較有效率?後來找到的方法還不錯,利用 Excel 來操作,可以很快完成。
1. 將一堆超連結複製到 Excel 的工作表中。
2. 選取[開發人員]中的「Visual Basic」選項。
3. 選取[工作表1(工作表1)]。
4. 輸入以下的程式:
Sub hyperlink()
For I = 1 To 186
Cells(I, 2) = Cells(I, 1).Hyperlinks(1).Address
Next
End Sub
5. 選取[開發人員/插入]選項中的「按鈕」,在工作中建立一個按鈕。
6. 指定巨集名稱為 hyperlink 程式。
7. 在工作表上按一下這個按鈕,即會在第2欄產生對應第1欄的超連結。
如果出現陣列索引超出範圍,是表示程式中設定要執行300列的轉換,而工作表中的超連結沒有那麼多的原因。
以程式來執行,應該是比較快的,不了解程也沒關係。只要把程式留下來,就可以重覆使用。
文章標籤
全站熱搜

感激不盡,幫助太大了
太好用了,只是Hyperlinks(1)中,1代表甚麼? 還有其他2,3,4,....嗎?
若是第一行欄位中有部分儲存格沒有超連結,在VBA中如何跳過這些欄位(給NA或留空)而將其他有超連結網址儲存格在一次執行VBA就全抓完,呈現於第二行?
請問Excel儲存格中如果有2萬筆的超連結 有什麼方法可以判讀超連結是否正常開啟或是連結錯誤