با سلام
توسط کدهای زیر از طریق اکسس یک فایل مشخص روبا اکسس باز می کنیم و می خوایم یک کاربرگ جدید ایجاد کنیم که اطلاعات کاربرگی که پروتکت شده است بریزیم توش برای ویرایش و امیپورت به اکسس
Untitled7.png
که بعضا با خطای زیر مواجهه میشم و بعضا با زدن end و اجرا کردن مجدد کد دیگه خطا نمیده و عملیات اجرا میشه
Untitled6.png
به این کد هم اصلاح کردم بازم مشکل پابرجاست
wrk.Sheets.Add After:=ActiveSheet
پاسخ با نقل قول