[حل شده] ثبت اطلاعات _ تغییر نام شیت

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

سلام خدمت دوستان و اساتید بزرگوار
تو فایل پیوست من میخوام یه تغییر کوچیک بدم امام چیزی به ذهنم نرسید
تو این فایل بعد از زدن کلید ثبت اطلاعات شیت جدیدی ایجاد میشود با نام شیت قبلی
آیا امکانش هست که به جای استفاده از نام شیت قبلی از نام پرسنل که در خانه e7 هست یا نام جدید را درخواست کنه
ممنون میشم اگه کمکم کنید

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

از دوستان کسی نتونست کمکم کنه

[iranweld]

با سلام

این کد را اصلاح کنید


شماره کد ملی به شیت اختصاص می یابد.

If Sheets(Sheets.Count).Range("AE2") <> "" Then
Sheets("اطلاعات پرسنل").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = TextBox1.Text 

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

با سلام

این کد را اصلاح کنید


شماره کد ملی به شیت اختصاص می یابد.

If Sheets(Sheets.Count).Range("AE2") <> "" Then
Sheets("اطلاعات پرسنل").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = TextBox1.Text 

ممنون استاد