Note: The other languages of the website are Google-translated. Back to English

如何從Excel中的超鏈接中提取實際地址?

假設您有一個包含超鏈接的單元格區域,現在您需要查看超鏈接的實際目的地,並從超鏈接中提取它們,如下面的屏幕截圖所示。 有沒有簡單的方法可以快速解決此問題? 本文將指導您從多個超鏈接中提取實際地址。


箭頭藍色右氣泡 使用“編輯超鏈接”功能從超鏈接中提取實際地址

在這裡, 編輯超鏈接 函數可以幫助您提取每個超鏈接的基礎URL並將該實際地址放入另一個單元格中。 您可以這樣做:

1。 選擇帶有超鏈接的單元格,然後單擊鼠標右鍵,從上下文菜單中選擇 編輯超鏈接,請參見屏幕截圖:

2。 和 編輯超鏈接 對話框將會出現,選擇並複制(按Ctrl + C)來自 地址 對話框的字段。

3。 然後關閉對話框,然後將實際地址粘貼到所需的任何單元格中。

備註:使用此方法,每次只能提取一個超鏈接地址,但是如果需要提取多個超鏈接,則需要重複應用此功能。


箭頭藍色右氣泡 使用VBA代碼從超鏈接中提取實際地址

對於許多超鏈接,上面的方法將很繁瑣且耗時,因此下面的VBA代碼可以幫助您一次從超鏈接中快速提取多個地址。

1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 點擊 插入 > 模塊,然後將以下代碼粘貼到“模塊窗口”中。

Sub Extracthyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Rng.Hyperlinks.Count > 0 Then
        Rng.Value = Rng.Hyperlinks.Item(1).Address
    End If
Next
End Sub

3。 然後按 F5 鍵運行代碼,並彈出一個對話框供您選擇要提取真實地址的超鏈接,請參見屏幕截圖:

4。 然後點擊 OK,並且所選單元格內容已轉換為原始範圍內的實際超鏈接地址。 查看屏幕截圖:


箭頭藍色右氣泡 使用用戶定義功能從超鏈接中提取實際地址

以下用戶定義函數也可以從超鏈接中提取實際的URXNUMX。

1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2。 點擊 插入 > 模塊,然後將以下代碼粘貼到 模塊窗口.

Function GetURL(pWorkRng As Range) As String
'Updateby Extendoffice
    GetURL = pWorkRng.Hyperlinks(1).Address
End Function

3。 保存代碼並關閉窗口,選擇一個空白單元格以鍵入此公式 = GetURL(A2) (A2 是超鏈接所在的單元格),然後按 Enter 按鈕。 您可以看到實際的超鏈接地址已提取。


箭頭藍色右氣泡 使用Kutools for Excel快速輕鬆地從超鏈接中提取實際地址

這是一個方便的工具,稱為 Excel的Kutools,其 轉換超鏈接 功能,您可以快速處理以下操作:

  • 從超鏈接中提取實際地址;
  • 將網址文字轉換為可點擊的超鏈接.
Excel的Kutools : 帶有300多個便捷的Excel加載項,可以在30天內免費試用.

如果你已經安裝 Excel的Kutools,請執行以下操作:

1。 選擇包含需要提取的超鏈接的範圍。

2。 點擊 庫工具 > Link > 轉換超鏈接,請參見屏幕截圖:

3。 在 轉換超鏈接 對話框中選擇 超鏈接地址替換單元格內容 選項,然後單擊 文檔按鈕1 來自的按鈕 結果範圍 指定要放入結果的單元格。

4。 然後點擊 OK,實際地址已從超鏈接中提取。 看截圖:

備註:如果您想將實際地址放到原始範圍內,請檢查 轉換來源範圍.

點擊 轉換超鏈接 進一步了解此功能。

立即下載和免費試用Excel的Kutools!


箭頭藍色右氣泡 演示:使用Kutools for Excel從超鏈接中提取實際地址

Excel的Kutools:具有300多個方便的Excel加載項,可以在30天內免費試用,沒有任何限制。 立即下載並免費試用!

相關文章:

如何在Excel中將URL文本轉換為可單擊的超鏈接?


最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題,並將你的生產力提高了 80%

  • 重用: 快速插入 複雜的公式,圖表 以及您以前使用過的任何東西; 加密單元 帶密碼 創建郵件列表 並發送電子郵件...
  • 超級公式欄 (輕鬆編輯多行文本和公式); 閱讀版式 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不會丟失數據; 拆分單元格內容; 合併重複的行/列...防止細胞重複; 比較範圍...
  • 選擇重複或唯一 行; 選擇空白行 (所有單元格都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇...
  • 確切的副本 多個單元格,無需更改公式參考; 自動創建參考 到多張紙; 插入項目符號,複選框等...
  • 提取文字,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級濾鏡 (將過濾方案保存並應用於其他工作表); 高級排序 按月/週/日,頻率及更多; 特殊過濾器 用粗體,斜體...
  • 結合工作簿和工作表; 根據關鍵列合併表; 將數據分割成多個工作表; 批量轉換xls,xlsx和PDF...
  • 超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。 在您的企業或組織中輕鬆部署。 完整功能 30 天免費試用。 60 天退款保證。
kte選項卡201905

Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
officetab底部
按評論排序
留言 (44)
還沒有評分。 成為第一位評論!
網站主持人對此評論進行了最小化
非常感謝。 它真的幫助了我
網站主持人對此評論進行了最小化
非常感謝!!! :D
網站主持人對此評論進行了最小化
這只是救了我! 謝謝
網站主持人對此評論進行了最小化
謝謝你讓我的工作如此輕鬆
網站主持人對此評論進行了最小化
非常感謝你!
網站主持人對此評論進行了最小化
非常感謝你,這救了我的屁股,讓我看起來很好。 8)
網站主持人對此評論進行了最小化
你是最棒的,很容易追隨!
網站主持人對此評論進行了最小化
謝謝哥們。它真的在幾秒鐘內工作。
網站主持人對此評論進行了最小化
非常感謝。 它真的幫助了我
網站主持人對此評論進行了最小化
非常感謝! 非常有用但簡單明了。 正如阿爾伯特的意思 :roll:
網站主持人對此評論進行了最小化
極好的! 太簡單。 謝謝!
網站主持人對此評論進行了最小化
萬分感謝。 和這裡的其他人一樣。 這是非常有幫助和簡單的。
網站主持人對此評論進行了最小化
非常感謝 :lol: 我使用了 VBA 方法,它在 Windows 365 操作系統上的 Excel 8.1 中就像一個魅力
網站主持人對此評論進行了最小化
這是第一個對我有用的基於宏的 Excel 技巧。 非常感謝您讓 excel 傻瓜的生活變得更好。
網站主持人對此評論進行了最小化
謝謝你幫我節省了 15 分鐘
網站主持人對此評論進行了最小化
高超! 把我的工作減少到不到一分鐘。
網站主持人對此評論進行了最小化
這為我節省了大量時間! 我從 500 多個與他們的個人資料相關聯的姓名中提取了 500 個個人資料 ID。 這段代碼運行得非常好,很容易理解。 非常感謝!
網站主持人對此評論進行了最小化
出於某種原因,這對我不起作用。 正如您所描述的那樣,我創建了定義的函數,但它沒有做任何事情:\我還想將它與超鏈接函數合併,如下所示: =HYPERLINK(=getURL(A1), [A1]) 以便最終結果將復制 A1 的 URL 並將其顯示為 A1 的文本字符串(即,只需將 A1 複製到另一個單元格,包括其文本和超鏈接。Excel 似乎由於某種原因無法做到的簡單事情......)。
網站主持人對此評論進行了最小化
非常感謝! 節省了我必須做 800 多個這些細胞的大量時間!
網站主持人對此評論進行了最小化
非常好的工具! 我轉換了 16K+ 鏈接。 工具工作快速且完美無瑕。
這裡還沒有評論
載入更多
留下你的意見
以訪客身份發帖
×
評價此帖子:
0   字符
推薦地點

關注我們

版權所有©2009 - 萬維網。extendoffice.com。 | 版權所有。 供電 ExtendOffice。 |
Microsoft和Office徽標是Microsoft Corporation在美國和/或其他國家的商標或註冊商標。
受Sectigo SSL保護