[[20211123130914]] 『実行エラー1004の回避』(兼一) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『実行エラー1004の回避』(兼一)

Sub TEST01()

  UserForm1.StartUpPosition = 0
  UserForm1.Left = 900

  UserForm1.Show vbModeless

   End Sub
ユーザーフォームにコントロールをくわえたら実行エラー1004オブジェクト変数または With ブロック変数が設定されていません。が出ます。何卒回避のコードを教えてください

< 使用 Excel:Excel2019、使用 OS:Windows10 >


 参考HPです。

https://qiita.com/Kamo123/items/8fc296277594a7e734e8
(通りすがり) 2021/11/23(火) 14:11


 ↑リンク先に飛ばないですね。
 クリックしないでください。
(通りすがり) 2021/11/23(火) 14:13

UserForm1 の UserForm_Initialize のコードを消すか使えなくすれば起動すると思います。
それでも起動しなかったら、UserForm_Activate のコードを消すか使えなくする。

(にくちゃんねる) 2021/11/23(火) 14:40


 ん? なんででるんだろう?

 [ UserForm ] モジュール と  [ 標準 ] モジュール の両方から
 そのまま提示された、下記コードを入れてしてみましたが...エラーはでませんよ^^;

 Sub TEST01()
    UserForm1.StartUpPosition = 0
    UserForm1.Left = 900
    UserForm1.Show vbModeless
 End Sub

 にしても随分右上の隅に表示させるんですね。。
(あみな) 2021/11/23(火) 15:14

 提示されたコードからユーザーフォームを立ち上げ追加したコントロールを
 操作したらということですか。
 だとしたらそのコントロールのプロシージャに不具合があるのではないですか。

(PP) 2021/11/23(火) 16:39


VBEの「オプション」の「全般」タブの「エラートラップ」は、何が選択されていますか?
「エラー処理対象外のエラーで中断」が選択されていたら、
「クラスモジュールで中断」を選択してOKをクリックして、再度実行してみてください。
エラーの出方が変わりませんか?
(γ) 2021/11/23(火) 16:45

エラーになったときに、デバッグボタンを押したときのジャンプ先が違う、
と言わないと通じなかったですね。
実質的にエラー原因となったところにジャンプしませんか?

(γ) 2021/11/23(火) 22:28


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.