رفع مشکل فرم

[ali.b]

سلام
من ی فرم دارم که نمیدونم مشکل کار از کجاست
زمانی که ثبت اطلاعات رو میزنم داده ها ثبت میشه اما وقتی از تو لیست باکس دابل کلیک میکنم باید ی فریم 1 باز شه تا داده ها توش قرار بگیرن برای ایجاد تغییرات اما ارور تکسک میده
اما وقتی مستقیم روی تغییرات میزنم دیگه این مشکل رو ندارم

مشکل از کجاست میخوام در بخش ثبت اطلاعات هم این کار کنه


بعدش دنبال ی کد هستم که هر ایتمی رو از لیست باکس گلیک کردم با زدن حذف گلا حذف بشه ردیفش

[ali.b]

درضمن اگه اول ثبت اطلاعات رو بزنم بعد برم دکمه تغییرات رو بزنم باز ارور تکسک میده

[ali.b]

Dim idx As Long

    With ListBox1
        idx = .ListIndex
        If idx>-1 Then
            Range("ServiceList").Rows(idx+1).Delete xlShiftUp
            .RowSource = "ServiceList
        End If
    End With

با این کد مشکل حذف رو حل کردم

[ali.b]

حل کردم
ی ادرس دهی کوچیک رو اشتباه انجام دادم