
내 질문에 맞는 내용을 찾기 위해 이 스레드를 살펴봤지만 대부분의 주제가 비슷했지만 내 주제에만 국한되지는 않았습니다.
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)는 설치 및 사용이 매우 쉽습니다.
- ALT-F11은 VBE 창을 불러옵니다
- ALT-I ALT-M은 새로운 모듈을 엽니다
- 내용을 붙여넣고 VBE 창을 닫습니다.
통합 문서를 저장하면 UDF도 함께 저장됩니다. 2003 이후 Excel 버전을 사용하는 경우 파일을 .xlsx가 아닌 .xlsm으로 저장해야 합니다.
UDF를 제거하려면:
- 위와 같이 VBE 창을 불러옵니다
- 코드를 지워라
- VBE 창을 닫습니다
Excel에서 UDF를 사용하려면:
=하이프(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에 대한 자세한 내용은
이 작업을 수행하려면 매크로를 활성화해야 합니다!