این مطلب برای بسیاری از شما کاربران بسیار بسیار کاربردی می باشد.چرا که برای تهیه فایل اکسل خود ممکن است روز ها و یا ماه ها وقت صرف کرده باشید ولی به دلایل مختلف ممکن است فایل اصلی را از دست بدهید و هیچ گونه پشتیبانی از آن نداشته باشید.(پیشنهاد می شود مطلب ذخیره و بازیابی فایل های آفیس را مطالعه کنید)

تصور کنید شما در حال جمع آوری داده ها به مدت ۳ روز می باشید ولی در روز چهارم متاسفانه فایلی که بر روی آن کار می کردید را از دست داده اید و فاجعه زمانی می باشد که هیچ پشتیبان یا کپی از فایل خود تهیه نکرده اید.

نمونه کد VBA که تقدیم شما می گردد، این امکان را به شما میدهد به طور روزانه از فایل خود پشتیبان تهیه کنید.یکی از ویژگی های این کد این میباشد که کپی های ایجاد شده از فایل شما را بر اساس تاریخ در پوشه مورد نظر شما ذخیره می کند و شما به راحتی می توانید به اطلاعات روز های قبل خود دسترسی داشته باشید.

تهیه فایل پشتیبان در کمک اکسل recovery

پیش از شروع آموزش چند تذکر را یادآوری می کنیم:

[cf-restrict]

۱)این یک نمونه کد می باشد و شاید نیاز شما را پاسخگو نباشد.

۲)فایل را حتما به صورت Excel macro-enabled workbook ذخیره کنید.

اکنون وارد محیط ویرایشگر vba شوید.(Alt+F11)مانند تصویر زیر بر روی Module کلیک کنید.

تابع تبدیل اعداد به حروف به انگلیسی

اکنون کد های زیر را مانند تصویر زیر در Module1 کپی کنید.

کد نویسی برای تبدیل اعداد به حروف در اکسل

Sub Backup()
'Step 1: Create a Backup of a Workbook with Current Date in the Same folder
 ThisWorkbook.SaveCopyAs _
 FileName:=ThisWorkbook.Path & "\" & _
 Format(Date, "mm-dd-yy") & " " & _
 ThisWorkbook.Name
End Sub

اکنون این ماژول را از تب  Developer و کلیک بر روی Macros اجرا کنید.

اجرای ماکرو

[/cf-restrict]

 

بارگذاری بیشتر مطالب مرتبط
بارگذاری در Excel

۴ نظرات

  1. sadegh

    ۱۳۹۶/۰۷/۲۲ at ۲۳:۲۸

    سلام… ممنون میشم کمی کمکم کنه… خیلی برام مهمه..

    پاسخ

  2. sadegh

    ۱۳۹۶/۰۷/۲۱ at ۰۹:۰۰

    با سلام.
    بنده میخوام یه هایپرلینک رو که داخل یک سل اکسل هست و یه عکس رو داخل محیط ویندوز باز میکنه از داخل VBA با فشردن یه کیلد فشاری باز کنم. ممنون میشم کمکم کنید.

    پاسخ

  3. kohandani1977_gmail57

    ۱۳۹۶/۰۵/۲۹ at ۰۸:۲۱

    با سلام این رشته کد در محیط وی بی ارور میدهد اگر مقدور هست فایل نمونه قرار بدهید

    پاسخ

    • آموزش آفیس

      ۱۳۹۶/۰۵/۲۹ at ۱۲:۲۴

      با سلام و تشکر از توجه شما
      ممنونیم که این مشکل را گزارش کردید.مشکل ایجاد شده به دلیل یک باگ بر روی سایت بود که کدها رو اشتباه نمایش می داد برای کاربران و به کدهای VBA ارتباطی نداشت.
      هم اکنون این کد اصلاح شده است و می تونید استفاده کنید.
      سپاس از شما

      پاسخ

دیدگاهتان را بنویسید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *

این سایت از اکیسمت برای کاهش هرزنامه استفاده می کند. بیاموزید که چگونه اطلاعات دیدگاه های شما پردازش می‌شوند.