Sub MyToolBar() Rem *----*----* *----*----* *----*----* *----*----* Rem マイツールバー処理 Rem 作譜:Hitrock Camellia Shinopy Rem 言語:Word VBA Rem 機能... Rem 1. 指定したマクロを実行する。(この処理に指定されているマクロは一例。) Rem 2. 作業中の文書上で、元に戻すことのできる操作の一覧をクリアする。 Rem 注記... Rem 1. この処理に指定されているマクロは一例です。 Rem 2. Microsoft Word 2007で、ツールバーを表示させるマクロを実行すると、 Rem [アドイン]タブにツールバーが表示されます。 Rem 2. 作業中の文書で元に戻すことのできる操作の一覧をクリアします。 Rem 履歴... Rem 第01版:2008/10/24:作成。 Rem *----*----* *----*----* *----*----* *----*----* ' Application.Run "EspVortizo" Application.Run "EspRevizo" Application.Run "EspFindPaste" Application.Run "MyCsvLbox" Application.Run "MyCsvLboxEx" Application.Run "EspOptions" ' On Error Resume Next Call SelRibbonTAB("アドイン") On Error GoTo 0 ' ActiveDocument.UndoClear ' [元に戻す]ボックス操作一覧クリア End Sub ' MyToolBar *----*----* *----*----* *----*----* *----*----*