|
こんばんわ。
標記のことで、教えて頂けたらと思います。
仕事で使っているExcelファイルなのですが、以前は、各シートに直接入力していたのですが、入力する項目が多く見にくかったため、ユーザーフォームにて入力をして、各シートに反映するVBAを組んでみました。
が、この入力するユーザーフォームを呼び出す際に、Excelが強制終了してしまいます。
強制終了した後にエラー検出しても、エラーはありませんとなります。
ユーザーフォム1のコマンドボタンより、ユーザーフォーム2をLoadして、コンボボックスのリスト内容を与えてから、表示させる方法をとってます。このコマンドボタンを押した瞬間にExcelが強制終了となります。
デバッグ機能を使ってみると、
ユーザーフォーム1.Hide
Load ユーザーフォーム2 ← このときにオブジェクト変数またはwithブロック変数が設定されてませんと表示されます。
ID番号.Value="新規"
ID番号.SetForcus
コンボボックス1.Value=Sheets("シート1").Range("A1:A10").value ←コンボボックス1.Value=Nullとなっています。
以下同じような感じで40個程コンボボックスがあります。
変数が設定されていませんというのが問題かなと思うのですが、ヘルプとか見ても良く分からなかったため、質問させていただきました。
対処方法があれば、教えていただけたらと思います。
|
|