2017-11-03 1 views

답변

0

시트의 각 하이퍼 링크는 새로운 "친숙한 이름"을 가지고 있다고 가정하면 (이 두 열을 결합)이 인접 좋아 :

Sub step2() 
    Dim HY As Hyperlink 
    For Each HY In ActiveSheet.Hyperlinks 
     HY.TextToDisplay = HY.Range.Offset(0, 1).Value 
    Next HY 
End Sub 
:

enter image description here

이 작은 매크로를 실행

은 각 하이퍼 링크의 표시를 업데이트합니다.

enter image description here

+0

도움 주셔서 감사합니다. –