كيفية حذف عدة صفحات محددة في مستند Word؟
يمكن أن يكون حذف الصفحات يدويًا في Word أمرًا مملًا، خاصة إذا كنت تعمل على مستند كبير. بينما يمكن أن يعمل تحديد الصفحة والضغط على مفتاح الحذف لصفحة واحدة، فإن إزالة صفحات متعددة يتطلب طرقًا أكثر كفاءة. يقدم هذا الدليل ثلاث حلول عملية لحذف صفحات محددة أو نطاق من الصفحات في Word:
حذف نطاق من الصفحات باستخدام ميزة الانتقال إلى
حذف صفحات متعددة محددة باستخدام Kutools for Word
حذف صفحات متعددة محددة باستخدام كود VBA
حذف نطاق من الصفحات في مستند Word باستخدام ميزة الانتقال إلى
إذا كنت ترغب في حذف نطاق من الصفحات المتتالية من مستند Word، يمكن لميزة الانتقال إلى أن تساعدك في إكمال المهمة بسرعة. اتبع الخطوات التالية:
- افتح مستند Word الذي تريد حذف الصفحات منه.
- اضغط F5 لفتح مربع الحوار البحث والاستبدال. أدخل رقم الصفحة الأولى من النطاق الذي تريد حذفه واضغط Enter.
- أغلق مربع الحوار البحث والاستبدال، ثم اضغط F8 لتشغيل وضع التمديد.
- اضغط F5 مرة أخرى لإعادة فتح مربع الحوار البحث والاستبدال. هذه المرة، أدخل رقم الصفحة الأخيرة من النطاق الذي تريد حذفه واضغط Enter. سيتم تحديد جميع الصفحات من الصفحة الأولى حتى الصفحة قبل الأخيرة.
- أخيرًا، اضغط حذف لإزالة الصفحات المحددة دفعة واحدة.
ملاحظة: اضغط Esc للخروج من وضع التمديد.
حذف صفحات متعددة محددة باستخدام Kutools for Word
إذا كنت بحاجة إلى حذف صفحات متعددة محددة من مستند Word كبير، تتيح لك ميزة تحديد الصفحات في Kutools for Word اختيار وإزالة الصفحات المطلوبة بسهولة. اتبع الخطوات التالية:
- افتح مستند Word الذي تريد تعديله، وانقر على Kutools > تحديد > صفحات > تحديد الصفحات.
- في تحديد الصفحات مربع الحوار الذي يظهر، اختر أحد الخيارات التالية:
- تحديد الصفحات وفقًا للنطاق: حدد نطاقًا من الصفحات لاختيار صفحات متعددة متتالية.
- تحديد الصفحات وفقًا للاختيار: حدد الصفحات غير المتتالية يدويًا عن طريق النقر عليها بشكل فردي.
- انقر موافق لتحديد الصفحات المطلوبة. ثم اضغط مفتاح الحذف لإزالتها جميعًا دفعة واحدة.
حذف صفحات متعددة محددة في مستند Word باستخدام كود VBA
إذا كنت بحاجة إلى حذف صفحات متعددة غير متتالية من مستند Word، يمكن أن يساعدك الكود التالي لـ VBA في تحقيق ذلك بكفاءة.
- اضغط مع الاستمرار على Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
- انقر إدراج > وحدة، والصق الكود التالي لـ VBA في نافذة الوحدة:
Sub DeletePagesInDoc() Dim xRange As Range Dim xPage As String Dim xDoc As Document Dim xArr Dim I, xSplitCount As Long Application.ScreenUpdating = False Set xDoc = ActiveDocument xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _ "use comma to separate numbers", "KuTools for Word", "") xArr = Split(xPage, ",") xPageCount = UBound(xArr) For I = xPageCount To 0 Step -1 Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I) xDoc.Bookmarks("\Page").Range.Delete Next Application.ScreenUpdating = True End Sub
- اضغط F5 لتشغيل الكود. ستظهر مربع مطالبة يطلب منك إدخال أرقام الصفحات التي تريد حذفها. افصل بين أرقام الصفحات بفاصلة. انظر لقطة الشاشة:
- انقر زر موافق، وسيتم حذف جميع الصفحات المحددة فورًا.
أفضل أدوات الإنتاجية لمكتبك
Kutools for Word – عزز تجربتك في Word مع أكثر من 100 ميزة مذهلة!
🤖 ميزات Kutools AI: مساعد الذكاء الاصطناعي / مساعد الوقت الحقيقي / تلميع فائق (مع الحفاظ على التنسيق) / ترجمة فائقة (مع الحفاظ على التنسيق) / إخفاء المعلومات باستخدام الذكاء الاصطناعي / التدقيق اللغوي بالذكاء الاصطناعي...
📘 إتقان المستندات: تقسيم الصفحات / دمج المستندات / تصدير التحديد بصيغ متعددة (PDF/TXT/DOC/HTML...) / تحويل جماعي إلى PDF...
✏ تحرير المحتوى: البحث والاستبدال الجماعي عبر عدة ملفات / تغيير حجم جميع الصور / تحويل الجدول بين الصفوف والأعمدة / تحويل الجدول إلى نص...
🧹 تنظيف بلا عناء: إزالة المسافات الزائدة / فواصل الأقسام / مربعات النص / الارتباطات التشعبية / للمزيد من أدوات الإزالة، توجه إلى مجموعة إزالة...
➕ إدراجات إبداعية: إدراج فواصل الآلاف / مربعات اختيار / أزرار راديو / رمز QR / الباركود / صور متعددة / اكتشف المزيد في مجموعة إدراج...
🔍 تحديدات دقيقة: تحديد صفحات معينة / الجداول / الأشكال / فقرات العنوان / عزز التنقل مع المزيد من ميزات التحديد...
⭐ تحسينات مميزة: انتقل إلى أي موقع / إدراج تلقائي للنصوص المتكررة / التبديل بين نوافذ المستندات /11 أداة تحويل...

أفضل أدوات الإنتاجية لمكتبك
Kutools for Word – أكثر من 100+ أداة لـ Word
- 🤖 ميزات Kutools AI: مساعد الذكاء الاصطناعي / مساعد الوقت الحقيقي / تلميع فائق / ترجمة فائقة / إخفاء المعلومات باستخدام الذكاء الاصطناعي / التدقيق اللغوي بالذكاء الاصطناعي
- 📘 إتقان المستندات: تقسيم الصفحات / دمج المستندات / تحويل جماعي إلى PDF
- ✏ تحرير المحتوى: البحث والاستبدال الجماعي / تغيير حجم جميع الصور
- 🧹 تنظيف بلا عناء: إزالة المسافات الزائدة / إزالة فواصل الأقسام
- ➕ إدراجات إبداعية: إدراج فواصل الآلاف / إدراج مربعات اختيار / إنشاء رموز QR