باز كردن فايل و بستن همان فايل بدون ذخيره با vba

[mohamadali110]

سلام من يه pivot از يه فايل ديگه تو شبكه گرفتم كه براي رفرش كردن پيوت لازمش اينه كه فايل مذكور باز باشه و سپس رفرش رو ميشه زد

براي بروز رساني يه دكمه تعريف كردن كه بره اول فايل رو باز كنه با فرمول زير

       Workbooks.Open Filename:=  "\\B-server\e.p.dep\Industrial engineering\RayVarz-info\3281.xml"

و سپس رفرش كنه پيووت رو

ActiveWorkbook.RefreshAll

حالا ميخوام يه فرمول انتهاي كارم بنويسم كه فايل باز شده رو ببنده و به سوال اينكه ذخيره كنه يا نكنه مثلا جواب NO بده (اين قسمتش مهمه)
بدون اينكه فايل اصلي بسته بشه
ممنونم

فايل پيوستم چيز خاصي نيست بذارم

[majid_mx4]

با سلام

میتوانید از دستور زیر استفاده نمایید.

Activeworkbook.Close False

با تشکر میر

[misammisam]

سلام
براي رفرش كردن لازم نيست فايل مرجع باز باشه ، حتي اگه فايل مبدا بسته باشه با رفرش پيوت در فايل مقصد اطلاعات بروز ميشه
مگر اينكه تو شبكه استفاده بشه يا اينكه پيوت رو بصورت دستي در فايل مقصد ثبت كنيد .

برام سوال شده كه ميخواي براي سيو فايل مبدا ازت سوال بشه ، وقتي هيچ تغييري درش ندادي ، اين كار به چه درد ميخوره !؟

[mohamadali110]

سلام
براي رفرش كردن لازم نيست فايل مرجع باز باشه ، حتي اگه فايل مبدا بسته باشه با رفرش پيوت در فايل مقصد اطلاعات بروز ميشه
مگر اينكه تو شبكه استفاده بشه يا اينكه پيوت رو بصورت دستي در فايل مقصد ثبت كنيد .

برام سوال شده كه ميخواي براي سيو فايل مبدا ازت سوال بشه ، وقتي هيچ تغييري درش ندادي ، اين كار به چه درد ميخوره !؟

نمي دونم چرا واسه فايل كم حجم حتي تو شبكه حرف شما درسته ولي وقتي يه فايل خاص رو ميزنم بدون اينكه فايل مرجع باز باشه رفرش رو بزنم ميزنه reference not valid

[misammisam]

نمي دونم چرا واسه فايل كم حجم حتي تو شبكه حرف شما درسته ولي وقتي يه فايل خاص رو ميزنم بدون اينكه فايل مرجع باز باشه رفرش رو بزنم ميزنه reference not valid

بله درست میفرمایید ، میشه گفت این مشکلیه که تو پیوت تیبل وجود داره و جز باز کردن فایل مرجع هیچ راهی نداره ، این موضوع خیلی مشکل سازه ، مخصوصا وقتی که حجم فایلها زیاد هم باشه .
میگن روی ورژن 2013 این مشکلات تا حدودی اصلاح شده ، ولی من تا حالا تست نکردم .