صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 20

موضوع: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

  1. #1


    آخرین بازدید
    2021/07/17
    تاریخ عضویت
    October 2010
    محل سکونت
    تهران
    نوشته ها
    168
    امتیاز
    73
    سپاس
    2
    سپاس شده
    58 در 39 پست
    تعیین سطح نشده است

    نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    سلام به همه دوستان و اساتید محترم
    ببخشید می خواستم بدونم آیا می شود برای یک فایل اکسل تاریخ و زمان انقضاء گذاشت یعنی اگر در فایل ما فرمول هایی تعریف شده که سل های مختلف براساس این فرمول ها کار می کنند بعد از اتمام تاریخ که از طرف سازنده فایل روی آن گذاشته دیگر این فرمول ها کار نکند ؟
    با سپاس فراوان
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2022/06/28
    تاریخ عضویت
    May 2010
    محل سکونت
    بلژیک
    نوشته ها
    174
    امتیاز
    108
    سپاس
    0
    سپاس شده
    119 در 53 پست
    تعیین سطح نشده است

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    روش آماده ای که فکر نمی کنم برای این کار وجود داشته باشه اما چند روش با کد نویسی برای این کار وجود داره که در زیر توضیح میدم!


    تمامی شیت هایی که در آن فرمول خاصی دارید را از داخل محیط VBدر قسمت properties برای Sheet ها به حالت VeryHidden تغییر دهید.
    در Workbook این کد را بنویسید.
    Private Sub Workbook_Open()
    Dim expiredate As Date
    expiredate = "01/01/2012"

    If (Now < expiredate) Then
    Sheet1.Visible = xlSheetVisible
    Sheet2.Visible = xlSheetVisible
    Sheet1.Activate
    Else
    Sheet1.Visible = xlSheetVeryHidden
    Sheet2.Visible = xlSheetVeryHidden
    MsgBox ("this file has been expired")
    ActiveWorkbook.Close
    End If

    End Sub

    در نهایت روی محیط VB پسورد بگذارید.


    فایل نمونه: http://www.mediafire.com/file/bdj78mm6b9oc7jb/ExpireExcelFile.xlsm
    pasword VB: excel iran

  4. #3


    آخرین بازدید
    2021/07/17
    تاریخ عضویت
    October 2010
    محل سکونت
    تهران
    نوشته ها
    168
    امتیاز
    73
    سپاس
    2
    سپاس شده
    58 در 39 پست
    تعیین سطح نشده است

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

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

  5. #4


    آخرین بازدید
    2014/07/19
    تاریخ عضویت
    July 2010
    نوشته ها
    15
    امتیاز
    5
    سپاس
    0
    سپاس شده
    6 در 4 پست
    تعیین سطح نشده است

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    Sub Auto_open()
    Dim i

    If Now() > "2011/01/29" Then
    For i = 1 To Sheets.Count

    Sheets(i).Visible = xlSheetVisible
    Sheets(i).Cells.Clear
    Next i
    ActiveWorkbook.Save
    ActiveWorkbook.Close

    Else

    Dim k
    For k = 2 To Sheets.Count
    Sheets(k).Visible = xlSheetVisible
    Next k
    End If

    End Sub


    و

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim j
    For j = 2 To Sheets.Count
    Sheets(j).Visible = xlSheetVeryHidden
    Next j

    ActiveWorkbook.Save

    End Sub
    توجه داشته باشید کد های فوق طوری نوشته شده اند که اگر قبل از باز نمودن فایل , ماکرو اکسل غیر فعال گردد غیر از شیت یک هیچ شیتی نمایش داده نخواهد شد پس بطور یقیین ماکرو ها عمل نموده و شرط ما را کنترل خواهد کرد و اگر تاریخ گذشته باشد تمامی شیت های مخفی را باز ,تمامی اطلاعات را پاک نموده و ذخیره و در نهایت سند را می بندد .

  6. #5


    آخرین بازدید
    2023/04/24
    تاریخ عضویت
    February 2011
    نوشته ها
    16
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    amin61b به Yahoo ارسال پیام

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    اگه کسی تاریخ کامپیوتر رو عقب ببره اون وقت چی ؟

  7. #6


    آخرین بازدید
    2014/07/19
    تاریخ عضویت
    July 2010
    نوشته ها
    15
    امتیاز
    5
    سپاس
    0
    سپاس شده
    6 در 4 پست
    تعیین سطح نشده است

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

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

  8. #7


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    با درود فروان

    برای اینکه وقتی تاریخ انقضاء روی یک فایل گذاشتیم بعد از اینکه فایل قفل شد دیگه با عقب کشیدن تاریخ کامپیوتر فایل باز نشود و نیاز است که کدها را بصورتی بنویسیم که هر زمانی که فایل را باز میکنیم آخرین تاریخ را در یک شیت که مخصوص این کار قرار داده ایم ثبت شود و اینکه اگر تاریخ کامپیوتر از آن تاریخ عقب تر بود اجاز ورود ندهد در نتیجه با عقب کشیدن تاریخ نیز فایل اجرا نخواهد شد.
    البته برای این کار راهای مختلفی است که می توانید برای ثبت این تاریخ در بجای این که در یک سل بنویسید خارج از آن فایل در یک فایل تکست ذخیره شود مثل خیلی از نرم افزارهایی که این کار را انجام میدهند

  9. سپاس ها (1)


  10. #8


    آخرین بازدید
    2023/04/24
    تاریخ عضویت
    February 2011
    نوشته ها
    16
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    amin61b به Yahoo ارسال پیام

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    جناب شمس العلما

    اگر لطف بفرمایید و یک فایل نمونه ضمیمه کنید ممنون میشم.

  11. #9


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    با درود فراوان

    به زودی یک فایل نمونه قرار خواهم داد
    لطفا اگر دیر شد یادآوری کنید

  12. #10


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

    با درود فروان

    نمونه فایل با تاریخ انقضاء
    که با برگرداندن تاریخ سیستم نیز باز نشود
    کلمه عبور
    exceliran



    فایل نمونه:
    [attachment=222]
    فايل هاي پيوست شده فايل هاي پيوست شده


صفحه 1 از 2 12 آخرینآخرین

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

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

تاریخ انقضای فایل اکسل

نحوه ارسال فایل excel از فیس بوک

طريقه بازگرداندن تنظيمات ويندور به گذشته

گذاشتن تاریخ انقضا روی اکسس

نحوه گذاشتن زمان برای انقضاء یک فایل اکسل

تاریخ انقضا فایل اکسل

گذاشتن پیغام در ابتدای فایل اکسل

طریقه گذاشتن تاریخ انقضاء برای فایل های افیس

انبار site:exceliran.com

exceliran.com تاریخ انقضا

نحوه گذاشتن پیغام ورود به فایل های اکسل

طريقه رمز گذاشتن براي شيت هاي اكسل

بازگرداندن فایل اکسل به تاریخ گذشته

نحوه فرمول نویسی تاریخ انقضا در اکسل

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد