Excel VBA質問箱 IV

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

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


350 / 13645 ツリー ←次へ | 前へ→

【80843】エクセル userformのイニシャライズ時のエラー のり 19/5/30(木) 16:32 質問[未読]
【80844】Re:エクセル userformのイニシャライズ時... Jaka 19/5/30(木) 20:39 発言[未読]
【80845】Re:エクセル userformのイニシャライズ時... のり 19/5/30(木) 22:33 お礼[未読]
【80846】Re:エクセル userformのイニシャライズ時... Jaka 19/5/30(木) 22:39 発言[未読]
【80847】Re:エクセル userformのイニシャライズ時... Jaka 19/5/30(木) 23:27 発言[未読]
【80848】Re:エクセル userformのイニシャライズ時... Jaka 19/5/30(木) 23:37 発言[未読]
【80850】Userformの挿入、削除してませんか? Jaka 19/6/1(土) 1:31 発言[未読]
【80866】Re:Userformの挿入、削除してませんか? のり 19/6/4(火) 12:56 お礼[未読]
【80849】Re:エクセル userformのイニシャライズ時... γ 19/5/31(金) 9:39 発言[未読]
【80875】Re:エクセル userformのイニシャライズ時... のり 19/6/5(水) 14:13 お礼[未読]

【80843】エクセル userformのイニシャライズ時の...
質問  のり  - 19/5/30(木) 16:32 -

引用なし
パスワード
   userformをイニシャライズするとエラーがでます。
しかし、userformのコードにバグはありません。
F8キーで1ステップ毎に実行すると、
userformの最後のコードまで進んだ後、
End Subのところでエラーがでます。
userformは、きちんと表示されていますが、
デバッグモードになります。
どうして、でしょうか?
行き詰って、困っています。
どうか、ご回答、よろしくお願い致します。

【80844】Re:エクセル userformのイニシャライズ...
発言  Jaka  - 19/5/30(木) 20:39 -

引用なし
パスワード
   F8ステップ実行でですか・・・、

例えば
userform1.Show
すると、

Private Sub UserForm_Initialize()
これが黄色くなるという感じでしょうか?

>しかし、userformのコードにバグはありません。

コード見ないと何とも言えないので、コードを載せた方がいいと思います。
F8ステップ実行でのみでエラーだとすると、山勘だとマクロをいじるコードとか?

【80845】Re:エクセル userformのイニシャライズ...
お礼  のり  - 19/5/30(木) 22:33 -

引用なし
パスワード
   早速の書き込みに感謝いたします。
ありがとうございます。
コードですが、次に出社する5日後の火曜日に載せさせて頂きます。
当初は、userform8.show
としても何の問題もなく正常に動作していました。
その後、モジュール側のコードを付け足していきましたところ、
今までエラーがでなかった、userform8.show
のところでエラーが出るようになりました。
userform8のコードは変更していないのでバグはないと考えております。
黄色くなるのは、モジュール側のコードのuserform8です。
そこで、F8で1ステップ毎に実行したところ、
userform8側のコードも全てクリアするのですが、
前記コードのend subでエラーになります。
何がいけないのか、見当もつきません。

▼Jaka さん:
>F8ステップ実行でですか・・・、
>
>例えば
>userform1.Show
>すると、
>
>Private Sub UserForm_Initialize()
>これが黄色くなるという感じでしょうか?
>
>>しかし、userformのコードにバグはありません。
>
>コード見ないと何とも言えないので、コードを載せた方がいいと思います。
>F8ステップ実行でのみでエラーだとすると、山勘だとマクロをいじるコードとか?

【80846】Re:エクセル userformのイニシャライズ...
発言  Jaka  - 19/5/30(木) 22:39 -

引用なし
パスワード
   ▼のり さん:
>そこで、F8で1ステップ毎に実行したところ、
>userform8側のコードも全てクリアするのですが、
>前記コードのend subでエラーになります。
>何がいけないのか、見当もつきません。

これは、F8ステップ実行しないでください。
エラーになります。

【80847】Re:エクセル userformのイニシャライズ...
発言  Jaka  - 19/5/30(木) 23:27 -

引用なし
パスワード
   他、VBプロジェクトうんぬんの方は・・・・。
(どこにあるのか覚えてないけど。)
これが、触れないような状態だとエラーになると思います。

【80848】Re:エクセル userformのイニシャライズ...
発言  Jaka  - 19/5/30(木) 23:37 -

引用なし
パスワード
   ▼Jaka さん:
>他、VBプロジェクトうんぬんの方は・・・・。
>(どこにあるのか覚えてないけど。)
>これが、触れないような状態だとエラーになると思います。

あ、消せるからこの辺は問題ないのか?

注)
下手に↑のスレを削除すると、ここ(Excel VBA質問箱)の書き込みログに白紙のファイルが残ってしまって、これが削除されるまでここにアクセスできなくなる場合があるようなので残しておきます。

【80849】Re:エクセル userformのイニシャライズ...
発言  γ  - 19/5/31(金) 9:39 -

引用なし
パスワード
   バグはありません、と断言していますが、
バグっているから、.Showでエラーになっているものと思料。

オプションのエラートラップは、3つの選択肢がありますが、
3番目のものに指定していませんか?
これを、一時的に、最初の
・エラー発生時に中断
に変更してみると、実際のエラー箇所が表示されて止まるはずです。
ただし、これはデバッグ用のものなので、バグ解決後、
元の選択肢に戻しておいたほうがよいと思います。
(後半部分は想像です。実際に確認していません。あしからず)

【80850】Userformの挿入、削除してませんか?
発言  Jaka  - 19/6/1(土) 1:31 -

引用なし
パスワード
   なんとなくだけど、流れからしてUserformの挿入、削除を繰り返してませんか?
15年ぐらい前の記憶なので、おぼろげだけど。
1回目はOK、2回目でエラーとか。

1度挿入削除をやって、上書き保存するとそのブックはだめだった様な・・・。
削除しても、フォーム情報がへんな形で残ってしまって、2度目でこける。
こんな感じじゃないですか?
解決策は見つけられなかったような気が・・・。

【80866】Re:Userformの挿入、削除してませんか?
お礼  のり  - 19/6/4(火) 12:56 -

引用なし
パスワード
   ▼Jaka さん:
>なんとなくだけど、流れからしてUserformの挿入、削除を繰り返してませんか?
>15年ぐらい前の記憶なので、おぼろげだけど。
>1回目はOK、2回目でエラーとか。
>
>1度挿入削除をやって、上書き保存するとそのブックはだめだった様な・・・。
>削除しても、フォーム情報がへんな形で残ってしまって、2度目でこける。
>こんな感じじゃないですか?
>解決策は見つけられなかったような気が・・・。

Jaka様、
書込みして頂きまして、有り難うございます。
旅行に行っていたため、返事が遅くなってしまいました。
申し訳ございません。
ご指摘の通り、ズバリでした。
全てのUserformをエクスポート、解放した後、インポートしたら、
エラーがでなくなりました。
Userformは、開放してはダメなのようですね。
完全に解決致しました。

素晴らしいお知恵を授けて頂きまして、感謝申し上げます。
今後とも、どうぞよろしくお願い致します。
のり

【80875】Re:エクセル userformのイニシャライズ...
お礼  のり  - 19/6/5(水) 14:13 -

引用なし
パスワード
   γ様、
書込みありがとうございます。
旅行していたため、返事がおそくなりました。
申し訳ございません。
エラーの件、解決致しました。
userformの開放と挿入を繰り返すと、バグがないのにuserform.showでエラーがでてしまう、という現象でした。
excel vbaの何らかの不具合だと思われます。
全てのuserformを、エクスポート、削除した後、インポートしたら、
エラーがでなくなりました。

今後とも、よろしくお願い致します。
のり


▼γ さん:
>バグはありません、と断言していますが、
>バグっているから、.Showでエラーになっているものと思料。
>
>オプションのエラートラップは、3つの選択肢がありますが、
>3番目のものに指定していませんか?
>これを、一時的に、最初の
>・エラー発生時に中断
>に変更してみると、実際のエラー箇所が表示されて止まるはずです。
>ただし、これはデバッグ用のものなので、バグ解決後、
>元の選択肢に戻しておいたほうがよいと思います。
>(後半部分は想像です。実際に確認していません。あしからず)

350 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free