استفسار عن اسم ورقة العمل فى الكود

[فريدة العصر]

السلام عليكم ورحمة الله وبركاته

الاساتذة الافاضل

Set ws = Sheets(TextBox1.Value)

يمكن من هذا السطر فى الكود ربط اسم ورقة العمل بقيمة تكست أو كومبوبوكس 

فهل من تعديل لربط اسم الورقة بالورقة النشطة لأننى تمكنت من تنشيط  ورقة العمل من خلال حدث التيكست ولكن عند التغيير فى قيمة التيكست يتم تنشيط الورقة ولكن الكود يعمل على الورقة السابقة ولا يتم تحديث اسم الورقة عند تغيير قيمة التيكست

شكرا جزيلا وتنياتى بالخير لجميع اساتذة ورواد المنتدى

[حسين مامون]

كان عليك رفع ملف فيه شرح كافي 

ولكن ربما تستفيد من هذا الملف

TEST22.xlsm

[فريدة العصر]

أستاذنا الفاضل / حسين مأمون 

الله ينور على حضرتك هذا ما كنت أقصده بارك الله فيك