エクセル2010でマクロからリボンの最小化の変更

質問

キーボードからは、Ctrl+F1キー作業で、タグバーが残る状態で最小化ができるので、マクロ(VBA)により実行できないものかご相談いたします。
私には解決できない難題です。どうかご教示願います。

相談箱　質問　QNo.6530721(エクセル2010でマクロからリボンの最小化したい) の経緯を拝見、利用させていただきましたがタグバーまでも消えてしまうので、別のコードを追加することで、タグバーを残すことが出来ないものか、しかし、何もできない状態でおります。

　(リボンの最小化)
　　 Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",FALSE)"
(リボンの再表示）
　 Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",TRUE)"

回答No.2

watabe007

http://www.ka-net.org/ribbon/ri06.html

こちらのサイトが参考になるでしょう

お礼

種々の解決方法を教えていただき有難うございました。
今後の操作に参考にさせていただきます。

回答No.1

watabe007

お試しを

Sub Test()
　　Call Application.CommandBars.ExecuteMso("MinimizeRibbon")
End Sub

お礼

あっと言う間に、回答頂き有難うございました。
実は今日(5/1）当たり、ご教示願えるかなと思っておりました。
早速試してみて、パソコンにあるすべてのファイルが、実行されてしまい悩んでおりました。
追っかけ、別の回答により解決できましたが、今後も、ご指導のほどよろしくお願いします。