나눔터  
  HOME > 나눔터 > 묻고답하기 > 엑셀
엑셀
엑셀에 대한 질문과 답변을 올려주세요. 단, 취지에 맞지 않는 글은 운영자가 삭제합니다.
 "000 님, 도와주세요", "부탁 드립니다.", "급합니다!" 등과 같이 막연한 제목을 달지 말아주세요.
[필독] 빠르고 정확한 답변을 얻는 16가지 Tip !
[필독] 저작권법 개정에 따른 이용안내

작성자:  

 추니 (ocyoon)

추천:  2
파일:     조회:  2913
제목:   -하이퍼링크된 문자열이 아니라 주소를 입력되게하기
　 　 　
　 * 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.

1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...): 

* 아래줄에 질문을 작성하세요 >>
하이러링크가 지정된 셀의 링크된 주소를 오른쪽에 나열하는 방법을 문의했으나
아래와 같은 답을 해 주셔서 사용해 보았더니
링크되어 있는 셀의 문자열만 그대로 복사해주는군요.
제가 원하는 것은 링크된 셀을 찾는 것이 아니라 링크주소를 입력되게 하는 방법입니다.
링크된 셀의 주소(파일이나 웹페이지 이름)을 표시하는 방법좀 가르쳐주세요. 

Sub Temp()

    On Error Resume Next
    Dim rngCell As Range
    Dim lnkLink As Hyperlink
    
    For Each lnkLink In ActiveSheet.Hyperlinks
        With lnkLink.Parent
            .Offset(0, 1) = .Hyperlinks.Item(1).Name
        End With
    Next lnkLink

End Sub 		　
[불량 게시물 신고]  
엑셀러.Offset(0, 1) = .Hyperlinks.Item(1).Name

이 부분을 아래와 같이 바꾸어 보십시오.

.Offset(0, 1) = .Hyperlinks.Item(1).Address

그럼...

//Exceller(www.iExceller.com)		10-25 (09:45)
ⓧ삭제 ■신고
 　  　  　
  

작성일 : 2003-10-25(09:35)
최종수정일 : 2003-10-25(09:35)