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

موضوع: خروج از برنامه در صورت بروز هرخطايي در كد برنامه VBA

  1. #1

    آخرین بازدید
    2017/07/16
    تاریخ عضویت
    April 2010
    محل سکونت
    مشهد
    نوشته ها
    2
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    خروج از برنامه در صورت بروز هرخطايي در كد برنامه VBA

    باسلام
    من برنامه اي جهت برنامه ريزي توليد با VBA نوشته ام
    لطفا بفرماييد چه كدي مي توان به برنامه اضافه كرد ، كه وقتي خطي از برنامه با خطا مواجه مي شود ابتدا پيغام " برنامه با مشكل مواجه شده است " را صادر سپس از برنامه خارج شود .
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    پاسخ مورد نظر براي اين تاپيك ارسال شده است.

  2.  

  3. #2


    آخرین بازدید
    2 هفته پیش
    تاریخ عضویت
    February 2010
    محل سکونت
    مشهد
    نوشته ها
    435
    امتیاز
    950
    سپاس
    294
    سپاس شده
    881 در 210 پست
    سطح اکسل
    81.00 %

    mrexcel به Yahoo ارسال پیام

    RE: خروج از برنامه در صورت بروز هرخطايي در كد برنامه VBA

    On Error GoTo line
    On Error Resume Next
    On Error GoTo
    اين 3 مورد در هنگام برخورد با خطا كاربرد دارد اگر از فرم ها هم بعد از اين كد كمك بگيريم
    خواسته شما انجام ميشود .
    البته اميدوارم دوستان متخصص نظر بهتري بدهند

  4. سپاس ها (1)


  5. #3


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: خروج از برنامه در صورت بروز هرخطايي در كد برنامه VBA

    با درود فراوان به دوست گرامی
    در مورد خطاهای که در کد برنامه به وجود می آید اگر کد را اشتباه نوشته باشیم که همانطور که می دانید برنامه اجرا نخواد شد و توان اینکه پیغامی نیز صادر کند را نخواهد داشت چرا که اساس برنامه که کدنویسی در آن قسمت بوده مشکل دارد.

    ولی در یک دسته خطاها که به کدنویسی مربوط نبوده و کد نویسی را درست انجام داده ایم و بسته به دستوراتی که در کد نوشته ایم با خطا روبر می شویم اینکار شدنی است
    مثال اینکه اگر در یک کد دستوری را نوشته ایم که در درایو D فایل Book1 را باز کن اگر این فایل وجود داشته و بسته باشد این کد بدون خطا عمل می کند و اگر این فایل وجود نداشته باشد و یا باز باشد کد ما با خطا روبرو خواهد شد . که اگر همچنانکه قبلا گفته ام (در همین فروم) در سطر اول بنویسیم On error resume next کد زمان اجرا اگر با این خطا روبرو شد از آن گذشته و خطایی نمیگیرد و خللی نیز در برنامه ایجاد نمی شود و اگر نیاز داشته که پیغامی نیز صاد کند بجای پریدن از روی خطا با On error resume next می توانید با تابع شرطی if و دستوراتی که اول وجود آن فایل و یا باز و بسته بودن آن را چک کند را بررسی کرده و پیغام نیز در آن قرار داده و یا از ترکیب if و iserror استفاده کنیم که در صورت error پیغامی را داد و در غیر اینصورت آن را اجرا کند.
    در صورت نیاز توضیح بیشتر در خدمت شما خواهم بود و یا نمونه کار را ارئه داده تا با مثال آن را انجام داده در اختیار شما قرار دهم

    منتظر راهمنایی دیگر دوستان نیز هستیم

  6. سپاس ها (2)


  7. #4


    آخرین بازدید
    2021/11/24
    تاریخ عضویت
    October 2013
    نوشته ها
    9
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 2 پست
    تعیین سطح نشده است

    سلاممیدونم این یه موضوع قدیمیه ولی یه سوال برام پیش اومدهاگه بخوایم با دستو ر mkdir یه دایرکتوری درست کنیم و اگر دایرکتوری وجود داشت بجای اینکه ارور بده ازش بگذره باید چه کدی نوشت?

  8. #5


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

    نقل قول نوشته اصلی توسط afshar_yan نمایش پست ها
    سلاممیدونم این یه موضوع قدیمیه ولی یه سوال برام پیش اومدهاگه بخوایم با دستو ر mkdir یه دایرکتوری درست کنیم و اگر دایرکتوری وجود داشت بجای اینکه ارور بده ازش بگذره باید چه کدی نوشت?

    سلام دوست عزيز
    شما ميتونين قبل از اينكه پوشه رو ايجاد كنيد از وجود يا عدم وجود پوشه مطلع بشيد
    کد:
    If Dir(strFullPath, vbDirectory) = vbNullString Then MkDir strFullPath
    strFullPath آدرس كامل پوشه يا فايل مورد نظرتون هست


  9. #6


    آخرین بازدید
    2021/11/24
    تاریخ عضویت
    October 2013
    نوشته ها
    9
    امتیاز
    14
    سپاس
    0
    سپاس شده
    4 در 2 پست
    تعیین سطح نشده است

    خیلی آقایی
    درست شد ممنونم

  10. سپاس ها (1)



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

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

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

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

  1. کم کردن تاریخ از 89تا 92 به صورت روز شمار
    توسط saeed9534 در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 10
    آخرين نوشته: 2015/05/12, 01:05
  2. راهنمايي
    توسط Ali7010 در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 3
    آخرين نوشته: 2014/02/14, 22:52
  3. مطالب و لينك هايي مربوط به VBA
    توسط afshin160 در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2012/12/28, 22:11
  4. راهنمايي قرار دادن كد
    توسط sajad2000 در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 5
    آخرين نوشته: 2012/12/02, 19:37
  5. افزودن به روز ، ماه ، سال و غیره بصورت اتوماتیک
    توسط Amir Mohsenpour در انجمن ترفندهای اکسل Excel Tricks
    پاسخ ها: 6
    آخرين نوشته: 2010/05/05, 18:53

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

كدهاي vba

کد خروج از اکسل

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

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

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