تداخل رویداد

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • كامران

    • 2016/06/29
    • 147
    • 41.00

    پرسش تداخل رویداد

    سلام من یک فایل دارم شامل این رویداد است

    کد:
    Dim SchedRecalc As Date
    
    Sub Recalc()
            
            Calculate
            Call SetTime
                    
    End Sub
    Sub SetTime()
    
    
        SchedRecalc = Now + TimeValue("00:00:30")
                Application.OnTime SchedRecalc, "Recalc"
            
    End Sub
    که بطور کامل کار میکند و مشکلی ندارد ولی چیزی که هست اگر یک برنامه دیگر اکسل باز باشد و بعد این برنامه را باز کنم بعد از تمام شدن کار و بستن بعد از 30 ثانیه دوباره خودبخود باز میشود
    (اگر همه فایلهای باز را ببندم دیگر باز نمیشود)

    آیا کدی چیزی هست که در برنامه بگذارم که موقع بستن فایل رویداد را از کار بیندازد ممنون میشوم راهنمائی کنید
  • Amir Ghasemiyan

    • 2013/09/20
    • 4598
    • 100.00

    #2
    سلام دوست عزيز

    شما كافيه در ايونت Workbook_BeforeClose مشخص كنيد كه تايمر غير فعال بشه

    کامنت

    • كامران

      • 2016/06/29
      • 147
      • 41.00

      #3
      نوشته اصلی توسط Amir Ghasemiyan
      سلام دوست عزيز

      شما كافيه در ايونت Workbook_BeforeClose مشخص كنيد كه تايمر غير فعال بشه
      با چه کدی؟؟

      کامنت

      • Amir Ghasemiyan

        • 2013/09/20
        • 4598
        • 100.00

        #4
        نوشته اصلی توسط كامران
        با چه کدی؟؟


        کد:
        Application.OnTime EarliestTime:=SchedRecalc, Procedure:="Recalc", Schedule:=False

        کامنت

        • كامران

          • 2016/06/29
          • 147
          • 41.00

          #5
          نوشته اصلی توسط Amir Ghasemiyan


          کد:
          Application.OnTime EarliestTime:=SchedRecalc, Procedure:="Recalc", Schedule:=False
          سلام انجام دادم این خطا را میدهد
          Click image for larger version

Name:	Capture.JPG
Views:	1
Size:	17.2 کیلو بایت
ID:	134243

          کامنت

          • Amir Ghasemiyan

            • 2013/09/20
            • 4598
            • 100.00

            #6
            نوشته اصلی توسط كامران
            سلام انجام دادم این خطا را میدهد
            [ATTACH=CONFIG]17050[/ATTACH]

            فايلتون رو بذاريد بررسي كنم

            کامنت

            • كامران

              • 2016/06/29
              • 147
              • 41.00

              #7
              شرمنده خیلی زحمتتان میدهم
              فایل های پیوست شده

              کامنت

              • كامران

                • 2016/06/29
                • 147
                • 41.00

                #8
                آقای Amir Ghasemiyan ببخشید اینجا منشنتان میکنم ولی این مشکل راه حلی داره ؟

                کامنت

                چند لحظه..