[حل شده] تهیه بکاپ

[general007]

باعرض سلام خدمت شما عزیزان
من یک فایل اکسل دارم که دارای چندین شیت مختلف هست که ماکرو نویسی شده چطور می تونم یک کلید طراحی کنم که یکی از شیت های من که به نام list که از a2:AK2تا 1000 ردیف می باشد را در یک (درایو و داخل یک نیوفلدر خاص ) بکاپ تهیه کنم

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

[rasools13]

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

Sub BackUP()
    Sheets("list").Copy
    ActiveWorkbook.SaveAs Filename:="D:\MyBackupFolder\List_Backup.xlsx", FileFormat:= _ 
       xlOpenXMLWorkbook,    CreateBackup:=False
    ActiveWindow.Close
End Sub 

اين كد شيت List را در درايو D پوشه MyBackupFolder در يك فايل اكسل به نام List_Backup.xlsx ذخيره مي كند

[general007]

با سلام
ایا امکانش هست روی فایل نمونه کد رو اعمال کنید و اینکه چون اطلاعات هر بار در شیت list اضافه میشه همون فایل بکاپ قبلی رو اپدیت کنه
با تشکر