نمایش نتایج: از شماره 1 تا 2 , از مجموع 2

موضوع: ذخیره فایل با یک عنوان دلخواه مثل ساعت کنونی

  1. #1


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

    ذخیره فایل با یک عنوان دلخواه مثل ساعت کنونی

    [font=Times New Roman]دوستی سوال فرمودند:

    نقل قول نوشته اصلی توسط hajih[/font
    adi]
    سلام

    میشه در این مورد راهنمایی بفرمائید.

    1-وقتی فایل ذخیره میشود میخواهم به تاریخ و ساعت جاری سیستم ذخیره شود (در واقع می خواهم در سلول B1 فرمول ()now= را درج کنم و اسم برنامه از این سل خوانده شود)



    با احترامات فراوان

    برای این کار کافی است که کد زیر را در فایل اکسل در قسمت workbook کپی کنید:

    Dim ISSAVEAS As Boolean

    Private Sub Workbook_Activate()
    ISSAVEAS = False
    End Sub

    Private Sub Workbook_AfterSave(ByVal Success As Boolean)
    If Success = True Then
    MsgBox ("saved")
    Else
    MsgBox ("not saved")
    End If
    End Sub

    Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    If ISSAVEAS = False Then
    Sheet1.Range("B1").Calculate
    Dim str As String
    str = Sheet1.Range("B1").Value
    str = Replace(str, "/", "_")
    str = Replace(str, " ", "_")
    str = ActiveWorkbook.Path + "\" + Replace(str, ":", "_")
    ISSAVEAS = True
    ActiveWorkbook.SaveAs (str + ".xlsm")
    ISSAVEAS = False
    Cancel = True
    End If
    End Sub



    یک فایل هم آماده کردم :
    http://www.mediafire.com/view/?tvy8gguwmw3d8lk

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

  2.  

  3. #2


    آخرین بازدید
    2013/05/22
    تاریخ عضویت
    February 2013
    نوشته ها
    30
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    RE: ذخیره فایل با یک عنوان دلخواه مثل ساعت کنونی

    سلام
    خیلی لطف کردید
    متشکرم


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

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

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

موضوعات مشابه

  1. ثبت خودکار تاریخ و ساعت
    توسط mstfatata در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 11
    آخرين نوشته: 2020/08/14, 14:46
  2. کم کردن ساعت
    توسط 3pahan در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2013/01/01, 13:03
  3. فرمت ساعت را در کمبو باکس
    توسط amirgolshan در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2012/11/29, 11:13
  4. درج اعداد ساعت بدون ":"
    توسط ff7ss در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 13
    آخرين نوشته: 2012/06/26, 10:39
  5. تفريق ساعت
    توسط Mod در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 1
    آخرين نوشته: 2011/02/23, 10:09

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

تابع ساعت جاری اکسل

ذخيره ساعت

ذخیره ساعت

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

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

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