logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
EM_ACC ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil لا تميز خلال هذه الفترة اكسيل اسئله واجابات



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





22-01-2020 04:18 مساءً
معلومات الكاتب ▼
تاريخ الإنضمام : 27-06-2019
رقم العضوية : 13545
المشاركات : 8
الجنس :
تاريخ الميلاد : 1-1-1983
قوة السمعة : 22
الاعجاب : 0
ا/ ياسر ابو خليل المحترم
جزاكم الله خيرا على ما قدمتموه لنا في تلك الشروحات القيمة
ونسأل الله عزوجل أن يجزيكم خير الجزاء عنا

وجدت لحضرتك كود بخصوص التحديث التلقائي للارتباطات داخل مصنف الاكسل
ولضعفي في vba نسخت الكود في المطور وللاسف ظهر للي هذا الخطا
لذا برجاء التوضيح للخطأ والتصحيح له

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

الكود الموجود السابق الـ انا نسخته هو

[p]
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
</pre>
82855890_529423437664361_6698068005680578560_n.png?_nc_cat=101&_nc_ohc=3pcoZCcWFJMAX9pUfge&_nc_ht=scontent-hbe1-1




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  22-01-2020 11:04 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10457
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36399
الاعجاب : 66
تأكد من وجود ارتباطات خارجية في الملف الذي وضعت فيه الكود أو قم بوضع هذه الجملة في بداية الكود
CODE
On Error Resume Next




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  23-01-2020 07:08 صباحاً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 14-01-2020
رقم العضوية : 17616
المشاركات : 63
الجنس :
تاريخ الميلاد : 1-1-1996
قوة السمعة : 146
الاعجاب : 0
اخي يجب عليك وضع الكود في ThisWorkbook وليس في Module لان الموديل يحتاج الى زر لتفعيله و الورك بوك لا يحتاج فهو تلقائي
سؤالك هو عندما يفتح الوورك بوك يفعل الكود وليس عندما يفعل زر مرتبط بالموديل
ارجو ان تكون الرؤية وضحة لك بعض الشئ لانني مبتدإ ولست محترف
وهذه بعض الاوامر اضعها في الوورك بوك

CODE
Private Sub Workbook_WindowActivate(ByVal Wn As Window)
Application.Caption = "جنان السبيل" 'اسم الذي يظهر عوض مايكروسوفت اكسل في الاعلى
  Application.DisplayFullScreen = True 'اظهار الشيت في وضع فول سكرين لاخفاء قوائم الاكسيل
 Sheets("Feuil1").ScrollArea = "A1:I37" 'تحديد زينج العمل وغلقه
End Sub



توقيع :جنان السبيل
[p]
يتم اكتساب المعرفة من خلال التجربة ، كل شيء آخر هو مجرد معلومات.
البرت اينشتاين

زكاة العلم نشره
</pre>

look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  23-01-2020 07:33 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 14-01-2020
رقم العضوية : 17616
المشاركات : 63
الجنس :
تاريخ الميلاد : 1-1-1996
قوة السمعة : 146
الاعجاب : 0
بعد تجربتي للكود واضافة الكود الذي تقدم الاخ ياسر خليل توصلت للكود النهائي

[p]
Private Sub Workbook_Open()
'UpdateLinks All Links
'---------------------
Dim MyLink As Variant
On Error Resume Next
For Each MyLink In ActiveWorkbook.LinkSources(xlExcelLinks)
ActiveWorkbook.UpdateLink Name:=MyLink, Type:=xlExcelLinks
Next MyLink
End Sub
</pre>



توقيع :جنان السبيل
[p]
يتم اكتساب المعرفة من خلال التجربة ، كل شيء آخر هو مجرد معلومات.
البرت اينشتاين

زكاة العلم نشره
</pre>

look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  24-01-2020 10:01 صباحاً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10457
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36399
الاعجاب : 66
بارك الله فيك أخي الكريم والحمد لله أن توصلت للحل والحمد لله الذي بنعمته تتم الصالحات




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  24-01-2020 11:07 صباحاً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 27-06-2019
رقم العضوية : 13545
المشاركات : 8
الجنس :
تاريخ الميلاد : 1-1-1983
قوة السمعة : 22
الاعجاب : 0
معلش استفسار حتى تتضح الرؤية لي
لو ان الملف اللي هيتم وضع الكود في يحتوي على معادلات vlookup وخلايا مرجعية من نفس الملف
هل يستلزم فتح الملف الرئيسي اولا لتحديث الخلايا منه ولا الكود ده كافي لتحديث كافة البيانات لاني لازم افتح الملف الرئيسي علشان الروابط تتحدث
طيب طيب لو كان شرط لازم نفتح الملف الرئيسي علشان يتم تحديث الرابط هل هناك كود لفتح الملف الرئيسي اولا وغلقه مره ثانيه مباشره مع العلم ان الملف الرئيسي في نفس مجلد الملف الذي يحتوي على الكود وايضا كل يوم يتم نسخ المجلد وتسميتها بتاريخ اليوم وتصدير الملف الرئيسي فقط فيه
أرجوا أن يكون الاستفسار واضح




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  24-01-2020 11:11 صباحاً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10457
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36399
الاعجاب : 66
لابد من فتح الملف الذي يحتوي على الكود ليتم التحديث للراوبط ..
بالنسبة للفتح نعم يمكن فتح ملف مغلق بالكود أيضاً ليتم التحديث بدون الداعي لفتح الملف بشكل يدوي




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  24-01-2020 02:28 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 27-06-2019
رقم العضوية : 13545
المشاركات : 8
الجنس :
تاريخ الميلاد : 1-1-1983
قوة السمعة : 22
الاعجاب : 0
اخي الحبي ياسر
جزاكم الله خيرا على الافادة ونفع الله بكم
اذا اين كود فتح الملف الغلق وغلقه مرة اخرى g
ثانيا ما اعنيه في مسألة فتح الملف المغلق حتىى تتضح الرؤية
انا البرنامج المحاسبي الـ عندي التقارير الخاصة به شكلها زباله والتقارير المقدمة للادراة لها شكل اخر علشان كده انا بصدر الملفات من البرنامج وبضطر اعمل شيتات اخرى لتقارير وفقا
لمتطلبات الادارة والشيتات المصدرة من البرنامج باخد منها البيانات فقط عن طريق vlookup او خلايا مرجعية في الشيت الذي سيتم الطباعة منه يعني عندي ملفين
احدها خارج من البرنامج به جميع البياانات
والاخر ملف خاص بي بيتم وضع الاكواد فيه لجلب البيانات من الملف السابق
السؤال هنا
هل يلزمني فتح البرنامج المصدر من البرنامج علشان يتحدث الروابط ولا بمجرد وضع الاكواد في الملف الاخر يسحب البيانات اتوماتيك من الملف المستخرج من البرنامج
هذا هو سؤالي
ان كان يلزم فتح الملف المستخرج من البرنامج فاذا يا يريت تضع لنا كود فتح الملف المغلق غلقه مرة اخرى
مع العلم ان الملفين بيكونوا دائما في مجلد واحد ويتم نسخهم في اليوم التالي و التعديل على الملف المتسخرج من البرنامج بالاستبدال
ارجو من الله ان يكون السؤال واضح




look/images/icons/i1.gif كود التحديث التلقائي للارتباطات بالاكسل
  25-01-2020 07:36 صباحاً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10457
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36399
الاعجاب : 66
أخي الكريم
يفضل أن ترفق ملفات للعمل عليها لتتضح رؤية وصف المشكلة بشكل أفضل للجميع ، فالكلام النظري لن يفيد بشكل كبير .. لذا قم بإرفاق ملفات مبسطة (لا يشترط الملفات الأصلية) وضع شكل النتائج المتوقعة ...




اضافة رد جديد اضافة موضوع جديد




الكلمات الدلالية
محتاج ، التحديث ، التلقائي ، للارتباطات ، بالاكسل ، ياسر ،









اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 09:50 AM