وليد المصرى 1

اخى عبدلله تقريبا الكود فى خطأ ارجوك التعديل انا وضعتة ولكن لا يوجد نتيجة اشكرك اخى عبدلله ومنتظر درك هذة رسالة الخطأ حددتها بالون الاحمر اذا امكن اخى عبدلله ترسلى نفس ملفى بالكود Option ExplicitOption Compare Text'========================================''''''''نطاق الرقم الوظيفيPrivate Const MyRng As String = "H2,T2,H20,T20,H38,T38"'========================================Private Sub Worksheet_Change(ByVal Target As Range)Dim MyPicture As ObjectDim a As String, q As String, em As String, mm As StringOn Error%2

اخيرا الملف اترفع على المنتدى ارجو منكم القاء نظرة علية وهو به كود يعمل لخلية واحدة فقط وهى h2 وانا اريد ان يعمل لاكثر من 6 خلايا لجلب صور الموظفيين ارجوكم ساعدونى جزاكم الله خير 1.rar

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

السلام عليكم منتظر الرد

يا جماعة محتاج الملف ضرورى جزاكم الله خير

منتظر الرد

Private Sub Worksheet_Change(ByVal Target As Range) a = Cells(2, "H").Value q = ActiveWorkbook.Path em = q & "\" & "empty.JPG" mm = q & "\" & a & ".JPG" On Error Resume Next Image1.Picture = LoadPicture(em) Image1.Picture = LoadPicture(mm) End Sub السلام عليكم ورحمة الله وبركاتة وجدت كود لجلب الصور للملف ولكن جلب صورة واحدة فقط لكارت واحداريد من الاخوة الاعضاء المساعدة فى التعديل على هذا الكود بحيث يعطينى لجميع الكروت الموجودة فى الملف المرفق الصور لكل موظف . اشكركم جميعا حاولت ارفع الملف ولكن فشلت الملف عبارة عن شيت اكسيل داخل فلدر به صور والصور مترقمة بارقام الموظفيين هذا هو الكود الموجود داخل الملف

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

السلام عليكم ورحمة الله ارجو من خبراء الاكسيل القاء نظرة على الملف المرفق وهو عبارة عن كارت اريد فيه اظهار صورة الموظف بمجرد كتابة رقمة الوظيفى اشكركم جميعا BOOK 33.rar

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

اشكرك استاذ طارق لكن اذا لم تكن مسافة بين الارقام

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

منتظر الرد

السلام عليكم ورحمة الله وبركاتة ارجو من الاخوة الاعضاء الاطلاع على المرفق وهو عبارة عن خلية فيها اكثر من بيان اريد كل بيان فى خلية مستقلة المطلوب داخل المرفق اشكركم جميعا Book2.rar

جزاك الله الف خير على هذا العمل الاكثر من رائع

اشكرك اخى ابو احمد على المجهود الرائع وجزاك الله كل خير

اشكرك استاذ جمال اطلع على المرفق فيه المطلوب Book2.rar

اشكرك اخى جمال على ردك السريع وهذا هو المطلوب ولكن انا عدلت على المرفق ولى طلب اخر لو امكن ان تتطلع علية سوف ارفقة الان اشكرك اخى وبارك الله فيك Book2.rar

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

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

جزاك الله خير

استاذ عبدلله السلام عليكم منتظر ردك

السلام عليكم سؤال فقط يمكن يكون هذا سبب المشكلة انا عايز الفرق بين تاريخين مثلا 01يناير 2012 و 31يناير 2012 دلوقتى اذا كتبت 01/01/2012 و31/01/2012 هيكون الناتج واحد يوم فقط ولكن الناتج الصحيح هو 30 يوم ممكن اجد حل لهذة المعادلة من فضلكم

منتظر الرد من فضلكم