본문으로 바로가기

 

반응형

 

 

오랫만에 엑셀 팁을 올리게 됩니다.

 

엑셀파일에 PDF파일 삽입을 하여

 

클릭 시 자동으로 연결 프로그램으로

 

연결 되어 열리도록 하는

 

VBA매크로 입니다.

 

즉, 엑셀에서 개체 클릭 시 자동으로 열기 매크로 입니다.

 

삽입 개체 선택 하시고

 

찾아보기 하여 PDF파일을 선택 한 후

 

아이콘으로 표시 체크

 

그럼 위와 같은 아이콘이 엑셀에서 생성 됩니다.

 

엑셀에서 Alt+F11키를 클릭하여

 

VBA 편집기를 연 다음

 

다음 코드를 삽입합니다.

 

Sub openPDF_Click() 
    With ActiveSheet.Shapes(Application.Caller).Select ' 클릭한 도형 선택 
          Selection.Verb Verb:=xlPrimary                  ' 삽인 된 개체 연결 프로그램 열기
    End With     
End Sub 

개체 아이콘에

 

우클릭하여 매크로를 지정 합니다.

pdf파일 뿐만아니라

 

다른 파일들도 윈도우 확장자에

 

연결 된 프로그램으로 오픈 됩니다.


간만에 서류 만들다가

 

여기 저기

 

해외 사이트 국내 사이트

 

뒤져 봤지만 없어서

 

만들어 봤습니다.

 

응용하기 나름에 따라

 

쓸모가 많은 코드입니다.

 

 


VISITOR 오늘 / 전체