하이퍼링크 여러개를 간격마다 만들려고 합니다.

VBA
작성자
웃음
작성일
2022-05-04 04:22
조회
52
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

첫번째 시트에서 두번째 시트의 100번째 줄마다 하이퍼링크가 만들어지도록

하려고 합니다.

예를들면 아래와 같이 화살표대로 하이퍼링크 되고 싶습니다.

첫번째시트     두번째시트

A1    -------- > A100

A2    -------- > A200

A3    -------- > A300

A4    -------- > A400

A5    -------- > A500

 

제가 구글링해서 찾은 예제들은

 

sub 링크()

dim r as integer

for r = 1 to 5

ActiveSheet.Hyperlinks.Add Anchor:=Cells(r, 1), _

Address:="", _

SubAddress:="'" & Sheets(2).Name & "'!A1", _

TextToDisplay:="클릭"

next r

End sub

위와 같은대요

위와 같이 하면 두번째 시트의 A1에만 모두 링크가 됩니다. ㅠ

그래서 두번째 시트의 100번째 줄마다 링크가 되도록 하려고

아래와 같이 변경했습니다.

 

sub 링크()

dim r as integer

dim num as integer

num = 100

for r = 1 to 5

ActiveSheet.Hyperlinks.Add Anchor:=Cells(r, 1), _

Address:="", _

SubAddress:="'" & Sheets(2).Name & "'!Cells(num, 1)", _

TextToDisplay:="클릭"

num = num + 100

next r

End sub

 

위와 같이 변경을 했지만

참조가 잘못됐다는 오류가 나옵니다.

어떻게 하면 될까요? 도움 부탁드립니다.

전체 2

  • 2022-05-04 08:47
    채택된 답변

    주소 지정부분에서 아래처럼 수정해 보세요.

    SubAddress:="'" & Sheets(2).Name & "'!" & Sheets(2).Cells(num, 1).address

     


    • 2022-05-04 10:35

      @원조백수 님 정말 감사합니다. 단번에 해결이 되어서 원하던대로 작동이 됐습니다. 새벽에 어디 물어볼곳 없어 이렇게 오빠두엑셀에서 도움을 받아 너무 감사한 마음이에요. 오늘 하루 복많이 받으시고 즐거운 하루 되시길 기원해요 감사합니다.


전체 6,493
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[🏆 진짜쓰는 실무엑셀 스터디] 1기 - 우수 졸업생 및 후기, 축하합니다! (8)
오빠두엑셀 | 2022.04.30 | 추천 10 | 조회 1304
오빠두엑셀 2022.04.30 10 1304
공지사항 함수/공식
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (65)
오빠두엑셀 | 2021.10.28 | 추천 81 | 조회 4634
오빠두엑셀 2021.10.28 81 4634
34502 함수/공식
New 수식 오류
kh**** | 05:08 | 추천 0 | 조회 2
kh**** 05:08 0 2
34499 VBA
New 이주일간의 고생 끝에 해결이 코앞인데요.
silverf**** | 2022.05.28 | 추천 0 | 조회 14
silverf**** 2022.05.28 0 14
34497 함수/공식
New 데이터 배열 바꾸기 (4) 답변완료
이지현한의사 | 2022.05.28 | 추천 0 | 조회 25
이지현한의사 2022.05.28 0 25
34494 파워쿼리/피벗
New 엑셀 계정별원장 시트 합치기 방법 문의 드립니다.
우렁각시탈 | 2022.05.28 | 추천 0 | 조회 19
우렁각시탈 2022.05.28 0 19
34492 VBA
New 엑셀에 드래그 앤 드롭으로 그림파일 삽입 (4)
banarchy | 2022.05.28 | 추천 0 | 조회 31
banarchy 2022.05.28 0 31
34477 문서서식
New 수식 복사 질문드려요.. ㅠㅠ 불금 퇴근하고싶습니다... 첨부파일 (3) 답변완료
김동률 | 2022.05.27 | 추천 0 | 조회 40
김동률 2022.05.27 0 40
34473 VBA
New 비고란에서 휴대폰번호 추출하기에 관해 문의드립니다. 첨부파일 (1)
수메리안 | 2022.05.27 | 추천 0 | 조회 35
수메리안 2022.05.27 0 35
34472 기능/도구
New 스핀단추에서 증분변경시 0.1 씩 증감할려면 어떻게 해야 할까요? (1)
033cola | 2022.05.27 | 추천 0 | 조회 26
033cola 2022.05.27 0 26
34471 함수/공식
New 조건부서식 중복 2개이상 및 2개일때 서식좀 봐주세요 궁금합니다. 첨부파일 (3)
김주현 | 2022.05.27 | 추천 0 | 조회 42
김주현 2022.05.27 0 42
34469 문서서식
New 표의 행렬 변경 첨부파일 (4)
김학준 | 2022.05.27 | 추천 0 | 조회 38
김학준 2022.05.27 0 38
34465 차트/그래프
New 간트차트에 오늘 표시하는 방법 질문드려요
yoyoy**** | 2022.05.27 | 추천 0 | 조회 30
yoyoy**** 2022.05.27 0 30
34464 VBA
New Vba로 수식을 입력하려는데 오류가 납니다. (4)
silverf**** | 2022.05.27 | 추천 0 | 조회 43
silverf**** 2022.05.27 0 43
34451 함수/공식
New 제품별 코드 중복/단독 확인함수 첨부파일 (2)
다은지후아빠 | 2022.05.27 | 추천 -1 | 조회 48
다은지후아빠 2022.05.27 -1 48
34450 VBA
New VBA를 활용한 최단거리 계산(Pathfinder,카카오맵) 첨부파일
darc**** | 2022.05.27 | 추천 0 | 조회 36
darc**** 2022.05.27 0 36
34448 함수/공식
New countif 다양한 조건으로 만들고 싶어요~ 첨부파일 (2) 답변완료
김수달 | 2022.05.27 | 추천 0 | 조회 47
김수달 2022.05.27 0 47
34444 기능/도구
New 엑셀 빠른 도구 모음에 있는 '조명'이 무슨 기능인지 아시는분 계신가요?
월마리아 | 2022.05.26 | 추천 0 | 조회 46
월마리아 2022.05.26 0 46
34440 함수/공식
New 고객 리텐션, 접속 일수에 맞춰 데이터를 합산하는 함수/VBA 문의! 첨부파일
은혼 | 2022.05.26 | 추천 0 | 조회 22
은혼 2022.05.26 0 22
34439 차트/그래프
New 체크박스 선택에 따라 값이 바뀌는 차트의 데이터레이블 표시 문제 관련 첨부파일
Qwerty | 2022.05.26 | 추천 0 | 조회 26
Qwerty 2022.05.26 0 26
34437 함수/공식
New 국가만 찾아 올련면 첨부파일 (4) 답변완료
구름나그네 | 2022.05.26 | 추천 0 | 조회 42
구름나그네 2022.05.26 0 42
34433 함수/공식
New 함수관련 질문있습니다.
섭섭섭 | 2022.05.26 | 추천 0 | 조회 31
섭섭섭 2022.05.26 0 31
34427 함수/공식
New 특정 공휴일 제외 후 2달 뒤 날짜를 구할수 있는 함수 식이 있을까요? (1)
김태우 | 2022.05.26 | 추천 0 | 조회 42
김태우 2022.05.26 0 42
34417 피벗테이블
New 피벗테이블 외부 데이터 참조 후 새로고침 할 때 자꾸 암호를 입력하라고 떠요.. (2) 답변완료
forest choi | 2022.05.26 | 추천 0 | 조회 35
forest choi 2022.05.26 0 35
34416 함수/공식
New 날짜/시간 차이를 구하려면 어떻게 하면 좋을까요? 첨부파일 (2)
aron007 | 2022.05.26 | 추천 0 | 조회 41
aron007 2022.05.26 0 41
34415 VBA
New VBA코드로 자동채우기 할때 유동범위는 어떻게 하나요 첨부파일 (2)
nam**** | 2022.05.26 | 추천 1 | 조회 41
nam**** 2022.05.26 1 41
34414 함수/공식
New 금지어 삭제하는 함수 (특정텍스트 범위내의 값을 제거 후 값 불러오기) 첨부파일 (1)
Jasper | 2022.05.26 | 추천 0 | 조회 42
Jasper 2022.05.26 0 42
34406 함수/공식
sum 함수 오류? 첨부파일 (1)
saechang | 2022.05.25 | 추천 0 | 조회 53
saechang 2022.05.25 0 53
34405 VBA
중복데이터가 많은데 맨 위에 있는 행의 데이터만 남길 수 있는 방법이 있을까요? 첨부파일 (3) 답변완료
오구 | 2022.05.25 | 추천 0 | 조회 69
오구 2022.05.25 0 69
34402 VBA
vba 특정문자 입력시 현재시간 구동 관련 첨부파일 (2)
1412 | 2022.05.25 | 추천 0 | 조회 46
1412 2022.05.25 0 46
34400 함수/공식
다른 셀 값 참조시 결과값이 0으로만 나오는 현상 문의 첨부파일 (3) 답변완료
forest choi | 2022.05.25 | 추천 0 | 조회 48
forest choi 2022.05.25 0 48
34395 VBA
조건이 맞을 경우 범위데이터 이동 or 복사,삭제 문의 첨부파일 (2) 답변완료
com**** | 2022.05.25 | 추천 0 | 조회 56
com**** 2022.05.25 0 56