اذهب الي المحتوي
أوفيسنا

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

قام بنشر (معدل)

وعليكم السلام

ادخل على محرر الفيجوال لتظهر لك برمجة الرسالة

ستلاحظ وجود  vbYesNoCancel في سطر البرمجة أضف عليه vbMsgBoxRight +

حتى تكون هكذا

 vbMsgBoxRight +vbYesNoCancel

العاملة.xlsm

تم تعديل بواسطه أبوعيد
  • Like 1
قام بنشر

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

هل هناك طريقه للتحكم فى اسماء المفاتيح علي حسب نوع الرساله
مثال

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

قام بنشر (معدل)

السلام عليكم

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

ولهذا عرضت الامر على الذكاء الاصطناعي

فقدم لي الكود على طبق من ذهب 

وها انا اقدمه لك في ملف اكسل مع رسالتين كمثال

يمكتك تعديل الكلمات من الكود لنظهر في الرسائل

 

تعريب الرسائل.xlsb

تم تعديل بواسطه عبدالله بشير عبدالله
  • Thanks 1
قام بنشر (معدل)

تسلم ايدك استاذي الغالي عبدالله بشير عبدالله

انت والاستاذ ابوعيد

هو دا المطلوب

جعله الله في ميزان حسناتك

تم تعديل بواسطه ابو حمادة
قام بنشر

السلام عليكم اخوتى الافاضل

اكتشفت مشكله فى الحل الاخير بتاع استاذ عبدالله بشير عبدالله

لما جيت اغلق ملف الاكسل بتظهر رساله الحفظ المتعودين عليها 
لقيت اسماء المفاتيح كما فى الصورة المرفقه
 

رساله حفظ.JPG

قام بنشر (معدل)

وعليكم السلام

اخي الفاضل

وجهت استفسارك لصاحب الكود (الذكاء) فاجابني

لا، هذا الكود لا يؤثر على رسائل النظام الافتراضية في Excel، مثل رسالة حفظ التغييرات عند إغلاق الملف أو رسائل الخطأ التلقائية، لأنه يعمل فقط عند استدعاء MyMesg

 

كيف يعمل الكود؟

  1. عند استدعاء MyMesg، يقوم بإنشاء Hook (تعديل مؤقت) لتغيير أسماء الأزرار في رسالة واحدة فقط.
  2. بمجرد عرض الرسالة، يتم إلغاء التعديل فورًا (UnhookWindowsHookEx m_hHook).
  3. Excel سيستمر في استخدام رسائله الافتراضية دون تغيير.

هل يؤثر على الرسائل الأخرى؟

🔹 لا يؤثر على رسائل النظام الافتراضية (مثل حفظ، إغلاق، أو خطأ الصيغ).
🔹 يؤثر فقط على الرسائل التي يتم إنشاؤها باستخدام MyMesg.

إذا كنت تريد تأثيرًا دائمًا؟

إذا كنت تريد تغيير أسماء الأزرار لجميع رسائل MsgBox في Excel، يمكن تعديل Application.OnKey أو استخدام VBA Add-In، لكن هذا سيؤثر على جميع الرسائل.

انتهى جواب الذكاء الاصطناعي

 قمت بتجربة الملف الذي ارفقته لك  سابفا عتدقفل الملف  تظهر واجهة الاكسل العادية

ولا اعلم سبب ظهور الواجهة  مختلفة لديك 

اثمنى من الاعضاء تحميل الملف واعلامنا  بشكل الواجهة عتد غلق الملف هل هي  واجهة اكسل العادية ام لا 

 

image.png.7858dffaee900caa27f446f5407d2da8.png

 

تم تعديل بواسطه عبدالله بشير عبدالله
  • Like 1
قام بنشر

الأخ عبدالله

جرب الملف وكل شيء طبيعي 

لم تظهر لي المشلكلة التي ظهرت عند الأخ أبوحمادة

  • Like 1
قام بنشر

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

قام بنشر

عملت امر مسح  وربطنه بزر تم المسح  وعند الغلق اوامر الاكسل العادية

ارفق الملف الموجود لديك حنى نفهم الامر بالتطبيق  

اليك الملف وبه كود مسح جربه  واعلمنى بالنتيجة

 

 

تعريب الرسائل.xlsb

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information