Visual Basic For Applications Tips

メニューバーからメニューの削除

エクセルのメニューを削除します。下のサンプルを実行するとヘルプメニューが消えますが、エクセルを一度落として再起動すればメニューは復活します。

Sub MenuDelete()
　　Dim M_Name As Variant

　　For Each M_Name In MenuBars(xlWorksheet).Menus
　　　　If M_Name.Caption = "ﾍﾙﾌﾟ(&H)" Then
　　　　　　M_Name.Delete
　　　　End If
　　Next
End Sub