اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تحديث بيانات شيت اكسيل اتوماتيك


الردود الموصى بها

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

اخواني الكرام .. لدي استفسار بسيط بخصوص تحديث البيانات لشيتات الاكسيل اتوماتيك 

عندما افتح الشيت الرئيسي يظهر لي رسالة التحديث او عدم التحديث .. انا الان اعمل علي ايكسيل 2010 مع العلم في 2007 كان يحدث تلقائي ...

النسخة التي لدي ليست باللغة العربية 

وشكرا

رابط هذا التعليق
شارك

الاخ الفاضل

جرب التالى

من قائمة data

اختر edit link     وتأكد من أن الخيار automatic  نشط

ومن الصندوق الحوارى اضغط   startup prompt   من الصندوق الجديد حدد  الخيار 3 ثم ok    ثم   close  

احفظ الملف واقفله ثم  أعد الفتح وشوف

 

تم تعديل بواسطه مختار حسين محمود
  • Like 2
رابط هذا التعليق
شارك

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

رابط هذا التعليق
شارك

أخي الكريم 66 محمود (قال يعني إحنا قادرين على محمود واحد ..لما نقابل 66 محمود مرة واحدة) :wink2:

سأقوم بتناول حلول مختلفة واختر منها ما يناسبك ..

قمت بإنشاء مصنفين واحد باسم Test والثاني باسم Sample .. في المصنف الثاني قمت بوضع قيمة في الخلية A1 ، وفتحت المصنف الأول ووضعت معادلة في الخلية G7 كما بالصورة

إذا نظرت لشريط المعادلات ستجد علامة يساوي يليها علامتين تنصيص مفردة بهذا الشكل ... وما بين العلامتين يوجد مسار المصنف المسمى Sample بالكامل ثم \ ثم اسم المصنف ما بين أقواس

[ ] ثم يليه مباشرةً ورقة العمل الأولى في المصنف المصدر ...وأخيراً بعد علامة التنصيص المفرة الثانية ' يوجد علامة تعجب ! ثم الخلية المصدر A1

الحل الذي قدمه أخونا الحبيب مختار حسين ..الخطوات كما بالصورة

01.thumb.png.e3ea26a6d1638620ba6605b8c5e

الحل المقدم صحيح 100% ولكن لكي تكتمل الخطوات لابد من تغيير في إعدادات الإكسيل ، من خلال خيارات الإكسيل Excel Options ثم انقر على Trust Center ثم Trust Center Settings ثم اختر من القائمة في الجهة اليسرى External Content واختر الخيار الأول في القسمين الظاهرين في النافذة لديك

02.thumb.png.f284711c0790fb3c4bba87a69da

احفظ وأغلق المصنف و قم بتجربة المصنف المسمى Sample بأن تضع أي قيمة جديدة في الخلية A1 واحفظ المصنف وأغلقة ، ثم قم بفتح المصنف Test ستجد أن البيانات يتم تحديثها

************************

حل آخر بعيداً عن تغيير الإعدادات بكود يوضع في حدث المصنف Test بهذا الشكل ، ويقوم بتحديث الروابط للملفات الخارجية Update All External Links

Private Sub Workbook_Open()
'UpdateLinks All Links
'---------------------
    Dim MyLink As Variant

    For Each MyLink In ActiveWorkbook.LinkSources(xlExcelLinks)
        ActiveWorkbook.UpdateLink Name:=MyLink, Type:=xlExcelLinks
    Next MyLink
End Sub

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

prompt user about Data Connections

Prompt user on automatic update for workbook links

احفظ المصنف المسمى Test بعد وضع الكود في حدث المصنف ... اذهب للمصنف المسمى Sample وعدل الخلية A1 واحفظ وأغلق

افتح المصنف Test لتجد أنه تم تحديث البيانات بدون تغيير في الإعدادات ..فقط بكود يوضع في حدث المصنف

أرجو أن أكون قد وفقت في توصيل المعلومة بشكل بسيط يسهل فهمه

 

الرجاء تغيير اسم الظهور للغة العربية والإطلاع على رابط التوجيهات في الموضوعات المثبتة في المنتدى لمعرفة كيفية التعامل بشكل أفضل مع المنتدى

تقبل تحياتي :fff::fff:

  • Like 5
رابط هذا التعليق
شارك

أخي الكريم محمود أحمد

الحمد لله أن تم المطلوب على خير 

ونتمنى لك قضاء أمتع الأوقات معنا في منتدى الأحبة منتدى أوفيسنا

ويا ريت متبقاش زي اللي ياخد حاجة ويروح يجري ...عايزينك معانا ولو مجرد مشاركة بسيطة عشان تفيد وتستفيد

بطرحك لمشكلة معينة قد تفيد غيرك وأنت لا تدري

تقبل وافر تقديري وتحياتي

  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

بارك الله فيك أستاذى الغالى ياسر على الاضافة . آفخر بأنك أحد أساتذتى الذين تعلمت منهم 

تقبل الله منا ومنكم صالح الاعمال

بارك الله فيك أستاذى الغالى ياسر على الاضافة . آفخر بأنك أحد أساتذتى الذين تعلمت منهم 

تقبل الله منا ومنكم صالح الاعمال

بارك الله فيك أستاذى الغالى ياسر على الاضافة . آفخر بأنك أحد أساتذتى الذين تعلمت منهم 

تقبل الله منا ومنكم صالح الاعمال

  • Like 3
رابط هذا التعليق
شارك

أخي مختار كلنا تلامذة هنا في هذا الصرح

وأنا أتعلم منك الكثير والكثير ..بارك الله فيك ومشكور على كلماتك الرقيقة في حقي وإن كنت لا أستحقها

تقبل وافر ودي وتقديري واحترامي

  • Like 1
رابط هذا التعليق
شارك

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information