اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كود يغلق برنامج الورد بدون أن تظهر رسالة " هل تريد الحفظ "


إذهب إلى أفضل إجابة Solved by ابوخليل,

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

  • 4 weeks later...

الاخ الحبيب / رفعت يسري حامد

انت فعلا شخص مميز

جزاكم الله خيرا

رابط هذا التعليق
شارك

  • 4 weeks later...

السلام عليكم

ارجو المعذرة للتأخر فى الرد لظروف خاصة و ارجو المتابعه مع الاساتذة المميزين

اولا :- ارجو متابعه الخطوات فى كيفيه تسجيل الكود فى الورد هل هى صحيح ام يوجد عليها اى تعديل مع العلم انى استخدم اوفيس 2003

Tools - > Macro - > Visual Basic Editor

ثم يتم وضع الكود فى

Normal - > Microsoft Word Objects - > ThisDocument

 

ثانيا :- فى حاله اذا ما كانت الخطوات صحيح فقد وضعت الكود المرسل و لم يعمل

فبرجاء كتابته فى صفحه ورد و ارفاقه كملف

و جزاكم الله خيرا

رابط هذا التعليق
شارك

السلام عليكم

ارجو المعذرة للتأخر فى الرد لظروف خاصة و ارجو المتابعه مع الاساتذة المميزين

اولا :- ارجو متابعه الخطوات فى كيفيه تسجيل الكود فى الورد هل هى صحيح ام يوجد عليها اى تعديل مع العلم انى استخدم اوفيس 2003

Tools - > Macro - > Visual Basic Editor

ثم يتم وضع الكود فى

Normal - > Microsoft Word Objects - > ThisDocument

 

ثانيا :- فى حاله اذا ما كانت الخطوات صحيح فقد وضعت الكود المرسل و لم يعمل

فبرجاء كتابته فى صفحه ورد و ارفاقه كملف

و جزاكم الله خيرا

رابط هذا التعليق
شارك

 

السلام عليكم

ارجو المعذرة للتأخر فى الرد لظروف خاصة و ارجو المتابعه مع الاساتذة المميزين

اولا :- ارجو متابعه الخطوات فى كيفيه تسجيل الكود فى الورد هل هى صحيح ام يوجد عليها اى تعديل مع العلم انى استخدم اوفيس 2003

Tools - > Macro - > Visual Basic Editor

ثم يتم وضع الكود فى

Normal - > Microsoft Word Objects - > ThisDocument

 

ثانيا :- فى حاله اذا ما كانت الخطوات صحيح فقد وضعت الكود المرسل و لم يعمل

فبرجاء كتابته فى صفحه ورد و ارفاقه كملف

و جزاكم الله خيرا

 

رابط هذا التعليق
شارك

الســلام عليكـــم

 

ارجو المساعدة من خبراء الــــورد فى كود يحفظ أول بأول و عند اغلاق برنامج الورد 2003 لا تظهر رسالة " هل تريد الحفظ "

 

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

 

و جزاكـــم الله خيــرا

تم تعديل بواسطه أبــو حبيبـــة
رابط هذا التعليق
شارك

  • 2 weeks later...
  • أفضل إجابة

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

 

هذا السطر  يجعل المستند يغلق بدون المطالبة بالحفظ

Private Sub document_close()
ActiveDocument.Saved = True
End Sub

ولكن لن يتم حفظ آخر حركة

 

ولحفظ آخر حركة ثم الخروج بدون مطالبة نضيف اليه سطرا  :

Private Sub document_close()
ActiveDocument.Save
ActiveDocument.Saved = True
End Sub

ملحوظات : لكي يعمل الكود يجب تخفيظ امان الماكرو الى الحد الادنى 

 مكان الكود : اضغط Alt + f11  

حدث الكود : عند اغلاق المستند

 

وإليك الأمثلة

Doc7.rar

Doc8.rar

رابط هذا التعليق
شارك

الســلام عليكــم استــاذ / خليــل

انا كنت بدات افقد الأمل فى رد صحيح

لكن ردك الرائع اعاد الى الأمل مرة اخرى

شكــرا جـزيــلا

و جــزاك الله خيــرا

رابط هذا التعليق
شارك

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