none
하이퍼링크에 관한 질문입니다. RRS feed

  • 질문

  • 안녕하세요, 하이퍼링크를 쉽고 편하게 이용하려고 생각하다가 이런 방법으로 사용할 수는 없을까? 라는 마음에 글을 써봅니다.

    셀에 숫자 '100'을 입력하면 결과값으로 http://www.ABCD.com/A100 으로 출력되는 간단한 방법이 없을까요?

    '50' 입력하면 http://www.ABCD.com/A50 이런식으로 출력되는 방법이!

    이 방법을 생각하다가 '셀 서식'에서 사용자 설정으로 "http://www.naver.com/"A0  형식을 추가하게 되면 숫자 입력 시 위의 결과처럼 출력은 됩니다.

    하지만, 이 방법으로는 하이퍼링크가 아닌 일반 글로 인식이 되기 때문에 링크로서는 사용이 안되고 수동으로 기능을 부여해야만 합니다.

    링크를 많이 사용하다가 문득 느꼈는데, 링크를 입력하는 데 시간 소모도 어느 정도 있기에 숫자로 간편하게 나타낼 수 있으면 좋겠다고 생각했었습니다.

    어떻게 하면 간단한 주소를 만들 수 있을 지 궁금합니다!

    2015년 5월 19일 화요일 오후 10:45

답변

  • 다른방법으로 생각해서, 매크로로 만들어도 될것 같네요.

    1. 엑셀에 A 컬럼에다가 숫자 1 부터 1000 까지를 집어넣습니다.

    2. 입력이 끝났으면, 생성한 버튼을 누릅니다.

    모든숫자들이 말씀하신대로의 링크를 가지고있는 하이퍼링크가 됩니다.

    함수는 아래와같이 하시면 될것 같습니다. 

    참고하세요.

    동작확인은 했습니다.

    필요하신대로 커스터마이징 하시면 될것 같습니다.

    Public Sub hyperLink()
        Dim default As String
        default = "http://www.ABCD.com/A"
        
        For i = 1 To 1000 Step 1
            Key = ActiveSheet.Cells(i, 1).Value
            ActiveSheet.Cells(i, 1).Select
            If Key = "" Then Exit For
            ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:= _
                default & Key
        Next i
    End Sub
    
    


    도움되시길 바랍니다 ~


    프로그램 개발에는 정답이 없다.

    2015년 5월 20일 수요일 오전 5:06