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

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

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

【RSS 365FX、RSS 365CFD】質問箱

とみ

岡三RSSフリーズについて

初めて投稿いたします。よろしくお願いいたします。
昨年の春までは、Worksheet_Calculateを使ったデータ取得VBAが問題なく動作していましたが、今年になった再度動作させると途中でとまってしまいます。
色々と調べてみますと、岡三RSS集いの広場に以下の記事がありました。
■岡三RSSがフリーズした事がある方に質問です https://bbs.okasan-online.co.jp/ont/rss/board/?topic_id=258&page=1#comment_1380
確かに、岡三RSSがフリーズしているようで、Shell関数を使ってRSSを停止して再起動すると無事に動くことは確認できました。しかし停止間隔が早くなり数分間隔でフリーズを繰り返す状況になります。そのような状況でApplication.OnTimeでRSSの停止起動のトリガをかけると、起動停止が繰り返されてしまいタイミングが狂うと岡三RSSがたくさん起動されることになりました。そこでApplication.OnTimeの解除をおこなうFalseも使いまして、比較的安定に動作させることができますが、それでも一日に数回はエクセルがフリーズする状況が発生しています。これは、おそらく岡三RSSの起動停止のタイミングに関係しているかと疑っていますが、実証できていません。このようにRSSの起動停止を繰り返すこと自体がやはり不自然だと思います。
そもそも昨年の春には岡三RSSは正常に動いていたのですが、1年後にフリーズが頻発する事態は異常です。この現象はネットではいくつか見られますので私だけの問題でもVBAの問題でもないように思います。何か本質的な問題があるように思います。別の記事では、昨年8月のwindows10アップデートが影響しているとの記載もありました。ただ、これに対してどうすればフリーズを解消できるかはわかりませんでした。
そこで質問ですが、
(1)岡三RSSがフリーズする原因について、調査してこの原因を排除する対策を取りたいと思うのですが、何かよいヒントや方法をお教えいただけないでしょうか?
(2)岡三RSSの起動停止でなく、起動したままで、例えばメモリリセットなどの初期化ができる方法はないでしょうか?つまり、複数起動等の問題がないリセット方法があれば対症療法でも比較的安定に動かすことができると思います。
以上よろしくご教授頂きたくお願い致します。

2021年03月17日

大野 了

とみさん、こんにちは!!

なるほどですねー
いろいろとありますねー

最小化したExcelファイルを送り返していますが、
そちらでも岡三RSSが停止しますでしょうかー?

動くと良いのですがー

2021年03月30日

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

とみ

大野様
ありがとうございます。
確かに頂いたファイルを動かすと、1時間程度ですが今までと全く異なり安定しています。
多分、今日はフリーズする可能性は低いと思います。
もともとのファイルが6931KB、頂いたファイルが359KBと20倍弱の違いがあるのですね。
元のファイルはデータの残骸が残っているようですね。.ClearContentsを使って必ず毎日初期化していたのですが、消しきれないデータがあったようです。
この原因はゴミデータに再計算してWorksheet_Calculateを呼び出すものがあるかどうかですね。単に容量が大きいのと岡三RSSがフリーズするのとの因果関係はわかりません。基本的にはファイルは大きくなりがちだと思いますが、岡三RSSにエクセル容量に関する制約などがあるのでしょうか?
原因究明は今後の課題として、まずは安定してデータ取得ができるようになりました。今日の3時まで動かして確認してみます。
これまで長く悩んでいた問題がクリアできそうです。本当にありがとうございました。感謝、感謝です!!!
なお、On Timeの使い方等でおかしいところがありましたらご教授頂けると幸いです。

2021年03月30日

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

とみ

大野様
昨日は全くフリーズしませんでした。これまでのすべての現象がワークシートにあったゴミのせいであることで辻褄があうと思います。
ワークシートをコピーして使ったことも原因かと思いますが、エクセルの容量が異常に大きい場合には要注意であるとの教訓も得ました。ただ、ゴミはエクセルそのものには影響せずに岡三RSSのフリーズに関与することが不思議ですね。
今日は、オリジナルのファイルのワークシートを新しいものに変えて、実行してみます。これで昨年来のシステムが復帰することを期待しております。ありがとうございました。

2021年03月31日

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

大野 了

とみさん、こんにちは!!

返信遅くなりました!!
解決できたようでよかったです!!

ファイルを解くりなおして動いてしまったので、
細かな原因調査は行っていませんが、
VBAに保存処理などが見当たらなかったため、
とみさんのおっしゃられます通り、ファイルが大きいことで動作が停止することは
あまり考えられません。
(もし保存処理があるなら、1秒おきに7M近いファイルの書き込みがあるとまずいかもしれません)

ですので、そもそもExcleのファイルがおかしくなってしまっていたのかもしれません・・・
なので、今回ファイルサイズが小さくなったことよりも、
作り直したことで正常化された可能性も・・・

なにはともあれ、元のファイルを一から作り直す形でうまくいくことを祈ります!!

2021年03月31日

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

とみ

大野様
どうもありがとうございました。
保存処理があるわけではないのですが、以前のプログラムは図形等をたくさん使っており、かなり消去や追加を繰り返した経緯はあります。
原因は不明ですが、問題があったら一から作り直す形で進めることはしたいと思います。
大変、親切にご対応いただきありがとうございました。

2021年04月01日

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

大野 了

とみさん、こんにちは!!

図形ですか!!
なるほど!!
データの範囲とかの関係で、もしかしたら可能性ありそうですねー

もし作り直しても改善しないようでしたら、またご連絡ください!!

2021年04月01日

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

とみ

大野様
図形というかグラフですね。これもマクロで組んでいたのですが、かなり書き換えました。
あれから、元に戻す作業をしていますが、1~10のワークシートを新規で作成するだけではRSSがフリーズする現象は出ました。
再度、1~10のワークシートを作り直してもすぐにフリーズします。
標準モジュールの中にもゴミがいるのかも知れません。
大野さんから頂いたファイルをベースにして、これには手を加えずにいつでも戻れるようにしております。
何かあったらこのファイルでは安定に動作するかを確認して、追加して別名保存をするようにしています。
標準モジュールもファイルでの転送ではなく、テキストで一度保存してこれを貼り付けるようにしたいと思います。
感触としては結構微妙です。
実は、エクセルが勝手に立ち上がる不具合もあり、ネットでしらべて修復しました。エクセル自体がかなり問題のようですね。
戻れるファイルがあることは心強いですね。おかげ様でお手上げ状態はなくしっかり動作するファイルから始めなおせます。
本当にありがとうございました。
もし、何か悪さする原因がお分かりでしたら、お教えいただけると幸いです。
また、変なことが起こるかもしれませんが、その節はよろしくお願いいたします

2021年04月01日

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

大野 了

とみさん、こんにちは!!

あちゃー
出ちゃいましたか・・・
という事は、そのほかにも問題がありそうですねー

そうですねー
自分が送ったファイルから、とみさんがどのような追加をされたときに
フリーズするかが具体的にわかると、何かわかることもあるかと思いますがー
『10シートを新規作成したらフリーズする』という情報だけですと
原因の想定は少し厳しいのが現状です。

もしまた何か詰まりましたら、ご連絡頂けますと幸いです!!

2021年04月01日

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

とみ

大野様
どうもエクセルのファイルの肥大化が問題のようですね。頂いたファイルをいじっているとフリーズしましたが、そのファイルは2.7MBの容量がありました。原因を調べると、.ClearContentsで消去しても何か残っているようです。cntl+endでみると15000行にカーソルがとぶことがわかりました。いつも新しいワークシートをつくるのはWorksheet_Calculate関数を埋め込むのをマクロではできないので肥大化しない方法を考える必要がありますね。使う領域を限定するようにすれば肥大化はなくなると思います。
なかなかすっきりとは行かないようですね。でも原点がありますから、安心です。ファイル容量で今のところは判断できると思います。

2021年04月02日

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

大野 了

とみさん、こんにちは!!

また出てしまいましたか・・・

シートの中身をきちんと全部初期化できるのが一番と思いますが、
もし、新しいワークシートをコピーする方法で解決できるのであれば・・・

Call Worksheets("Sheet1").Copy(Null, Worksheets(Worksheets.Count))

とすると、Sheet1をコピーして新しいシートを作ることができます。
コピーですので、元のシートの中に入ってるVBAも一緒に持って行くことができます!!

こいつでテンプレ―ト的なシートからコピーされて、その後名前を変更されるというのはいかがでしょうかー?

2021年04月03日

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

とみ

大野様
ありがとうございます。
頂いたコマンドは起動時の初期化に組み込んでみたいと思います。
実は、初期化は毎日のことなので手動でワークシートのcalculateのあるマクロをコピーできないので困っていました。

そこで、
Worksheets(Sheet_Name).Cells.Delete Shift:=xlUp
ワークシートのデータすべてを消去して、マクロはそのままの状態となるので、これを使っていました。
ファイル容量は200KB程度だったので、安心していました。しかし、フリーズします。
On Timeを使ってますが、今日は20回ちかく停止と再起動を繰り返していました。
この起動停止のマクロは、確か大野さんが記述されていた記事のコマンドを使っています。
Call Shell("taskkill /im OkasanRSS2.exe /F")
Call Shell("cmd /c ""C:\Users\muratomi\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\岡三オンライン証券\岡三RSS.appref-ms""")
しかし、これを繰り返すと、タスクバーにある岡三RSSのアイコンがたくさん表示されており、これをマウスでいじると消えるのですが、手動で操作しないと再起動できません。まあ、起動停止を繰り返すこと自体が不自然なので、どうも抜本的な問題が解決していないように感じます。確かに以前いただいた大野さんのファイルはちゃんと動くのですが、その差分が不明です。On Timeが悪いように思っていますが、どうもわかりません。
また、Facebookにファイルをアップしてもよろしいでしょうか? 本当にお手数をおかけします。

2021年04月05日

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

大野 了

とみさん、こんにちは!!

アイコンがたくさん出るのは、
無理やり再起動してるので仕方ない感じです・・・

イレギュラーな停止に対応するためのコードですので・・・
連発すると厳しそうですね・・・

Facebookに送って頂いても大丈夫です!!

ですが、今ちょっと仕事が忙しく調査に時間を頂いてしまうかもしれません。
ご了承頂けますと幸いです。(ごめんなさい

2021年04月05日

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

Yoichi Muratomi

大野様
本当にありがとうございます。
アイコンがたくさん出るだけだと良いのですが、岡三RSSが複数起動していると判断してしまうようで、起動画面が出てエラーとなるようです。ただアイコンがなくなれば、大丈夫です。
確かにイレギュラー対応ですので、本来はたくさん起動停止する事態を改善すると問題ないかと思います。
Call Worksheets("Sheet1").Copy(Null, Worksheets(Worksheets.Count))
を使ったコードを実行してみましたが、容量が10倍以上に増えることがありましたが、再現性がありませんでした。
どうも、単に各ワークシートでCells.Delete Shift:=xlUp で消去する場合と容量的には変化がないようです。
お送りするコードにはコメント文にしてあります。
お送りするデータ取得コードはほぼ最終版ですが、昨日はフリーズが頻発しました。本日も確認してみます。
急ぎませんのでよろしくご確認をお願いいたします。

2021年04月06日

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

大野 了

とみさん

なるほどー
再現性が無かったという事は、フリーズしなかったという事でしょうかー?

なにはともあれ、ファイルを頂いたときに動かしてみます!!

何とか解決させたいですね!!

2021年04月06日

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

すべての投稿を表示する

to_top
to_top

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

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

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

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

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

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

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