Word ツールバーの削除
下記の様なマクロを組み込みました。
しかしこのマクロ自体不必要になったので削除したのですがツール→ユーザー設定→ツールバーにはツールバー及びボタンが残ってしまいました。
ツール→ユーザー設定→ツールバーで削除をすれば消えますが新たにWordを立ち上げると消えていません。
マクロでCommandBars("Indent").Deleteともしましたが結果は同じでした。
どうすれば消えるのでしょうか?どなたかご教授願います。
Sub auto_open()
Dim myBar As CommandBar, myButton As CommandBarButton
'新しいMenuBarを追加
Set myBar = CommandBars.Add
'MenuBarに名前を設定
myBar.Visible = True
myBar.Name = "Indent"
myBar.Position = msoBarTop
'新しいボタンを追加
Set myButton = myBar.Controls.Add
With myButton
.Caption = "[チュックインデント]"
.Style = msoButtonCaption
End With
'ボタンが押下時実行マクロ設定
myButton.OnAction = "checkIndent"
myBar.Visible = True
End Sub
Sub auto_close()
お礼
無事、消えました! ありがとうございます。一瞬、どこに向けてドラッグするのか迷いましたが、うまくいきました。ところで、この機会に勉強したいのですが、Altキーを押しながら何かをドラッグするというのは、他の操作でも応用可能なのでしょうか?