نجوم المشاركات

:: السلام عليكم ورحمة الله وبركاته :: 🙂 يطيب لي أن أهديكم هذه الهدية البسيطة 🎁 :: مرسال الواتسأب :: وهو برنامج بسيط جدا لإرسال الرسائل عن طريق الواتسأب .. مع إمكانية إرسال المرفقات كذلك ( صور أو مستندات ) 🙂 وله واجهتين رئيسيتين : 1 - الرسائل الفردية 2 - الرسائل الموجهة لعدة أشخاص :: وهذه صور لواجهات البرنامج :: طبعا من الضروري تنصيب برنامج الواتسأب للكمبيوتر وتشغيله قبل تشغيل البرنامج 🙂 وبملاحظاتكم ودعواتكم دوما نرتقي 🙂 :: وأخيرا :: التحميل :: ☺️👌🏼 مرسال الواتسأب.accdb

تم التجربة على ويندوذ 11 يعمل اوفيس 2021 .32 بت

نعم وتم الارسال بنجاح ويندوز 11 الاصدار 22H2 اوفيس 21 64بت

جرب جساب الفرق بين تاريخين.xlsx

السلام عليكم وانا ايضا يظهر عندي مرفق استاذنا @مبرمج متقاعد بدون مشكلة ولكن ربما الاصدار الاحدث من 2010 الذي يستخدمه استاذنا ابو اشرف هو المشكلة فقد طورت ميكروسوفت عمل الرسوم البيانية في الاصدارات الاحدث. ولكن هنالك خاصية بالاصدار 2010 هي في نظري اقوي من الاصدارات الاحدث وهي ضبط خاصية العرض الافتراضي للفورم علي piovatechart واعتقد اني قد تعرضت لها هنا بهذا الرابط ارجو ان يفيدك هذا الأمر بشىء تمنياتي بالتوفيق

وعليكم السلام ورحمة الله وبركاته كل الشكر لك على الهديه المميزة أخي @Moosak 👍 جزاك الله خير …

أخي محمد @محمد احمد لطفى أذا سأقوم التاكد من( المكافح وتغيير الاوفس ) ووافيكم بالنتائج .. أكرر شكري لك على ردودك

إعدادا الوفيس عادية مبيغيرش حاجة الا ( أمان الماكرو بعمله تمكين) اذا كنت ترغب أن ارفع صور الاعدادات حدد اى شاشة اقوم بتصويرها هذا لكثرتها

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

﴿كُلُّ مَن عَلَيها فانٍ۝وَيَبقى وَجهُ رَبِّكَ ذُو الجَلالِ وَالإِكرامِ﴾ [الرحمن: ٢٦-٢٧]

شكرازجزيلا لكم جميعا على كلماتكم الطيبة ودعواتكم المباركة 😊🌹 إن شاء الله 👍🏼 أخي qathi لم يظهر لدي أي مشكلة مما ذكرت .. وكل شي كان يعمل بسلاسة تامة .. لابد أن هناك خلل في إعدادات الجهاز عندك أو إعدادات الأكسس نفسه 🙂 وياليت لو نسمع آراء الإخوة ممن جربوا البرنامج .. 🌹

أخى وأستاذى الكريم مبرمج متقاعد لما كل هذا القلق وليس هناك ما يدعى لكل هذا ان شاء الله منتدانا بخير وسيظل بكم قائم وبكل جهود القائمين عليه ان شاء الله

السلام عليكم و رحمة الله اتبع المسار الآتى : File - Options- Advanced Display option for this workbook ضع علامة صح امام Show sheet tabs

الله عليك خبيرنا واستاذنا / احمد الفلاحجى جزاك الله كل خير ـ وجعله فى ميزان حسناتك

السلام عليكم سؤالي للمشرف الفاضل الذي قام بتعديل مشاركتي السابقة وحذف فقره منها كانت الفقرة ان نظام الاشراف في بعض المنتديات العربية يدار بعقلية عريف الصف هذه الفقرة ليس فيها تطاول على شخص معين او موقع معين وهي رأي شخصي وحذفها من المشاركة يدل على احتمالية صحة ما جاء فيها مرحبا باخي واستاذي ابو احمد مع ذلك لم يسلم الموضوع من مقص الرقيب اخيرا سوف اضع امثله لمنتديات كبيرة متخصصة تم اغلاقها ولن اشير الى اسم اي منها اكبر منتدى عربي للبرامج وله السبق في تعريب العديد من البرامج انتهى بوفاة مؤسسه رحمه الله تم اغلاق الموقع لفترة ثم اعيد ولكن بعد فوات الاوان منتدى كبير متخصص في تطوير المنتديات تم اغلاقة بسبب القوانين الصارمة والتي وصلت الى حد محاربة اصحاب الخبرة وايقاف عضوية العديد منهم بسبب خلاف مع احد المشرفين مما دفع الاخرين للابتعاد عن الموقع اكبر موقع عربي في عمل هاكات المنتديات ويضم افضل خبراء php العرب ومن هذا الموقع تم اصدار اول مجلة عربية بلغة php * تنافس مجلة Nuke ومن هذا الموقع تم عمل اول منتدى عربي ** ينافس منتدى vb قرر مالك الموقع تحويله الى موقع اخباري ! منتدى عربي كبير عدد الاعضاء بحدود مليون ونصف اختلف مؤسسي الموقع وبدلا من النقاش ومحاولة تقريب وجهات النظر قام احدهم بتدمير قاعدة البيانات هذه الامثلة كنت شاهد على احداثها وماخفي ربما يكون اكبر من ذلك ----------------------------- * مجلة المبرمج العربي تمت برمجتها بواسطة الاخ والصديق رفيع العتيبي رحمه الله ** منتديات في بي زوم برمجة الاستاذ خالد ممدوح

وعليكم السلام ورحمه الله وبركاته هديه مقبوله اخى @Moosak من اخ كريم وتسلم ايدك على هدايك القيمه ان شاء الله تكون مبتغى الكثير من رواد منتدانا الغالى وجعلها الله فى ميزان حسناتك بالتوفيق اخى

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

السلام عليكم ورحمه الله وبركاته مشاركه مع دكتورنا العزيز محمد @الحلبي تعديلى على اكمال على تعديل ابوشادى بالنسبه للجزئيه الاخيره اتفضل اخى @حسين العربى بالتوفيق test(4).accdb

وعليكم السلام أحسنت استاذنا الكريم عمل ممتاز بارك الله فيك والى الأمام دائماً وبالتوفيق والنجاح دوماً

أحسنت ، قلت ما لا نستطيع قوله. وما لم تقله ربما أكثر وأكبر.

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

الاستاذ @qathi هذا تواضع كبير من خبير كبير فى عالم اكسس لا يخفى عليه شئ فى اكسس حتى العلماء فى شتى المجالات ما هم الا طالبو علم ـ احمد الفلاحجى خبير بمعنى الكلمة وما تحتويه وعن نفسى اقف له اختراما واجلال لما علمنى فى علم الاكسس اللهم بارك فيه وبارك فى اسرته ووالدته ـ واجعله فى ميزان حسناته

السلام عليكم أخي الكريم بالنسبة لحذف رد متعوب عليه و يمكن ان يفيد الاخرين ، فاتفق معك بان ذلك غير مناسب ، ولا اردي ما سبب حدوث ذلك، و باذن الله ساناقش الأمر مع الأحوة لتجنب حدوث ذلك مرة أخرى. و أعتذر على حدوث ذلك. بالنبسة للموضوع المغلق، تم فتحه الان لفترة اضافية، و السبب فى غلق المواضيع السابقة المكتملة هو تجنب رفعها عند الرد بالشكر مثلا بعد فترة طويلة مما يشتت متابعي الموضيع الجديدة بالقسم، سواء المتابعين بغرض القراءة او بعرض محاولة الرد. و السبب فى ذلك هو تكرار تعقيبات متتالية على مواضيع قديمة مغلق من قبل بعض الاخوة كانت تؤدي لرفع المواضيع القديمة بصورة قد تجعل الصفحة الاولي فى المنتدى كلها مواضيع من هذا النوع ، فتنتقل كافة المواضيع الجديدة للصفحة التالية و يصعب على المتابعين متابعة الجديد، حيث يتعين عليهم فتح كافة المواضيع الجديدة لمعرفة انها فقط قد تم رفعها بكلمة شكر. بينما يمكن استخدام الرموز التعبيرية للاعجاب او الشكر و التقييم دون اضافة رد و رفع الموضوع. و هذا الاجراء و غيره بالطبع قابل للتعديل وفق الظروف والمستجدات، و لكن هذا ما اجتمع الرأي عليه من فترة و لم يكن مطبقا من البداية، فقد وجد أنه الأفضل لعموم المستفيدين من الموقع باغلاق المواضيع المكتملة، و بالطبع لا يوجد رأي أو قرار ثابت ، بل يمكن تعديل أي شيء أو تعديله أو تضمين بعض الاستثناءات. مع ملاحظة أن غلق الموضوع لا يمنع التعقيب عليه وانما يمكن الاشارة له فى موضوع جديد لاستكمال الحوار و اذا لزم الامر و حينها يتم دمج الموضوعان. وهذه الحالة من حيث العدد هي الاقل مقارنة برفع المواضيع من خلال كلمات الشكر، و التي نفضل استبدالها بالعلامات التعبيرية كل لا يتم رفع المواضيع. و في حال وجود موضوع مميز يمكن الاقتراح على الاخوة المشرفين اضافته لقائمة المواضع المميزة المثبتة أو تثبيته لفترة كي تعم الفائدة بصورة اكبر ، و ايضا يمكن اضافته لمكتبة الموضع ليظهر ضمن عدد اقل من المواضيع المميزة ، فقسم الاكسيل بالمكتبة به اقل من 150 موضوع ، و اقترح عليك اضافة الموضوع المشار اليه الي مكتبة الموقع ليسهل الوصول اليه ، و عند الاضافة يتم فتح موضوع خاص بالحوار حول الموضوع بصورة آلية فى القسم المناظر و مواضيع الحوار حول ملفات المكتبة عادة لا يتم اغلافها حيث ترتبط بالملف المرفوع للمكتبة. و اقترح عمل مثال بسيط واضافته للمكتبة سواء بعمل مثال و ضمه لقسم الاكسيل بالمكتبة او رفعه ككود فى القسم المناظر. وفي حال اضافة مثال للمكتبة يمكن تعميمه على الاعضاء بالبريد ليصل للجميع . https://www.officena.net/ib/files/ و يسعدني استكمال الحوار معك اذا رايت هناك حاجة لذلك. و كما ذكرت لا توجد قواعد ثابتة ، و انما عندما نجد حاجة نناقش ما يلزم و نتفق على أي تعديل مطلوب للقواعد المتبعة.

وعليكم السلام ورحمه الله وبركاته جزاك الله خيرا اخى @qathi على دعائك ولك مثله وزياده وما انا الا طالب علم احبو عالطريق لاتعلم معكم وجزاهم الله خيرا اخواننا واساتذتنا الذين نتعلم منهم ربنا يوفقك

أنا تظهر معي هكذا ( أوفيس 365 ) : 🙂

السلام عليكم ورحمة الله وبركاته أحمد شوقي ، من الأعضاء الفاعلين المتميزن في منتدنا العتيد، وقد امتاز برفع مجموعة كبيرة من الأمثلة الرائعة والمفيدة. أحببت هنا، حفاظا على تراث المنتدى أن ألخص لكم ما قدمه أخي شوقي المعطاء حتى الآن "مستخدما كلماته الجميلة" : 1. ( مراسلات ) يعني نظام محفوظات او الصادر والوارد او سميه زي ما انت عايز 2. ( مسج بوكس بتاع الاكسس ) يعني message box بس انت اختار نوع البوكس عايزه ايه ( ستوب - استعلام - تنبيه - باسوورد ....؟ ) وتختار العلامة وتكتب انت عايزيطلع معاك في البوكس 3. ((( مسير رواتب ))) لقيته من المخزن عندي مدفون وعدلت عليه شئ بسيط جدا ( يعني خلفية وشوية لوازم ) مع الاعتذار لصاحب الموضوع اللي انا مش عارفه بس انشاء الله ربي يجازيه خير 4. اجندة مواعيد ( خواجات ) وبشغلات حلوة اخليك انت تشوف وتحكم 5. اجندة مواعيد بالاكسس , حلوة جدا جدا وطريقة جديدة ومش حتصدق انها معمولة بالاكسس 6. ازاي تبعت ايميل بكشف درجات الطلبة او الطالب باستخدام الاكسس ( شغل خواجات ) 7. اقولك ايه ... طب بص على الازرار دي وقولي رايك ...... بالذمه مش حلوة 8. البرنامج اسمه ( المهن والحرف ) وهو خاص بتسجيل اعضاء في مؤسسة حرفيه ومهنية وفتح ملفات وظيفية لكل عضو وكمان عاملها الاستاذ ( كمال النحال ) اللي عامل البرنامج عاملها انترفيس حلو 9. البرنامج ده بتاع شغل الباراكود (( جامد )) عبارة عن ADDIN وبيديك خاصية التعامل مع الباراكود من خلال الاكسس 10. البرنامج ده بيصلح قاعدة البيانات بعد ما تنضرب ويرجع البيانات التالفة وينقذك بكل تأكيد من مأزق محقق 11. البرنامج ده عبارة عن برنامج تربوي تنظيمي للمدارس .... يعني بيخدم قطاع التعليم 12. الرشاقة .......... يعني ايه ؟؟؟؟ طيب ايه علاقة الاكسس بالرشاقة ......... بص وشوف واحكم انت بنفسك ؟؟؟؟ 13. الشامل للتقيم الاداري بالمؤسسات التعليمية, برنامج كامل ورائع بالاكسس يخدم المؤسسات التعليمية 14. المؤذن بالاكسس 15. المرفق عبارة عن سجلات منسقة على فورم ...... سهلة ......... لا لا استنى مش اي فورم 16. آه ..... ودي بقه قاعدة بيانات كاملة وحلوة وانيقة ( حركات الميكروسوفت ) لادارة المراكز التجارية بس بغير شكل .... جرب وشوف الحلاوة 17. اهو مثال اخر للساعات ........ بيديك توقيت مدن وعواصم في العالم 18. مثال حلو يارب يعجبكم عن كيفية النسخ ومكان النسخ وكيفية اجراء نسخ احتياطي للقاعدة .... ممكن ترفقه ببرنامجك وتسوي به حركات فنانة ومحترفة 19. بالاستعانة بخبرات الخبراء في منتدانا اوفيسينا ... ادامه الله استطعت ان البي رغبة صديقي ببناء قاعدة بيانات لجهة عمله ( المرافق والاسكان ) 20. بر نامج النهارده بيحولك قاعدة بياناتك لـ SQL 21. برنامج بالاكسس لصناعة ازرار احترافية للاكسس 22. برنامج محاسبة ثقيل اجنبي على الاكسس اسمة ( بيت البيانات DataHouse 4.2 ) مش بس كدة ده معاه المانوال بتاعوا او كتيب التعليمات 23. برنامج مسير رواتب - كلمة سر 123 24. برنامج يخدم اصحاب المصحات البرنامج ده بعمل ريبورت لحالات المرضى عن بنض القلب وضغط الدم وعمليتي ( السيستول والدياستول ) يعني ( الانقباض والانبساط القلبي ) 25. تحويل الملفات mde الى mdb 26. تعرف ترسم خريطة بالاكسس وادل على مكان ؟؟؟ خريطة جغرافية يعني ؟؟؟ ولا صعبة ولا حاجة 27. ثلاث برامج ( 3 ) لعمل رسائل الاكسس 28. جايبلكم كتاب حلو ...ز استفدت منه في بداية تعليمي للاكس ودلني عليه احد اخوتي في المنتدي ... الكتاب ده اسمه اكسل & اكسس بس تحفه ... خطوة بخطوة لغاية الاحتراف 29. حد منكم فكر يتجوز ؟؟؟؟؟؟؟ طيب ليه ما تحمل البرنامج بتاع شغل الاكسس ده وتتفرج وتشوف انت عايز ايه علشان تتجوز ؟؟؟؟؟ اوعوا تتخضوا 30. برنامج اكواد الاكسس ... كمان معمول بالاكسس حيديك ( الاكواد المستخدمة في النماذج - والاكواد المستخدمة في الجداول - والاكواد المستخدمة في التقارير والماكروات وكل شئ 31. صيانة قواعد البيانات المعطوبة وطريقة استخدامه بسيطة وسهلة للغاية 32. صيدلية ..... علشان الصيادلة ما يزعلوش ( كاملة ومفتوحة المصدر ومفيش باس وورد ولا حاجة ) 33. طب وعلى ذكر سيرة التعليم ... مرة لقيت برنامج كان عاملة الاستاذ حسام سفر .. طيب الله ذكره ... برنامج عن المعاهد وكل ما يختص بالمعاهد التدريبية او التعليمية ... يعني شؤون الطلبة ... شؤون ا 34. قاعدة بيانات اسلامية معمولة بالاكسس فيها طريقة العرض وطريقة البحث واشياء اخرى ممكن تكتشفوها وحدكم 35. قاعدة بيانات بالاكسس وواجهة استخدام حلوة لمصحة طبية اسمها ( مصحة مرحبا ) . يوجد بها خيارات عديدة تخدم الجانب المالي والجانب الوظيفي والرواتب ونسبة الطبيب من كل حالة كشف على مريض 36. قاعدة بيانات لجهة عمله ( المرافق والاسكان ) 37. قاعدة بيانات للمخالفات المرورية مش كبيرة ولا معقدة ........... بسيطة ... بس شاشتها حلوة ..... تنسيقها جميل 38. قاعدة بيانات للموظفين 39. قاعدة بيانات لمعظم الادوية المصرية 2008 40. كل كوم ولما تعرف امكانية اكسس في عمل صفحات انترنت .... وموقع كامل معمول بالاكسس ... ده هو اللي مش معقول 41. كمان برنامج الميزان للمحاسبة التجارية والميزانية العمومية شجرة الحسابات الرائعة و........ البرنامج كامل من كله ومفتوح المصدر يعني ( بالسورس كود ) جميل وقوي وبدون اي حماية 42. مثال اخر حلو برضة عن كيفية تغيير الخط واختيار اللون ونوع الخط .......... ممكن تستفيد منه باضافة الخاصية الى برامجك 43. مثال عن الجمعيات التعاونية قاعدة البيانات مقسمة الى قسمين ( واجهة استخدام + قاعدة بيانات لتخزين البيانات ) 44. مثال يشمل استخدامات عديدة للميكرو 45. محاسبة لمكتب تدريبي ( بيدي دورات في الحاسب الالي واللغات ..... ومش عارف ايه ) 46. برنامج مخازن 47. ننظام محاسبي حلو .... طريقة تقسيم قاعدة البيانات الى قسمين ... واجهة هيكلية لادخال البيانات و قاعدة بيانات لاستيعاب البيانات ... حلووووو جدا 48. نظام مخازن ومبيعات وعملاء ومحاسبة تكاليف ومشتريات كلمة السر 11796376 49. هو برنامج كامل لمحلات الحلويات ( زبائن وحلويات وفواتير وموظفين ومبيعات ومشتريات ومردود مبيعات وطلبيات واحصائيات وتقارير ..... حلو طبعا مفتوح المصدر 50. وده بيديك معلومات عن الهارد ديسك بتاعك 51. وده مثال اجنبي عن كيفية اجراء النسخ الاحتياطي لقاعدة البيانات ... المثال لقاعدة بيانات زبائن وبضائع بالصور 52. وده مثال حلو لامكانية تكيبر الصورة وتصغيرها .... ابداعات في الاكسس ملهاش حدود 53. ودي ...... ايوه ..... دي اله حاسبة .... بش مش زي الة حاسبة ثانية ... دي الة حاسبة للمعادلات الكيميائية .... يعني مركبات كيميائية واوزان جزيئية و... بلاوي زرق في الكيمياء 54. ودي قاعدة بيانات للخدمات الطبية للاخ اكسس من منتدانا ..... يعطيه العافية 55. يا سلام يا شباب ..... الباحث في القرآن بالاكسس ولمن عنده داون لوود سريع اقدم هذا الرابط من مخزني لديوان الشوقيات الذي يشمل (55) المثال المذكورة أعلاه بحجم مضغوط 50 ميجا بايت وبعد فك الضغط تصبح 176 ميجا بايت. أسأل الله أن يكتب لشوقي بكل حرف كتبه أو رفعه الأجر. إضغط هنا لإنزال الشوقيات ولمحبي شوقي اقدم هديتي لكم ، هذا البرنامج وهو عبارة عن فهرس لموضوعاته حيث يوضع المجلد السابق بعد فك الضغط عنه في الدليل الرئيس \:c ويوضع فهرس الشوقيات التالي في سطح المكتب ويصبح بذلك عندك أداة للوصول السريع للشوقيات. Ahmad_Shouqi.zip مع وافر الاحترام والتقدير

حل اخر مع بعض التعديل ‫ارصدة مواد3.xlsx

فضلا جرب المرفق اختار من القائمة المنسدلة المنتج وجرب ارصدة مواد (2).xlsx

السلام عليكم أخي الكريم طلبك الأول تم بالتنسيق الشرطي Conditional Format والطلب الثاني تم بالكود الذي بالملف تفضل البحث عن التكرار في Irsalieh.xlsm

تفضل المطلوب تغير الفصول.xlsm

جميل أبو القبطان حل بسيط وسهل فقط للإثراء يمكن استبدال معادلات IF الطويلة بمعادلة Vlookup مثلا المعادلة في الخلية B3 يمكن كتابتها هكذا =VLOOKUP(C3,$H$2:$I$9,2,0)

السلام عليكم أخي الكريم تفضل الحل بالمرفق خيثر.rar

السلام عليكم أخي الكريم جرب المعادلة التالية بفرض البيانات في العمود A ="L"&VALUE(MID(A2,3,6)) أو أنظر المرفق إستخلاص معلومات من الخلية.rar

السلام عليكم أخي الكريم أعد تنسيق الجدول المحوري لتجعل السنة في عنوان الأعمدة أو الصفوف ثم دبل كليك علي مجموع السنة فتحصل علي ماتريد أنظر الفيديو Piv_Table.rar

السلام عليكم ورحمة الله وبركاته كل عام وانتم بخير دالة kh_ShowImage دالة تمكنك من وضع صورة داخل شكل تلقائي اتوماتيكيا يمكنك تغيير اسم او مسار مجلد الصور من داخل كود الدالة وسائط الدالة NameImag اسم الصورة افتراضي ImagRng خلية وضع الصورة افتراضي MyWidth عرض الصورة اختياري MyHeight طول الصورة اختياري ـ اذا لم تحدد طول او عرض معين للصورة تاخذ الصورة عرض وطول الخلية الموضوعة فيها ImagRng ـ اذا قمت بتحريك الصورة يدويا تفقد الصورة ارتباطها بالدالة وعند تحديث الدالة تقوم باضافة الصورة مرة اخرى في مكانها المحدد في الدالة كود الدالة: Option Explicit Option Compare Text '============================================= ' عرض صورة في الخليةِ ' Showing an image in cell '============================================= ' اسم مجلد الصور ' اذا كان مجلد الصور في نفس مجلد ملف الاكسل ' اكتب اسمه فقط ' والا اكتب المسار كاملا ' "D:\MyDocument\MyFunction\photo" Private Const kh_pic As String = "MyImeg" '============================================= ' امكانية تحرير اي نوع من الصور لديك ادناه Private Const MyTyp As String = ".jpg,.bmp,.gif,.png,.tif" '============================================= '============================================= Function kh_ShowImage(ByVal NameImag, ByVal ImagRng As Range, Optional ByVal MyWidth As Single, Optional ByVal MyHeight As Single) Dim Tp Dim shp As Shape Dim ibo As Boolean Dim MyTop As Single, MyLeft As Single Dim MyFile As String, MyPath As String '---------------------------------- On Error GoTo 1 '---------------------------------- MyTop = ImagRng.Top: MyLeft = ImagRng.Left With ImagRng.Worksheet For Each shp In .Shapes If shp.Top = MyTop And shp.Left = MyLeft Then shp.Delete: Exit For End If Next shp End With '----------------------------------- If IsEmpty(NameImag) Then GoTo 1 '----------------------------------- If MyWidth = 0 Then MyWidth = ImagRng.Width If MyHeight = 0 Then MyHeight = ImagRng.Height '----------------------------------- If Not InStr(kh_pic, ":") Then MyPath = ThisWorkbook.path & "\" MyFile = MyPath & kh_pic & "\" & CStr(NameImag) '----------------------------------- For Each Tp In Split(MyTyp, ",") If Not Dir(MyFile & Trim(Tp), vbDirectory) = vbNullString Then With ImagRng.Worksheet.Shapes.AddShape(msoShapeRectangle, MyLeft, MyTop, MyWidth, MyHeight) .Fill.UserPicture MyFile & Trim(Tp) End With ibo = True Exit For End If Next 1 kh_ShowImage = ibo End Function المرفق 2003-2010 دالة عرض صورة في خلية بطول وعرض اختياري.rar

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

السلام عليكم ورحمة الله وبركاته القلب يعتصر حزنا وانا اكتب لكم ... اغلاق منتدى شقيق ... منتديات الاكسس والوورد ....

أخي موسى @Moosak للاسف الملف لا يعمل نهائيا وتظهر رسائل أخطاء التالية: - لا بد من عمل رسالة قبل ادخال الارقام والأسماء وهذا غير عملي - يقوم بفتح مجلد جهاز الكمبيوتر في كل عملية ارسال رسالة لرقم ( مزعج جدا ) - ضهور رسالة السماح في كل عملية ارسال رسالة لرقم ( مزعج جدا ) - وبعد كل هذا لا يتم ارسالة الرساله نهائيا لجهات الاتصال ملاحظة: تم تجربته على التالي: - على الويندوز 11 نوع 64 بت وأوفس 2016 نوع 32 بت - الواتس سطح المكتب أخر أصدار - في نافذة ارسال رسالة لعدة اشخاص - عدد جهات الاتصال اربع ارقام الذي تم المحاولة الارسال اليها - صيغة الرقم المفتاح الدولي متبوع برقم الشخص الحقيقي المسجل بالأصل في الواتس