پرسش مشکل بسته شدن فرم و دادن خطا با داینامیک کردن ریسورس کمبو باکس

[m.honsr]

دوستان سلام
در یوزر فرم وقتی ریسورس یک کمبوباکس رو به صورت داینامیک و با کدی که یک رنج ازیک شیت رو نامگذاری کرده و اون رو به عنوان ریسورس قرار میدم، هنگام اجرا وقتی به عنوان مثال دکمه ذخیره رو فشار میدم برنامه خطا میده و بسته میشه. البته بعدا که دوباره باز میکنم برنامه رو میبینم تغییرات در شیت اعمال شده. میخواستم بدونم دلیلش چی هست و چه راهکاری براش وجود داره؟
ممنون میشم راهنمایی کنین

motasadi.Range("c3", motasadi.Range("c" & Application.Rows.Count).End(xlUp)).Name = "dynamicMotasadi"
.cmbMotasadi.RowSource = "dynamicMotasadi"

خطای داده شده:Run time error 2147467259(80004005)

[میثم مقدم نیا]

دوستان سلام
در یوزر فرم وقتی ریسورس یک کمبوباکس رو به صورت داینامیک و با کدی که یک رنج ازیک شیت رو نامگذاری کرده و اون رو به عنوان ریسورس قرار میدم، هنگام اجرا وقتی به عنوان مثال دکمه ذخیره رو فشار میدم برنامه خطا میده و بسته میشه. البته بعدا که دوباره باز میکنم برنامه رو میبینم تغییرات در شیت اعمال شده. میخواستم بدونم دلیلش چی هست و چه راهکاری براش وجود داره؟
ممنون میشم راهنمایی کنین

motasadi.Range("c3", motasadi.Range("c" & Application.Rows.Count).End(xlUp)).Name = "dynamicMotasadi"
.cmbMotasadi.RowSource = "dynamicMotasadi"

خطای داده شده:Run time error 2147467259(80004005)

سلام
دوست عزیز میتونید یک فایل نمونه قرار دهید تا بتونیم بهتر راهنمایتون کنیم

[m.honsr]

سلام. بله ممنون میشم از کمکتون.
در فایل ضمیمه شده وقتی یوزر فرم اجرا میشود و اطلاعات وارد میشود و دکمه ذخیره فشرده میشود برنامه خطا داده و بسته میشود. اگر دوباره اجرا بگیریم میبینیم که عمل ذخیره علیرغم خطا و بسته شدن برنامه انجام شده. این خطا و بسته شدن به دلیل این مطلب هست که در sub reset ریسورس کمبوباکس رو به صورت داینامیک درآوردیم تا بعد وقتی به اطلاعات افزوده شد اعمال بشه.
نمیدونم چه جوری میشه این مشکل رو برطرف کرد.

ممنون از راهنماییتون

[generalsamad]

با سلام
کدهای مربوط به کمبوباکسها رو تغییر دهید
این دو کمبوباکس
به جای .clear

.CmbMotasady.Value = "" 

.CmbBankname.Value = ""