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

موضوع: درج یک عبارت یا فرمول در یک سلول پس از save کردن فایل اکسل بوسیله ماکرو

  1. #1


    آخرین بازدید
    2021/12/18
    تاریخ عضویت
    June 2014
    نوشته ها
    9
    امتیاز
    23
    سپاس
    0
    سپاس شده
    13 در 5 پست
    تعیین سطح نشده است

    Up درج یک عبارت یا فرمول در یک سلول پس از save کردن فایل اکسل بوسیله ماکرو

    من می خواهم بوسیله ماکرو پس از save کردن فایل اکسل یک عبارت یا فرمول یا تاریخ در یک سلول مثلا a1 ثبت گردد بدین صورت که در ماکرو بنویسم اگر فایلsave شد عبارت یا فرمول یا تاریخ امروز را در یک سلول مثلا a1 درج کن.
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    2024/01/21
    تاریخ عضویت
    November 2013
    محل سکونت
    تهران
    نوشته ها
    1,519
    امتیاز
    6121
    سپاس
    2,884
    سپاس شده
    4,889 در 1,381 پست
    سطح اکسل
    71.67 %

    سلام،بايد کد زير را براي THISWORKBOOK بنويسيد: (SHEET1 در کد را به نام شيت دلخواه خود تغيير دهيد)
    کد PHP:
    Private Sub Workbook_AfterSave(ByVal Success As Boolean)
    Sheets("SHEET1").Range("A1") = "=TODAY()"    
    Range("A1").Select    
    Selection
    .Copy    
    Selection
    .PasteSpecial Paste:=xlPasteValuesOperation:=xlNoneSkipBlanks _        
    :=FalseTranspose:=False    
    Application
    .CutCopyMode False
    End Sub 
    اگر مفهوم نيست بفرماييد بيشتر توضيح دهم.
    ویرایش توسط Ali Parsaei : 2015/08/29 در ساعت 23:36


  4. #3


    آخرین بازدید
    2022/06/26
    تاریخ عضویت
    January 2013
    محل سکونت
    شیراز
    نوشته ها
    1,198
    امتیاز
    3248
    سپاس
    1,566
    سپاس شده
    3,182 در 795 پست
    سطح اکسل
    84.00 %

    شاید اینم کمک کنه
    کد:
    With Range("A1")
    .Value = Date
    .NumberFormat = "mm/dd/yy"
    End With
    در پناه خداوندگار ایران زمین باشید و پیروز


  5. #4


    آخرین بازدید
    2021/12/18
    تاریخ عضویت
    June 2014
    نوشته ها
    9
    امتیاز
    23
    سپاس
    0
    سپاس شده
    13 در 5 پست
    تعیین سطح نشده است

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

  6. سپاس ها (1)



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

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

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

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

  1. پرسش کد vba برای save as
    توسط majidartoor در انجمن فرم ها در ويژوال بيسيك - Forms in VBA
    پاسخ ها: 11
    آخرين نوشته: 2020/09/29, 18:00
  2. پیغام Privacy Warning پس از Save کردن ماکرو
    توسط aminkarami در انجمن خطاها در ويژوال بيسيك - Errors in VBA
    پاسخ ها: 1
    آخرين نوشته: 2015/08/24, 19:38
  3. save as worksheet با کد vb
    توسط bakhshism در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 11
    آخرين نوشته: 2014/07/12, 14:02
  4. حذف save as در اکسل
    توسط parisasasa در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 2012/09/10, 09:43
  5. save az
    توسط khorasan66 در انجمن كاربرد اكسل در رشته هاي مختلف
    پاسخ ها: 1
    آخرين نوشته: 2012/06/12, 13:20

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

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

کلمات کلیدی این موضوع

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

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

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