Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
67 / 13620 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【82021】｢図形の書式設定｣作業ウィンドウをＶＢＡで表示 Ｄｕ 22/5/20(金) 19:23 質問[未読]
【82022】Re:｢図形の書式設定｣作業ウィンドウをＶＢ... Ｄｕ 22/5/21(土) 11:51 回答[未読]
【82021】｢図形の書式設定｣作業ウィンドウをＶＢＡ...
質問  Ｄｕ E-MAIL  - 22/5/20(金) 19:23 -
引用なし
パスワード
   お世話になります。初めて質問させて戴きます。
EXCEL Ver2013でテキストボックスを作成して、
※1 選択した状態から⇒書式⇒ワードアートより「影」⇒「影のオプション」を選択すると、｢図形の書式設定｣作業ウィンドウが開きます。
これをマクロで下記の様にすると一度目は開きませんでした。

Application.CommandBars("Format Object").Visible = True
<エラー内容>
'Visible'メソドは失敗しました 'CommandBar'オブジェクト
のエラー表示されてしまいます。

然し、手動で ※1 を行って、
Application.CommandBars("Format Object").Visible = False
にすると、実行します。
更に、Application.CommandBars("Format Object").Visible = True も実行しました。

最初だけ、手動で※1を行うと実行してくれます。
「'Visible'メソドは失敗しました」は、最初に何か宣言が必要なのでしょうか?

大変お手数を掛けますが、どうぞご教授の程、宜しくお願い致します。
【82022】Re:｢図形の書式設定｣作業ウィンドウをＶ...
回答  Ｄｕ E-MAIL  - 22/5/21(土) 11:51 -
引用なし
パスワード
   ▼Ｄｕ さん：
>お世話になります。初めて質問させて戴きます。
>EXCEL Ver2013でテキストボックスを作成して、
>※1 選択した状態から⇒書式⇒ワードアートより「影」⇒「影のオプション」を選択すると、｢図形の書式設定｣作業ウィンドウが開きます。
>これをマクロで下記の様にすると一度目は開きませんでした。
>
>Application.CommandBars("Format Object").Visible = True
><エラー内容>
>'Visible'メソドは失敗しました 'CommandBar'オブジェクト
>のエラー表示されてしまいます。
>
>然し、手動で ※1 を行って、
>Application.CommandBars("Format Object").Visible = False
>にすると、実行します。
>更に、Application.CommandBars("Format Object").Visible = True も実行しました。
>
>最初だけ、手動で※1を行うと実行してくれます。
>「'Visible'メソドは失敗しました」は、最初に何か宣言が必要なのでしょうか?
>
>大変お手数を掛けますが、どうぞご教授の程、宜しくお願い致します。

◎解決しました。
コードが期待どおりに機能しない理由は、（過去のバージョン）CommandBarsがユーザーインターフェイスを使用しなくなったためでした。
リボンを使用することで解決しました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
67 / 13620 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free