[엑셀 VBA] Hyperlinks 사용하여 Sheet 이동 목차 만들기

윤 과장이 되고 싶은 윤대리입니다.

오늘은 [Hyperlinks]를 사용하여

원하는 Sheet로 바로 이동할 수 있게

목차? Home을 만들도록

하겠다. (내 포스팅은 반말이다.)

잘 따라오도록..

 

[Hyperlinks]다, 복수형이다

Hyperlink로 매번 하다가

오류가 나서 깊은 빡침이 올 때가 있으니

직장인은 상명 하.복 으로 외우면

갑자기 기억 안 날 때 좋더라

 

ㄱ같은 직장생활

 

구성요소는 다음과 같다

 

Sheet(이름).Hyperlinks.Add Anchor,Address,SubAddress,ScreenTip,TextToDisplay

 

저게 뭐야 TQ!라고 하겠지만

아래 예시문을 보자

 

 

결과물은 아래와 같다.

 

 

이동 을 누르면 똑같은 이름의 Sheet로 이동! 하게 된다.

 

VBA ㅈ고수라면 대충 예시 코드만 봐도

감이 올 거다. 하지만 대부분 검색러들은

나처럼 잘 모르는 범인들이기 때문에 자세한

설명은 생략하도록 하겠다

가 아니고 

자세하게 설명해보도록 하자

 

Sheets(1).Hyperlinks.Add

 

자 여기까지 작성했다 다음

 

Anchor:= (Cell 위치)

 

앙코르? 아니다 앵커다 '닷'이라는 뜻인데왜 저 뜻인지는 모른다아는 사람은 댓글에 달아놓도록.

 

일단 이 [Anchor]에는 Hyperlink를위치하고 싶은 Cell을 지정하면 된다.

 

그다음은 

Address:= ""

 

원래 라면 인터넷 주소창을 써놔야 하는데우리는 내부에서 움직이는 하이퍼 링크라""로 한다.

 

내가 있는 직장에선 인트라넷이 있어서인터넷 주소를 쓸 일이 없다. 네이버 들어가면논다고 생각한다.

 

다음 [SubAddress]

 

SubAddress:= (참조위치)

 

Address는 인터넷 주소나, 메일 등을 쓸 때 쓰고나처럼 내부 위치나 파일 참조를 하고 싶으면SubAddress를 써야 한다.

 

여기서 중요한 점은'    '안에 들어가는 문자열 형태로 작성해야 하고즉, "'" & (위치) & "'" 로 해야 하고
Sheet의 경우 Sheet 다음에 Cell 위치를 지정해줘야이동이 가능하다 그냥 마지막에 "'!A1" 해주면 된다.해당 Sheet의 Range("A1")으로간다는 의미다.

 

진짜 나는 개 친절하다.나보다 하이퍼링크를 더 친절하게가르치는 포스팅이 있다면댓글에 하이퍼링크를 달아놓도록.

 

[ScreenTip]은 마우스 포인터가위치하면 나오는 글자라는데굳이 시간 들여서 쓸 필요가 있나 싶고

 

마지막 [TextToDisplay]

 

 TextTodisplay:= (표시 글자)

 

는 단어 뜻대로 하이퍼 링크에 표기되는 Text다나는 이동 이라고 밋밋하게 적었지만

 

가즈아! 라던가 이꾸죶 이라고 쓰면회사 선배들이 좋아할 것이다.

 

포스팅하면서 느끼지만코드가 그지 같을 경우에는 참 포스팅이 길어진다.

 

VBA는 쓰면 쓸수록 유저를 너무 과대평가하는 언어다.다 알 거라고 생각하나??

 

친절하게 좀 만들지..아무튼 내일 월요일이다. 

 

하.. 젠장