3 Replies Latest reply on Oct 8, 2015 5:02 AM by kate_lee

    Draw메뉴의 subtract KeyBindings설정하는 방법 문의

    sg08.hong

      안녕하세요.

       

      Draw메뉴의 Subtract기능을 KeyBindings.vbs로 임의의 단축키로 설정하여 사용하고싶습니다.

      기존 Keybindings.vbs는 BindMenu할수 있는 기능들만 있는데, Bindmenu를 제외한 기타 기능들도 KeyBindings.vbs로 설정하는 방법 확인 부탁드립니다.

        • 1. Re: Draw메뉴의 subtract KeyBindings설정하는 방법 문의
          kate_lee

          built-in toolbar button 의 경우 Command ID를 알면 automation을 통해 실행시킬 수 있습니다.  pull-down menu에도 동일하게 적용할 수 있습니다.

           

          ■ 먼저 "Draw Edit" toolbar 의 Command ID를 얻는 스크립트입니다.

             툴바의 순서와 동일하게 ID를 얻을 수 있습니다.

          ------------------------------------------------------------------------------------------

          Set CustomBars = Application.Gui.CommandBars

          Set CustomBar = CustomBars("Draw Edit")

          Dim oText

          For i = 1 to Custombar.controls.count

            Set button = Custombar.controls.item(i)                     

            oText = oText & vbCrlf & i & ". " & button.id & "/" & button.TooltipText '& "/" & button.DescriptionText & "/" & button.Caption

          Next 'i

          MsgBox oText

          ------------------------------------------------------------------------------------------

           

          ■ pulldown menu의 ID는 아래 링크 참고하세요.

          Re: keybind a toolbar function to an accelerator key

           

          ■ ID를 확인했으면, 단축키는 아래와 같이 2개의 vbscript로 나누어 구현할 수 있습니다.

           

          먼저 CommandID를 실행하는 스크립트를 생성합니다. ("Button_Subtract.vbs")

          아래의 예는 Subtract button을 draw mode 또는 select mode에서만 누르도록 설정하는 구문입니다.

          ------------------------------------------------------------------------------------------

          Private Sub main()

            If Gui.ActiveMode = 2 or Gui.ActiveMode = 4 Then

                 Gui.ProcessCommand(33836)

            End If

          End Sub

          ------------------------------------------------------------------------------------------

           

          그 다음 "Keybindings.vbs"에서 위의 스크립트를 단축키로 실행하도록 지정합니다.

          ------------------------------------------------------------------------------------------

          keyBindTables.AddKeyBinding  "Ctrl+5", "run C:\Button_Subtract.vbs", BindCommand, BindAccelerator

          ------------------------------------------------------------------------------------------

          1 of 1 people found this helpful
          • 2. Re: Draw메뉴의 subtract KeyBindings설정하는 방법 문의
            sg08.hong

            답변 감사합니다.

            혹시 추가로 Edit menu의 Circuit Move & Copy ID도 알 수 있을까요?

            중간에 있는 띄어쓰기문제인지 Keybinding을 직접 설정이 불가하네요..

            • 3. Re: Draw메뉴의 subtract KeyBindings설정하는 방법 문의
              kate_lee

              7.9.5 version에서 "ListCommandIds.vbs"를 실행시켜보면 CMC메뉴의 command ID는 34083인 것을 확인하실 수 있습니다.