كيفية إغلاق وإعادة فتح المصنف النشط؟

في هذه المقالة، أقدم بعض الطرق للإغلاق وإعادة الفتح السريع للمصنف النشط.

الاختصار لإغلاق وإعادة فتح المصنف النشط

VBA لإغلاق وإعادة فتح المصنف النشط

الاختصار لإغلاق وإعادة فتح المصنف النشط

إليك بعض الاختصارات التي يمكنها إغلاق وإعادة فتح المصنف الحالي.

إغلاق المصنف النشط

Alt + F + C

إذا كانت هناك بعض التغييرات قبل إغلاق المصنف، سيظهر مربع حوار لتنبيهك حول ما إذا كنت تريد الحفظ، اضغط على مفتاح Enter لحفظ وإغلاق الحوار.

إعادة فتح المصنف

Alt + F + R +1 لإصدارات Microsoft Office Professional Plus 2010/2013/2016.

Alt + F+ R + Y1 + Enter لإصدارات أخرى من Microsoft Office.

VBA لإغلاق وإعادة فتح المصنف النشط

يمكن لـ VBA أيضاً إغلاق وإعادة فتح المصنف النشط.

1. اضغط على مفاتيح Alt + F11 لتمكين نافذة Microsoft Visual Basic for Applications.

2. انقر على إدراج > وحدة والصق الكود أدناه في البرنامج النصي.

VBA: حفظ وإغلاق وإعادة فتح المصنف النشط

Sub SaveCloseReOpen()
'UpdatebyExtendoffice20171128
ThisWorkbook.save
Application.Workbooks.Open(ThisWorkbook.FullName)
End Sub

3. اضغط على مفتاح F5 لتشغيل الكود.

ملاحظة:

إذا كنت ترغب في إغلاق وإعادة فتح المصنف النشط مباشرة دون حفظ، استخدم الكود أدناه:

Sub Reopen()
'UpdatebyExtendoffice20171128
    ThisWorkbook.Saved = True
    ThisWorkbook.ChangeFileAccess xlReadOnly, , False
    Application.Wait Now + TimeValue("00:00:01")
    ThisWorkbook.ChangeFileAccess xlReadWrite, , True
End Sub