omar elhosseini

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

الاخ صلاح الصغير شاهد المرفق Master_2.rar

الاخ صلاح الصغير شاهد المرفق Omar_2.rar

اعادة رفع الطريقة_الثانية لأن الملف السابق كان به اكواد زئده من الطريقتين الاخرتين الطريقة_الثانية ان تكون الصور محفوظة داخل فولدر ويتم عرض الصور بإستخدام اداة الصورة من مربع ادوات التحكم شرح الطريقة_الثانية ان تكون الصور محفوظة داخل فولدر ويتم عرض الصور بإستخدام اداة الصورة من مربع ادوات التحكم وانواع الصور التي يمكن استخدامها هي jpg gif bmp Emf jpeg المرفقات الطريقة_الثانية.rar الرجاء من السادة المشرفين استبدال هذا المرفق الطريقة_الثانية بالمرفق في بداية الموضوع استبدال هذا الشرح ذو اللون الاحمر بشرح الطريقة_الثانية في بداية الموضوع وبعد الاستبدال تحذف هذه المشاركه

الاخ أبو عبدالإله شكرا لك اخي العزيز الاخ ahmed_sef3 زيادة الخير خيران انظر المرفقات Omar_1.rar

الاخ صلاح الصغير شاهد المرفق Omar_1.rar

الاخ صلاح الصغير شاهد المرفق Omar_1.rar

الاخ حسين22 لا ادري اذا لم يعمل ارسل نموذج وسوف نجد حل بإذن الله تعالي

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

الاخ حسين22 شاهد المرفق Omar_1.rar Omar_1.rar

الاخ محي الدين ابو البشر الاخ سعد عابد شكرا لكم اعزائي

الاخ وائل عزالدين ارسل الملف لمعرفة مصدر المشكلة

بالنسبة الي الطريقة_الاولي و الطريقة_الثانية الورقة التي بها الصور يجب ان يكون اسمها All_Pic او تغير الاسم من الاكواد

الطريقة_الثالثة بعد التعديل الطريقة_الثالثة.rar

الاخ وائل عزالدين في كود الفورم استبدل السطر ("الطريقة_الثالثة") Set Sh_DB = Sheets بالسطر التالي Set Sh_DB = ActiveSheet وسأرفع الملف بعد التعديل

الاخ ASHHMA شاهد المرفق Password=123 يمكنك تغيرها من حدث Private Sub Workbook_Open() حصص.rar

السلام عليكم ورحمة الله وبركات الطريقة_الاولي ان تكون الصور محفوظة داخل الملف ويتم عرض الصور من خلال اي مدي الطريقة_الثانية ان تكون الصور محفوظة داخل الملف ويتم عرض الصور بإستخدام اداة الصورة من مربع ادوات التحكم الطريقة_الثالثة ان تكون الصور محفوظة داخل فولدر ويتم عرض الصور بإستخدام اداة الصورة في الفورم ================================================== ================================================== شرح الطريقة_الاولي ان تكون الصور محفوظة داخل الملف ويتم عرض الصور من خلال اي مدي في ورقة All_Pic يتم استيراد الصور بالوقوف في خلية مثلا مثل C2 ثم استخدام زر ( ادراج صـــورة / صـــور بـــدء مـــن الخليـــة الحـــاليـــة ) لأستيراد صورة واخدة او عدة صور دفعه واحدة فيتم ادراج اسم الصور في العمود B والصور في العمود C ويتم تحديد حجم الصور في الكود Width_Of_Pic_Col = 2 Height_Of_Pic_Row = 7 بعرض 2 عمود وارتفاع 7 صفوف وانواع الصور التي يمكن استخدامها هي jpg gif png bmp tif Emf jpeg الطريقة_الاولي.rar ================================================== شرح الطريقة_الثانية ان تكون الصور محفوظة داخل الملف ويتم عرض الصور بإستخدام اداة الصورة من مربع ادوات التحكم يتم استيراد الصور بنفس طريقة الطريقة_الاولي ويتم تحديد حجم الصور بنفس طريقة الطريقة_الاولي وانواع الصور التي يمكن استخدامها هي jpg gif bmp Emf jpeg الطريقة_الثانية.rar ================================================== شرح الطريقة_الثالثة ان تكون الصور محفوظة داخل فولدر ويتم عرض الصور بإستخدام اداة الصورة في الفورم الطريقة_الثالثة.rar ================================================== ملحوظة هامة بالنسبة الي الطريقة_الاولي والطريقة_الثانية في الورقة التي يدرج بها الصور ترتيب الصور والاسماء لا علاقة له بإستدعاء الصور حتي الاسماء التي في العمود B يمكن حذفها الصور يمكن ان تكون في اي مكان في الورقة حتي لوكانت بصورة عشوائيه ==================================================

تغير الفلدر الافتراضي ل GetOpenFilename المعروف عند استخدام GetOpenFilename فأن الديالوج بوكس يفتح على الفلدر الافتراضي وهو My Documents ولا يمكن تغيره ولكن يمكن اجبار GetOpenFilename علي تغير الفلدر الافتراضي لها الي أي فلدر نريد بإستخدام دوال API Functions كما في هذا المثال سوف تفتح علي الفلدر الحالي لهذا الملف GetOpenFilename.rar

الاخ وليد ابو عمر Run.Cmd وجدن لك من النت ملف باتش ( سكريبت ) يقوم بمهمة الدمج في ملف جديد يسمي combined.csv يوصع في فلدر ملفات csv نفذ الملف وانتظر قليلا ستجد ملف بأسم combined.csv في نفس الفلدر Report.rar

بعد اذن الاخوة الاعزاء الاخ وليد ابو عمر اولا ينكن عمل ذلك عن طريق الاكواد ثانيا وهو الاهم كيف يمكن معرف الملف الاول وكيف يمكن معرفة ترتيب الملفات

بعد اذن اخي العزيز عاشق الاكسيل الاخ ابوسلماان اضغط مفتاحي كنترول اونت ضاغط عليه اضغط مفتاح F3 ستظهر لك الاسماء المعرفة سبب المشكلة استخدم هذا الكود التالي لحذف كل الاسماء من الملف ضع الكود في موديول ثم نفذه Sub RemNamedRanges() ' Dim nm As Name On Error Resume Next For Each nm In ActiveWorkbook.Names nm.Delete Next On Error GoTo 0 ' End Sub والمرفقات به ملفك وبه الاكواد للأحتياط Omar_1.rar

الاخ ahmed88872 شاهد المرفق لعله طلبك الوحيد Omar_1.rar

الاخ elrazaz شاهد المرفق الباحث الشامل.rar

العزيز ياسر خليل أبو البراء شكرا لك اخي الاخ سعد عابد شكرا لك اخي اضافة بسيطة الي الملف لتسهيل تعديل مدخلات الجدول ادراج مجموع كل صفحة & المجموع الكلي_3.rar