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

**mrexcel** · 2010/05/30, 12:32

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

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

**shamsololama** · 2010/05/30, 12:37

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

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

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

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

**afshar_yan** · 2014/11/30, 22:31

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