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

موضوع: تاخير در بارگذاري يوزرفرم

  1. #1


    آخرین بازدید
    2019/10/28
    تاریخ عضویت
    January 2018
    نوشته ها
    8
    امتیاز
    11
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    تاخير در بارگذاري يوزرفرم

    با سلام
    1- يه فرمي دارم که شامل تعداد زيادي تکست باکس و چک باکسه ، وقتي اين فرم initialize يا بارگذاري ميشه مقدار هر تکست باکس و چک باکسشو از سلول يا سل مربوط به خود در شيت اکسل ميگيره، اگه براي تکست باکس رويدادهاي از قبيل Change و ... يا يراي چک باکس رويدادهاي از قبيل Click و Enter، کد نوشته باشم هنگام initialize شدن اين رويدادها نيز فعال ميشوند و همين امر باعث کندشدن بارگذاري يوزرفرم ميشود آيا راهي وجود داره که بشه کنترلهاي يوزرفرم رو حين بارگذاري مديريت کرد طوري که اين رويدادها رو بشه فعال يا غيرفعال کرد و يا بعبارت ديگر فرم سريعتر باز شود بدون تاخير.
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    یک ساعت پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,469
    امتیاز
    12312
    سپاس
    8,924
    سپاس شده
    10,583 در 3,742 پست
    سطح اکسل
    100.00 %

    نقل قول نوشته اصلی توسط مهردادخان نمایش پست ها
    با سلام
    1- يه فرمي دارم که شامل تعداد زيادي تکست باکس و چک باکسه ، وقتي اين فرم initialize يا بارگذاري ميشه مقدار هر تکست باکس و چک باکسشو از سلول يا سل مربوط به خود در شيت اکسل ميگيره، اگه براي تکست باکس رويدادهاي از قبيل Change و ... يا يراي چک باکس رويدادهاي از قبيل Click و Enter، کد نوشته باشم هنگام initialize شدن اين رويدادها نيز فعال ميشوند و همين امر باعث کندشدن بارگذاري يوزرفرم ميشود آيا راهي وجود داره که بشه کنترلهاي يوزرفرم رو حين بارگذاري مديريت کرد طوري که اين رويدادها رو بشه فعال يا غيرفعال کرد و يا بعبارت ديگر فرم سريعتر باز شود بدون تاخير.

    سلام دوست عزيز
    يك راهي كه پيدا كردم اينه كه شما يك متغير عمومي تعريف كنيد و در هر ايونت بسته به شرايطتون اون رو تغيير بدين.
    Disabling Events of a UserForm

    به اين مثال توجه كنيد:

    کد:
    Dim EnableEvents As Boolean
    
    
    Private Sub TextBox1_Change()
    If Not EnableEvents Then Exit Sub
    TextBox1.Value = Range("B1")
    End Sub
    
    
    Private Sub UserForm_Initialize()
    EnableEvents = False
    TextBox1.Value = Range("A1")
    End Sub

  4. #3


    آخرین بازدید
    2019/10/28
    تاریخ عضویت
    January 2018
    نوشته ها
    8
    امتیاز
    11
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    با سلام
    ممنون از پاسخ شما
    فقط بايد کد زير
    EnableEvents = True
    را به انتهاي
    ()Private Sub UserForm_Initialize
    اضافه نمود.

  5. سپاس ها (1)



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

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

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

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

  1. [حل شده] ذخيره مذاكرات به صورت بايگاني در يوزرفرم
    توسط مائده در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 7
    آخرين نوشته: 2016/04/17, 10:11
  2. [حل شده] كليك كردن در هر سل و باز شدن يوزرفرم
    توسط مائده در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 4
    آخرين نوشته: 2016/01/05, 15:10
  3. ايجاد Lb در يوزرفرم
    توسط 4017 در انجمن فرم ها در ويژوال بيسيك - Forms in VBA
    پاسخ ها: 4
    آخرين نوشته: 2014/07/16, 09:37
  4. يوزر فرم
    توسط rezahagh در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 1
    آخرين نوشته: 2012/10/03, 19:26
  5. ماكرو در يوزر فرم
    توسط sonbol در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 1
    آخرين نوشته: 2012/03/09, 05:38

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

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

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

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

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