実行エラー'424' ？？？？

エクセルでユーザーフォームを作成しました。
(オブジェクト名) UserForm7 です。
これを　開くマクロは
Sub 受入フォームの表示()
UserForm7.Show
End Sub
です。
すると
実行エラー'424' オブジェクトが必要です。と　デバックします。
ちなみにUserForm1も作成してあり
マクロは
Sub 仕入先マスタ表示()
Dim mytbl As Range
Set mytbl = Worksheets("T_仕入先").Range("仕入先リスト１")
UserForm1.Caption = "仕入先選択"
UserForm1.Label1.Caption = "■仕入先一覧■"
With UserForm1.ListBox1
.ColumnCount = mytbl.Columns.Count
.ColumnWidths = "2cm;3cm"
.List = mytbl.Value
End With
UserForm1.Show
　　End sub
は問題なくフォームが表示します。
どこがわるいのでしょうか？

No.1 ベストアンサー 回答者： hallo-2007 回答日時： 2008/07/31 18:31

Sub 受入フォームの表示()

UserForm7.Show
End Sub
に不具合があるのではなくて
UserForm7の
Private Sub UserForm_Initialize()
・・・
End Sub
とかがあってその中にエラーが隠れているかもしれませんね。

この回答へのお礼

いやー　参りました。
その通りでした。
ありがとうございます。

お礼日時：2008/07/31 19:13