[엑셀VBA] 매크로 단축키 먹이기

아래 그림과 같이 매크로를 모아둔, 폼을 만들었다.

그 역시도 귀찮으므로, 해당 폼을 오픈하면, 맨 위의 세가지 줄치기 매크로에 대하여, 단축키를 할당하려고 한다.

폼이 호출됐을 때만 단축키가 활성화되므로 충돌을 크게 신경쓰지는 않았다.

 

 

 

코드는 아래와 같으며, 단축키는 부호로 설정할 수 있다.

F1~F12 같은 특수키는 {} 안에 넣어줘야한다.

예를 들면, shift + alt + 1 은 1번 매크로(lineGray)가 실행된다.

 

Sub showMenu()

    ' 사용자폼 호출

    MyMacros.Show

    ' 단축키 설정

    ' % : shift

    ' ^ : control

    ' + : alt

    'Application.OnKey "{F3}", "lineGray"    

    Application.OnKey "%+1", "lineGray"

    Application.OnKey "%+2", "lineBlack"

    Application.OnKey "%+3", "lineBlackBold"

   

End Sub

 

 

자세한 내용은 아래 페이지에 너~~~무 잘 나와있다.

 

Application.OnKey method (Excel)

 

 

끝.