دستوری برای فایل های خراب اکسل

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

    • 2012/06/12
    • 111

    پرسش دستوری برای فایل های خراب اکسل

    با سلام
    در یک شبکه داخلی چندیدن کاربر از نقاط مختلف ، توسط اینترنت به آدرس پوشه ای فایل اکسل ارسال می نمایند . که بعضا اتفاق می افتد که بدلیل ضعیف بودن اینترنت آن محل و سنگین بودن حجم فایل اکسل آن فایل به شکل صحیح کپی نمی شود و فقط یک فایل با حجم صفر در شبکه ایجاد می گردد که بعد از باز شدن بلافاصله اکسل با خطا مواجه میشود .
    طی دستوری در VBA تمامی فایل ها به روی رایانه مورد نظر منتقل و یکی یکی باز و مورد بهره برداری قرار می گیرد .
    اگر در بین فایل ها آن فایل خراب باشد . برنامه اکسل پس از باز نمودن آن با خطا مواجه شده و بدون دادن پیام خاصی اکسل بسته می شود .
    من برای انتقال و کپی و یا باز کردن فایل از شرط هایی مانند زیراستفاده کرده ام
    DIR (مسیر و نام فایل ) <> ""
    ویا
    FileLen (مسیر و نام فایل )> 1
    ولی فایده ای نداشته است
    لطفا راهنمائی فرمائید .
چند لحظه..