كيفية تحديد جميع كائنات Word في مستند Word؟

إذا كنت قد أدخلت كائنات مستند Word المضمنة في ملفك، فإن تحديدها واحدة تلو الأخرى يمكن أن يكون مملاً. سيرشدك هذا البرنامج التعليمي حول كيفية تحديد جميع كائنات Word المضمنة بسرعة باستخدام ماكرو VBA أو الحل بنقرة واحدة في Kutools for Word.

حدد جميع كائنات مستند Word المضمنة باستخدام VBA

حدد جميع كائنات مستند Word المضمنة باستخدام Kutools for Word

حدد جميع كائنات مستند Word المضمنة باستخدام VBA

بدلاً من تحديد كل كائن Word مضمن يدويًا، يمكنك استخدام VBA لتحديد كل هذه الكائنات تلقائيًا. إليك الطريقة:

1. اضغط على Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق Module من تبويب Insert، والصق الكود التالي في نافذة الوحدة.

   Sub SelectAllEmbedWordObject()
   Dim tempTable As InlineShape
   Application.ScreenUpdating = False
   ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
   For Each tempTable In ActiveDocument.InlineShapes
       If InStr(tempTable.OLEFormat.ProgID, "Word") = 1 Then
           tempTable.Range.Paragraphs(1).Range.Editors.Add wdEditorEveryone
       End If
   Next
   ActiveDocument.SelectAllEditableRanges wdEditorEveryone
   ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
   Application.ScreenUpdating = True
   End Sub

3. انقر فوق Run أو اضغط على F5 لتنفيذ الكود.

Office Tab: يجلب واجهات تبويب إلى Word وExcel وPowerPoint...

حسّن سير عملك الآن.تعرّف على المزيد حول Office Tab تنزيل مجاني

حدد جميع كائنات مستند Word المضمنة باستخدام Kutools for Word

للحصول على حل أسهل، يتيح لك Kutools for Word تحديد جميع كائنات مستند Word المضمنة بنقرة واحدة فقط، دون الحاجة إلى VBA. يمكنك تحديد الكائنات من المستند بأكمله أو ضمن نطاق محدد فقط.

1. انقر فوق Kutools > فقرات > حدد الفقرات التي تحتوي على كائنات Word مضمنة.

   

أفضل أدوات زيادة الإنتاجية لمكتبك

Kutools لـ Word - ارتقِ بتجربتك في Word مع أكثر من 100 ميزة رائعة!

🤖 ميزات الذكاء الاصطناعي في Kutools: مساعد الذكاء الاصطناعي / مساعد الوقت الحقيقي / تلميع فائق (يحافظ على التنسيقات) / ترجمة فائقة (يحافظ على التنسيقات) / إخفاء المعلومات باستخدام الذكاء الاصطناعي / التدقيق اللغوي بالذكاء الاصطناعي...

📘 إتقان المستندات: تقسيم الصفحات / دمج المستندات / تصدير النطاق إلى تنسيقات متعددة (PDF/TXT/DOC/HTML...) / تحويل جماعي إلى PDF...

✏ تحرير النص: البحث والاستبدال الجماعي عبر ملفات متعددة / تغيير حجم جميع الصور / تحويل صفوف وأعمدة الجدول / تحويل الجدول إلى نص...

🧹 تنظيف سهل: إزالة المسافات الزائدة / فواصل الأقسام / مربعات النص / الروابط التشعبية / للمزيد من أدوات الإزالة، انتقل إلى مجموعة إزالة...

➕ إدراجات مبتكرة: إدراج الفواصل بالألاف / مربعات اختيار / أزرار راديو / رمز QR / باركود / عدة صور / اكتشف المزيد ضمن مجموعة إدراج...

🔍 تحديدات دقيقة: تحديد صفحات محددة / جداول / أشكال / فقرات عنوان / عزز التنقل بالمزيد من ميزات تحديد النطاق...

⭐ تحسينات مميزة: التنقل إلى أي نطاق / إدراج تلقائي للنص المتكرر / التبديل بين نوافذ المستند / 11 أداة تحويل...

🌍 يدعم أكثر من40 لغة: استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية وأكثر من40 لغة أخرى!

👉 هل ترغب في تجربة هذه الميزات؟ قم بتنزيل Kutools لـ Word الآن! 🚀

تحميل مجاني     اشترِ الآن     تعرف أكثر على Kutools لـ Word

 

✨ Kutools لـ Office – تثبيت واحد، خمس أدوات قوية!

يشمل Office Tab Pro · Kutools لـ Excel · أدوات Kutools لـ Outlook · Kutools لـ Word · Kutools لـ PowerPoint

📦 احصل على جميع الأدوات الخمسة في مجموعة واحدة | 🔗 تكامل سلس مع Microsoft Office | ⚡ وفر وقتك وزد إنتاجيتك فوراً

⬇️ حمل الآن 🎁 اشترِ المجموعة الكاملة 📖 تعرف أكثر

أفضل أدوات زيادة الإنتاجية لمكتبك

Kutools لـ Word - 100+ أدوات لـ Word

• 🤖 ميزات الذكاء الاصطناعي في Kutools: مساعد الذكاء الاصطناعي / مساعد الوقت الحقيقي / تلميع فائق / ترجمة فائقة / إخفاء المعلومات باستخدام الذكاء الاصطناعي / التدقيق اللغوي بالذكاء الاصطناعي
• 📘 إتقان المستندات: تقسيم الصفحات / دمج المستندات / تحويل جماعي إلى PDF
• ✏ تحرير النص: البحث والاستبدال الجماعي / تغيير حجم جميع الصور
• 🧹 تنظيف سهل: إزالة المسافات الزائدة / إزالة فواصل الأقسام
• ➕ إدراجات مبتكرة: إدراج الفواصل بالألاف / إدراج مربعات اختيار / إنشاء رمز QR
• 🌍 يدعم أكثر من40 لغة: Kutools يتحدث لغتك – أكثر من40 لغة مدعومة!

تحميل مجاني اشترِ الآن تعرف أكثر حول Kutools