2012-07-02 2 views

답변

3

당신은이 A5

Sub Sample() 
    Dim i As Long 

    For i = 1 To 5 
     Debug.Print Range("A" & i).Hyperlinks(1).Address 
    Next 
End Sub 
+0

완벽한, THX :) –

+0

에 A1에서 하이퍼 링크를 추출합니다 예를 들어 하이퍼 링크

를 얻기 위해 .Hyperlinks(1).Address을 사용할 수 있습니다 셀에 하이퍼 링크가 없으면 코드가 손상되지 않습니다. –

+0

Thx, 그러나이 특정 목적을 위해 각 셀에 하이퍼 링크가 있다는 것을 알고 있습니다. –

관련 문제