のび太
ネットトレーダー株365の自動再起動について
ネットトレーダー株365は毎日再度ログインしないといけないので、RSSを利用するために、それを何とか自動化したいと思っています
どなたか方法をご存知の方はいらっしゃいますでしょうか
タスクスケジューラやバッチファイルを使えばいいらしいのですが詳細がわからないのです
また再ログインする際に、サーバーが送ってくる情報をエクセルが取得しなくなるので、 エクセルも再起動する必要があると思っていました。
しかし、どうやらエクセルは再起動しなくてもアドインの更新ボタンを押せば再び情報が取得されるらしいということが分かりました
ただ、残念ながらアドインの更新ボタンを自動で押す方法がわからないのです
これについてもご存知の方がいらっしゃればぜひ教えてください
どうぞよろしくお願いいたします
2023年08月25日
大野 了
のび太さん、こんにちは!!
すみません、見落としていましたー
>ネットトレーダー株365は毎日再度ログインしないといけないので、RSSを利用するために、それを何とか自動化したいと思っています
>どなたか方法をご存知の方はいらっしゃいますでしょうか
>タスクスケジューラやバッチファイルを使えばいいらしいのですが詳細がわからないのです
自動起動まではタスクスケジューラやバッチファイルで簡単にできるのですが、
ログインまでとなると、UWSCやRPAなどの自動化ツールを使わないと厳しいと思います。
>しかし、どうやらエクセルは再起動しなくてもアドインの更新ボタンを押せば再び情報が取得されるらしいということが分かりました
>ただ、残念ながらアドインの更新ボタンを自動で押す方法がわからないのです
こちらもRPAなどでやられるのが簡単だと思いますが、
もしVBAから動かされたいのであれば、
Application.CommandBars("RSS株365").Controls.Item(4).Execute
でon offを切り替えることが可能です!!
2023年08月27日
のび太
大野さん
早速のご教示ありがとうございます。
>ログインまでとなると、UWSCやRPAなどの自動化ツールを使わないと厳しいと思います。
RPAツールは使ったことがないので、選定から始めたいと思います。
現在お教えいただいた方法を実験中ですが、CFDは場が空くのが1日1回のタイミングなので、ちょっと手間取っています。
あと数日でそれなりに結果が分かると思いますので、改めて報告いたしたく存じます。
>Application.CommandBars("RSS株365").Controls.Item(4).Execute
VBAのコード,とても助かりました。こんな方法があるのですね!ありがとうございます。
まずはお礼まで、ご返信申し上げます。
2023年08月29日
のび太
大野さん
たびたびすみません
>Application.CommandBars("RSS株365").Controls.Item(4).Execute
のほうでも問題が生じてしまいました。
これを実行すると、4番目の接続アイコンが赤字のX(未接続)の時はそれがそれで接続するようになるのですが、逆に接続中に実行するとX(未接続)なります。
現在接続しているかどうかの値を取得したいのですが、
https://learn.microsoft.com/ja-jp/office/vba/api/overview/library-reference/commandbar-members-office
にあるCommandBar のプロパティをみても、該当するものがないようです。
アイコンで呼び出しているプログラムの内部変数なのかもしれませんが、Xをつけたり消したりするために何らかのプロパティに反映され取得できるなら、取得したほうが「接続しているのに接続を切る」というエラーを防げそうです。
ご存じでしたらぜひお教えください。
どうぞよろしくお願いいたします。
2023年08月29日
大野 了
のび太さん、こんにちは!!
もし未接続の時だけ動かしたいのであれば、以下のようなIf文を追加するとよいと思います!!
If Application.CommandBars("RSS株365").Controls.Item(4).TooltipText = "未接続" Then
Application.CommandBars("RSS株365").Controls.Item(4).Execute
End If
ご参考になれば幸いです!!
2023年08月29日
のび太
大野さん
おおお!
確かにできました。
https://learn.microsoft.com/ja-jp/office/vba/api/office.commandbarbutton.tooltiptext
とかみても、こうなるとは全くわかりませんでした。
大野さんすごいですね!
すごすぎます!
本当にありがとうございます。
2023年08月29日
大野 了
のび太さん、こんにちは!!
上手く行きましたかー
よかったです!!
お役に立てて幸いです!!
2023年08月29日