項目

メニューを非表示にする。

'-------------------------------------------------------------------------------
'表示、非表示を 「True」と「False」で切り替えできます。
'一番最初に起動する画面のForm_Openに書いて試してみてください。
'-------------------------------------------------------------------------------

Application.CommandBars("Menu Bar").Enabled = False

'-------------------------------------------------------------------------------
'【補足】
'"Menu Bar"を変更してツールバーを表示・非表示の切り替えができます。
'以下を実行するとコマンドバーの名前がイミディエイトウィンドウに表示されます。
'Application.CommandBars("コマンドバーの名前")を変更して試してみてください。
'-------------------------------------------------------------------------------
Function CommandBarsList()

  Dim cmdbar
        
  For Each cmdbar In Application.CommandBars
    Debug.Print cmdbar.Name
  Next
        
End Function