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