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

موضوع: اجرای ماکرو در مقاطع زمانی

  1. #1


    آخرین بازدید
    2018/07/01
    تاریخ عضویت
    November 2013
    محل سکونت
    Tehran
    نوشته ها
    28
    امتیاز
    15
    سپاس
    0
    سپاس شده
    7 در 5 پست
    تعیین سطح نشده است

    اجرای ماکرو در مقاطع زمانی

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

  2.  

  3. #2


    آخرین بازدید
    2018/11/06
    تاریخ عضویت
    July 2011
    محل سکونت
    تهران
    نوشته ها
    385
    امتیاز
    905
    سپاس
    665
    سپاس شده
    1,397 در 369 پست
    تعیین سطح نشده است

    با استفاده از کد زیر:

    کد PHP:
    Private Sub Workbook_Open()
      
    Application.OnTime Now TimeValue("00:10:00"), "MyMacro"
    End Sub 
    ************************************
    No LION's roar ruins my hut, I afraid of TERMITE's silence
    ************************************


  4. سپاس ها (4)


  5. #3


    آخرین بازدید
    2018/07/01
    تاریخ عضویت
    November 2013
    محل سکونت
    Tehran
    نوشته ها
    28
    امتیاز
    15
    سپاس
    0
    سپاس شده
    7 در 5 پست
    تعیین سطح نشده است

    آقا نیما ممنونم.کاملا کاربردی بود

  6. سپاس ها (1)


  7. #4


    آخرین بازدید
    2016/08/18
    تاریخ عضویت
    December 2010
    نوشته ها
    398
    امتیاز
    253
    سپاس
    750
    سپاس شده
    383 در 159 پست
    تعیین سطح نشده است

    نقل قول نوشته اصلی توسط nima نمایش پست ها
    با استفاده از کد زیر:

    کد PHP:
    Private Sub Workbook_Open()
      
    Application.OnTime Now TimeValue("00:10:00"), "MyMacro"
    End Sub 
    با سلام
    میبخشد این کد رو بایستی تو ماژول بزایم تا جوا ب بده؟
    خواستن ، توانستن است.

  8. #5


    آخرین بازدید
    2018/11/06
    تاریخ عضویت
    July 2011
    محل سکونت
    تهران
    نوشته ها
    385
    امتیاز
    905
    سپاس
    665
    سپاس شده
    1,397 در 369 پست
    تعیین سطح نشده است

    دوست عزیز یک فایل اکسل جدید باز کنید
    به قسمت ویژوال برید و با کلیک راست روی ،thisworkbook از قسمت VBA project و انتخاب view code کد زیر رو وارد کنید:
    کد PHP:

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.OnTime EarliestTime:=TimeValue("00:00:10"), Procedure:="MyMacro"Schedule:=False

    End Sub

    Private Sub Workbook_Open()
    Application.OnTime Now TimeValue("00:00:10"), "MyMacro"

    End Sub 

    خالا یک module جدید ایجاد کن و کد ماکرو زیر رو وارد کن :

    کد PHP:

    Sub MyMacro
    ()MsgBox "hello, see you in 10 seconds :)"
    Application.OnTime Now TimeValue("00:00:10"), "MyMacro"
    End Sub 

    با اینکار هر 10 ثانیه ماکرو اجرا میشه و یک مسیج باکس نمایش داده میشه.
    ویرایش توسط Nima : 2013/11/11 در ساعت 06:15
    ************************************
    No LION's roar ruins my hut, I afraid of TERMITE's silence
    ************************************


  9. سپاس ها (2)


  10. #6


    آخرین بازدید
    2020/01/13
    تاریخ عضویت
    February 2015
    نوشته ها
    89
    امتیاز
    26
    سپاس
    3
    سپاس شده
    16 در 11 پست
    تعیین سطح نشده است

    در خصوص كد بالا توضيح مي دهيد؟


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

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

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

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

application.ontime vba

schedule exceliran.com

مقاطع ماکرو

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

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

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

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