質問掲示板
岡三RSS
集いの広場

アップロードされたファイルおよび投稿内容についての注意事項 別窓

複数の単語で検索する方法 別窓

【国内株式、先物・オプション】岡三RSS質問箱

RSSユーザー

エクセルのリボンの移動についてです。

お世話になっております。最初にエクセルのリボンがホームの状態でプログラムしたせいか、自動で起動するとリボンがホームの画面になっています。手動でリボンをアドインの状態に直して発注可を確認して監視しているのですが、マクロでリボンをアドインの状態にするにはどうすればよいでしょうか、お教えください。

2021年06月25日

大野 了

RSSユーザさんこんにちは！！

そうですねー
リボンの操作はやったことないのですが、調べた感じUIAutomationClientが簡単そうでしたー

https://www.ka-net.org/blog/?p=4624

2021年06月26日

ログインしてコメントを投稿する

RSSユーザー

お世話になっております。上記のプログラムコードをコピーして貼り付けエクセルのマクロ実行ボタンを押したらエラー表示になりました。そこで簡単にリボンの移動ができないか調べたところ、キーボードのAltを押して、ｘのキーを押して、
Altを押すとリボンがアドインに移動することがわかりました。以前にUWSCでエクセルマクロを実行させるプログラムコード(下記)を教わったのですが、これをいじって上手くできないでしょうか、お教えください。

try
ExcelObj = GETACTIVEOLEOBJ("Excel.Application")
ExcelObj.Run("Macro13")
except
exit
endtry

2021年06月27日

ログインしてコメントを投稿する

RSSユーザー

お世話になっております。
UWSCだと以下のスクリプトでうまくいきました。

try
ExcelObj = GETACTIVEOLEOBJ("Excel.Application")
ACW(GETID("Book1 - Excel","XLMAIN"),18,80,1329,712,0)

KBD(VK_ALT,CLICK,1)
KBD(VK_X,CLICK,1)
KBD(VK_ALT,CLICK,1)

except
exit
endtry


また大野さん推奨の

「リボンのタブを選択するVBAマクロ
マクロでリボンのタブを選択する方法として、ActivateTabやActivateTabMsoメソッドを使う方法やMSAAを使う方法がありますが、今回はUI Automationでタブを選択するマクロを紹介します。」

の中のMSAAを使う方法でも上手くいきました！

おさわがせしました！ありがとうございました！

2021年06月27日

ログインしてコメントを投稿する

大野 了

RSSユーザさん、こんにちは！！

返信が遅くなってごめんなさい・・・

UWSC Or マクロでうまく行きましたかー
良かったです！！

2021年06月27日

ログインしてコメントを投稿する
岡三RSS集いの広場TOP

すべての投稿を表示する

to_top

to_top

アップロードされたファイルにはウイルスチェックを行っておりますが、未知のウイルス等に感染されている場合がありますので、アップロードされたファイルのご利用はご注意ください。
また、取引パスワード等の重要な情報を投稿内容に含めないようご注意ください。
なお、アップロードされたファイルの利用や投稿内容によって、投稿者自身や他の利用者が被った損害に対して当社は一切責任を負いません。

また、セキュリティの関係上、一部コマンド等を含む内容を送信するとエラー画面が表示され、投稿ができない場合がございます。何卒ご了承ください。

岡三RSS集いの広場では、複数の単語による検索が可能です。

例）関数 and サンプル
→AND検索となり、「関数」および「サンプル」を含む検索結果が表示されます。

例）関数 or サンプル
→OR検索となり、「関数」または「サンプル」を含む検索結果が表示されます。

例）関数 not サンプル
→NOT検索となり、「関数」を含むが「サンプル」は含まない検索結果が表示されます。

※and、or、notの前後は半角スペースで区切ってください。
※単語の間を半角スペースで区切るだけだと、OR検索となります。