Excel方眼紙からの脱却

VBAのことと、その他いろいろメモ。

Visioのマクロにショートカットキーが設定できない

過去にVisio 2007のマクロを触っていたときのメモ。

作ったマクロにショートカットキーを当てたいけれど、
上手くいかないときがありました。

原因がよく分からないので、マクロをエクスポートして、
割り当てられたキーがどうなっているか確認してみることに。

  1. 「マクロの記録」ダイアログを表示します。
  2. ショートカットキーを入力しておきます。
    ひとまず、割り当てたキーは「Ctrl + Shift + C」。
  3. 適当なマクロを記録します。
  4. 記録したマクロをエクスポートします。

エクスポートしたマクロには、

Attribute fSelectionCopy.VB_ProcData.VB_Invoke_Func = "C"

と記載されていました。

「Ctrl + Shift + C」なら

Attribute fSelectionCopy.VB_ProcData.VB_Invoke_Func = "C\n14"

となると思っていたのに…。 
(多分、Shiftキーは「\n14」

エクスポートしたマクロに「\n14」を追記して、
インポートしなおすと、ショートカットが効くようになりました。