☰

從 Excel 中的錨文本擷取 URL

tag-icon • tag-icon microsoft-excel hyperlink links
從 Excel 中的錨文本擷取 URL

我已經瀏覽了該線程，尋找適合我的查詢的內容，但大多數主題都很接近，但並非特定於我的。

我正在嘗試從 Excel 中的錨文本中提取 URL。

有這個公式嗎？當我嘗試時=GETURL，=HYPERLINK它仍然會放入帶有綁定 URL 的錨文字。

有任何想法嗎？宏觀解決方案毫無用處，因此公式會很不錯。否則，就把宏放在我身上。

答案1

如果您有一個包含超連結的儲存格，並且您希望查看 URL 而不是“友善名稱”，請考慮以下使用者定義函數 (UDF)：

Public Function hyp(r As Range) As String
    hyp = ""
    If r.Hyperlinks.Count > 0 Then
        hyp = r.Hyperlinks(1).Address
        Exit Function
    End If
    If r.HasFormula Then
        rf = r.Formula
        dq = Chr(34)
        If InStr(rf, dq) = 0 Then
        Else
            hyp = Split(r.Formula, dq)(1)
        End If
    End If
End Function

此 UDF 可與插入的超連結和 =HYPERLINK() 函數一起使用。

使用者定義函數 (UDF) 非常易於安裝和使用：

  1. ALT-F11 調出 VBE 窗口
  2. ALT-I ALT-M 開啟新模組
  3. 將內容貼進去並關閉 VBE 窗口

如果儲存工作簿，UDF 將隨之儲存。如果您使用的是 2003 年以後的 Excel 版本，則必須將檔案另存為 .xlsm 而不是 .xlsx

若要刪除 UDF：

  1. 如上所示調出 VBE 窗口
  2. 清除程式碼
  3. 關閉VBE視窗

若要使用 Excel 中的 UDF：

=hyp(A1)

要了解有關巨集的更多信息，請參閱：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

和

http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx

有關 UDF 的詳細信息

必須啟用巨集才能使其工作！

相關內容