• ベストアンサー
  • 暇なときにでも

VBAでリボンの表示、非表示の状態を取得したい

  • 質問No.9410495
  • 閲覧数926
  • ありがとう数2
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 100% (634/634)

エクセル2013です。
以下のコードでリボンを表示、非表示させることができることがわかりました。
表示なら
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",True)"
非表示なら
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"

今回の質問は現在、リボンが表示されているのか非表示なのかを所得する方法についてです。
リボンの最小化であれば
If xlApp.CommandBars.GetPressedMso("MinimizeRibbon") = True Then で取得出来ますが、表示、非表示の取得の場合はどうなるのでしょうか?

質問者が選んだベストアンサー

  • 回答No.1
  • ベストアンサー

ベストアンサー率 52% (457/874)

確認はしていませんが、
4) リボン制御
http://www.asahi-net.or.jp/~zn3y-ngi/YNxv203.html#5-1
お礼コメント
emaxemax

お礼率 100% (634/634)

ありがとうございます!
If Application.CommandBars("Ribbon").Visible = True Then
これをエクセル2010、2013でやってみました。
両方とも無事取得できました。助かりました。
投稿日時:2017/12/23 10:20
結果を報告する
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。
AIエージェント「あい」

こんにちは。AIエージェントの「あい」です。
あなたの悩みに、OKWAVE 3,600万件のQ&Aを分析して最適な回答をご提案します。

関連するQ&A

その他の関連するQ&Aをキーワードで探す

ピックアップ

ページ先頭へ