Excel 수식을 사용하여 셀에서 하이퍼 링크의 링크 위치를 추출 할 수 있습니까?

하이퍼 링크 위치와 다른 표시 텍스트를 가진 하이퍼 링크를 포함하는 셀이 많은 스프레드 시트가 있습니다.

즉 :

셀 위치 : A1

표시 텍스트 = "사이트 정보"

하이퍼 링크 위치 = " http://www.mylocation.com "

하이퍼 링크 위치의 텍스트 문자열에 액세스 할 수있는 Excel 공식이 있습니까?

이상적으로는 다음과 같습니다.

FORMULA (A1) = " http://www.mylocation.com "

매크로를 사용할 수 있습니다 :

• 새 통합 문서를 엽니 다.
• VBA 시작 (Alt + F11 누름)
• 새 모듈 삽입 (삽입> 모듈)
• 아래 Excel 사용자 정의 함수 복사하여 붙여 넣기
• VBA에서 나가기 (Alt + Q 누름)

• 이 사용자 정의 Excel 함수에 다음 구문을 사용하십시오. = GetURL (cell, [default_value])

   Function GetURL(cell As range, Optional default_value As Variant)
   'Lists the Hyperlink Address for a Given Cell
   'If cell does not contain a hyperlink, return default_value
        If (cell.range("A1").Hyperlinks.Count <> 1) Then
            GetURL = default_value
        Else
            GetURL = cell.range("A1").Hyperlinks(1).Address
        End If
  End Function
  

단일 셀의 값에서 주소를 추출하기 만하면이 작은 함수가 유용하다는 것을 알았습니다.

"강제력"매크로 대신, 사용자가 지정한 하이퍼 링크의 URL을 추출하여 반환하는 사용자 정의 함수를 만들 수도 있습니다.

Function GetURL(rng As Range) As String
     On Error Resume Next
     GetURL = rng.Hyperlinks(1).Address 
End Function

이 경우 원하는 곳에 배치 할 수 있습니다. 예를 들어 A1의 하이퍼 링크 URL이 C25 셀에 나열되도록하려면 C25 셀에 다음 공식을 입력하십시오.

= GetURL (A1)

http://excel.tips.net/T003281_Extracting_URLs_from_Hyperlinks.html

function EXTRACT_URL(input) {

  var range = SpreadsheetApp.getActiveSheet().getRange(input);
  var re = /^.+?\(\"(.+?)\",.+?$/;
  if (input.indexOf(':') != -1) {
    var formulas = range.getFormulas();
    for (var i in formulas) {
      for (var j in formulas[i]) {
        formulas[i][j] = formulas[i][j].replace(re, "$1");
      }
    }
    return formulas;
  } else {
    return range.getFormula().replace(re, "$1");
  }

}