تحديث تلقائي لروابط ملف اكسيل

[Mohammad Nawar]

السلام عليكم و رحمة الله

عندي ملف اكسيل فيه خلايا مربوطة بملفات أخرى و اريد أن أعرف كيف أقوم بتحديثها تلقائيا بدون الحاجة لفتح الملفات المربوط بها الملف الأصلي

 

و جزاكم الله خيرا

 

[ياسر خليل أبو البراء]

وعليكم السلام

بشكل افتراضي تظهر رسالة لك في بداية فتحك للملف تطلب منك تحديث الروابط ... إذا كانت تظهر لك فلا يوجد مشكلة

[خالد الشاعر]

ضع هذا الكود فى بداية فتح الملف

ActiveWorkbook.UpdateLinks = xlUpdateLinksAlways

[Mohammad Nawar]

أشكر لكم اهتمامك و دعوت الله لكم بالخير ..

لكن يا بشمهندس ياسر فعلا تظهر لي هذه الرسالة و لما أضغط enable لا يتم تحديث الخلايا المرتبطة بملفات أخرى تلقائيا من خلال الدوال .. فاضطر لفتح هذه الملفات حت تتعدل القيم في هذه الخلايا

بشمهندس خالد .. ممكن تعرفني كيف اضيف هذا الكود .. و جزاك  الله خيرا

[خالد الشاعر]

تفتح شاشة الفيجوال

alt F11

الورقة التى بها ارتباط ضع هذا الكود

Private Sub Worksheet_Activate()
ActiveWorksheet.UpdateLinks = xlUpdateLinksAlways
End Sub

 

[ياسر خليل أبو البراء]

تأكد من أن الحساب لديك في الملف تلقائي وليس يدوي

 

[Mohammad Nawar]

جزاكم الله خيرا .. هجربها و ارد على حضراتكم

[صلاح الصغير]

الاساتذة الافاضل/

ملف بيحسب تلقائى و يعمل بروابط المعادلات العادية مثل الجمع و الطرح و تم تجربة الكود و لم يعمل

اعتقد ان المشكلة تكون بالنسبة للمعادلات المركبة او معادلة مثل معادلة ال vlookup

[صلاح الصغير]

تم عمل معادلتين فى ملف واحد معادلة جمع و معادلة vlookup و قد تلاحظ عند التعديل فى الملف المصدر و الرجوع الى ملف الارتباط و الذى به المعادلات 

معادلة الجمع تعمل تلقائيا و معادلة ال vlookup فى كل مرة تظهر شاشة لتعديل الارتباط مع ان الملف موجود فى مكانه الاصلى و لم يتغير

ارجو الافادة

[ياسر خليل أبو البراء]

لربما غيرت اسم ورقة عمل في ملف الارتباط (مجرد تخمين) ..

[صلاح الصغير]

ا / ياسر

لم يتم تغيير اسماء الملفات بدليل انه عند فتح ملف الارتباط و ملف المصدر المعادلات تعمل بشكل جيد

غير انه فى ملف اخر به ارتباط تظهر رسالة تعديل الارتباط الا هذا الملف رغم تفعيل خاصية تعديل الارتباط اليا باعدادات الملف المراد

تم تعديل يوليو 4, 2017 بواسطه صلاح الصغير

[ياسر خليل أبو البراء]

ليس لدي فكرة عن السبب في هذا الخلل .. 

لعل أحد الأخوة يفيدك في هذا الموضوع حيث لم أجربه من قبل

[صلاح الصغير]

شكرا

[ا بو سليمان]

لعل هذه الطريقة اسهل ان لم تتوصل اليها 

[صلاح الصغير]

سوف يتم التجربة غدا و الرد على سيادتك

ا / ابو سليمان

[صلاح الصغير]

تمت التجربة و لم تفلح ايضا

[ياسر خليل أبو البراء]

أما زالت تظهر لك الرسالة حتى بعد ضبط الإعدادات ..؟

جرب تضع الكود التالي في حدث فتح المصنف 

Application.DisplayAlerts=False

 

[صلاح الصغير]

لم تفلح ايضا مع العلم انه يوجد معادلات تعمل دون فتح ملف الارتباط

[صلاح الصغير]

مع العلم ايضا ان هناك معادلتين و بيقرو من نفس الملف واحدة تعمل و الاخرة تعطى value

مع العلم ايضا ان ملف الارتباط يقرا من اكثر من ملف مصدر هل يمكن ان يكون هذا هو السبب

مع العلم ايضا ان رسالة وجود ارتباط لا تظهر فى هذا الملف بالذات!!!!!!!!

[ياسر خليل أبو البراء]

 لربما توجد نطاقات مخفية في ملفك ... Named Ranges

يوجد موضوع قدمته من فترة كبيرة يظهر النطاقات المخفية .. قد يكون لديك نطاق مخفي ومرتبط بارتباط خارجي

 

[صلاح الصغير]

ا / ياسر

شكرا لاهتمامك كالعادة

و لكن للاسف لا يوجد نطاقات مخفية!!!!!!

[صلاح الصغير]

طيب ممكن حد يجرب يربط ملف بمعادلات باكثر من ملف و فى اماكن مختلفة يعنى مع ملف فى ال  d مثلا و مع مع ملف فى ال g انا عن نفسى هاجرب بكرة و اشوف ايه الحكاية دى

[عبدللرحيم]

فيه قيم خلايا مطلوب استدعائها من ملف آخر

 

فيه قيم خلايا مطلوب استدعائها من ملف آخر

ارفع ملف للفحص

[صلاح الصغير]

المشكلة ان الملف فيه ارتباطات بملفات اخرى

و لا تظهر رسالة وجود ارتباط لهذا الملف بالذات

علما بان الملف enable macro و مفعل خاصية تحديث الارتباط!!!!!!

 

[صلاح الصغير]

انا جربت ربط ملف باكثر من ملف فى اماكن مختلفة و تعمل المعادلات بشكل جيد

و لكن لاحظت ان ملفى مربوط بملفات و خلايا فى جداول اى table ممكن تكون هى دى المشكلة هاجرب بكرة احول الجداول الى جداول الاكسيل العادية و ارد على حضارتكم