Word for Mac でのショートカットキー Ctrl + K の設定

Word for macでは、普段よく使うショートカットキーのControl-Kだけ、マクロで設定しなければならず初心者には分かりにくかったので備忘録として置いておきます。
基本的には、こちらのサイトを参考にしています。

マクロ作成手順

1. ツール > マクロ > マクロ...を開く。
2. マクロの保存先をNormal.dotm(全文書対象のテンプレート)にする。
3. マクロ名をDeleteOneLineのように任意で設定する。
4. 実行をクリックすることで、Visual Basic Editor (VBA)が自動で開くので、以下を記述する

Sub DeleteOneLine()
    ' カーソル以降の現在の行をカット
    Selection.EndKey Unit:=wdLine, Extend:=wdExtend
    Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
    Selection.Delete
End Sub

これによってControl-Kと同じ役割のマクロが作成される。
あとはショートカットキーのユーザー設定からControl-Kにこのマクロを割り当てることで使用できる。

参考にしたコードをほんの少しだけ書き換えています。
文末にある改行コードまで削除してしまうのをSelection.MoveLeftで防いだだけです。
もう少し良い方法がありそうです。