Note: The other languages of the website are Google-translated. Back to English

كيفية تحديد كافة الجداول في مستند Word؟

من السهل تحديد جدول في Word بالنقر فوق نقطة تحديد الجدول رمز الزر الموجود في الزاوية اليسرى العلوية من الجدول كما هو موضح أدناه. يمكنك أيضًا تحديد جدول بميزة تحديد الجدول. ومع ذلك ، هل هناك أي طريقة لتحديد جميع الجداول بسرعة مرة واحدة في مستند Word؟ ستساعدك الطرق الواردة في هذه المقالة على تجاوزها. 


حدد جميع الجداول في Word مع رمز VBA

حدد بسهولة جميع الجداول في Word باستخدام Kutools for Word


حدد جميع الجداول في Word مع رمز VBA

1. صحافة قديم + F11 مفاتيح لفتح Microsoft Visual Basic للتطبيق نافذة.

2. في الافتتاح ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة، ثم انسخ والصق رمز فبا التالي في نافذة الوحدة النمطية ؛

كود فبا: حدد كل الجداول في المستند الحالي:

Sub selecttables()
Dim mytable As Table

For Each mytable In ActiveDocument.Tables
mytable.Range.Editors.Add wdEditorEveryone
Next
ActiveDocument.SelectAllEditableRanges (wdEditorEveryone)
ActiveDocument.DeleteAllEditableRanges (wdEditorEveryone)
End Sub

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

ثم يتم تحديد جميع الجداول في المستند الحالي على الفور.


حدد بسهولة جميع الجداول في Word باستخدام Kutools for Word

مقارنة باستخدام رمز VBA لتحديد جميع الجداول في مستند ، Kutools for Word's حدد الجداول فائدة مفيدة جدا. يمكنك استخدام هذه الميزة لتحديد الجداول في التحديد أو المستند بأكمله. الرجاء القيام بما يلي:

كوتولس للكلمة : مع أكثر من 100 وظيفة إضافية مفيدة لـ Word ، تجربة مجانية بدون قيود خلال 60 يومًا.

انقر كوتولس > الجداول > حدد الجداول. انظر لقطة الشاشة:

ملاحظة: لاختيار الجداول في التحديد ، تحتاج إلى تحديد النطاق أولاً ثم تطبيق الميزة.

ثم يمكنك رؤية النتائج على النحو التالي.

حدد الجداول في الاختيار:

حدد الجداول في المستند بأكمله:

إذا كنت تريد الحصول على نسخة تجريبية مجانية من هذه الأداة المساعدة ، فيرجى الانتقال إلى تنزيل البرنامج مجانًا اولا ثم انتقل لتطبيق العملية حسب الخطوات اعلاه.


العرض التوضيحي: حدد بسهولة جميع الجداول في Word باستخدام Kutools for Word



أدوات إنتاجية Word الموصى بها

 

Kutools For Word - أكثر من 100 ميزة متقدمة لـ Word ، وفر وقتك بنسبة 50 ٪

  • يمكن إجراء العمليات المعقدة والمتكررة لمرة واحدة في ثوانٍ.
  • أدخل صورًا متعددة عبر المجلدات في مستند Word مرة واحدة.
  • دمج ودمج ملفات Word المتعددة عبر المجلدات في ملف واحد بالترتيب الذي تريده.
  • قسّم المستند الحالي إلى مستندات منفصلة وفقًا للعنوان أو فاصل المقطع أو معايير أخرى.
  • قم بتحويل الملفات بين Doc و Docx و Docx و PDF ، ومجموعة من الأدوات للتحويلات والاختيارات الشائعة ، وما إلى ذلك ...
فرز التعليقات حسب
التعليقات (10)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا انه برنامج جيد ولكن بعد أيام قليلة توقف ويطلب كلمة المرور واسم المستخدم
تم تصغير هذا التعليق بواسطة المشرف على الموقع
ماكرو ممتاز وسهل جدا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
رمز Nifty في البداية ولكنه أفسد بالتأكيد مجموعة من الجداول في Word 2010. لقد أفسد ملفي جيدًا واضطر إلى العودة إلى إصدار سابق. كن حذر!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
رائع لقد حصلت على الحل باستخدام كود فبا. شكرا جزيلا لك
تم تصغير هذا التعليق بواسطة المشرف على الموقع
تحدد التعليمات البرمجية المعدلة التالية كافة الجداول ، باستثناء الجداول التي تحتوي على صف واحد فقط: Sub SelAllTbls () ActiveDocument.DeleteAllEditableRanges (-1) Dim Tbl كجدول لكل Tbl في ActiveDocument.Tables If Tbl.Rows.Count> 1 ثم Tbl.Range. Editors.Add (-1) End If Next ActiveDocument.SelectAllEditableRanges (-1) ActiveDocument.DeleteAllEditableRanges (-1) End Sub الكود التالي حدد صفوف الرأس فقط: Sub selallHeaders () عند الخطأ استئناف التالي ActiveDocument.DeleteAllEditableRanges (-1) Dim Tbl كجدول لكل Tbl في ActiveDocument.Tables Tbl.Rows (1) .Range.Editors.Add (-1) Next ActiveDocument.SelectAllEditableRanges (-1) ActiveDocument.DeleteAllEditableRanges (-1) End Sub لدي العديد من الأكواد المماثلة التي تحدد الصفوف الأخيرة ، وجميع الرموز النقطية ، والفقرات الصغيرة / الطويلة ، وما إلى ذلك. شاهد الفيديو التالي: https://www.youtube.com/watch?v=p_ZhufliFw8
تم تصغير هذا التعليق بواسطة المشرف على الموقع
توجد جداول متعددة في المستند (حوالي 200). أريد تحديد كل هذه الجداول فقط ولصقها في مستند جديد بتنسيق الجدول. عندما أحدد الجداول وفقًا للإجراء أعلاه ، أثناء عملية اللصق ، يتم لصقها كنص وليس كجدول. هل تستطيع مساعدتي رجاء؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يرى أن وحدات الماكرو هذه لا تعمل في Word 2016
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يعمل في Word 2016. ما الخطأ الذي تحصل عليه؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
أنا أفهم بالفعل. من أجل العمل الصحيح ، يجب ألا يكون المؤشر في الجدول عند استدعاء وحدات الماكرو. شكرًا لك.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
طريقة جميلة جدا. شكرًا لك
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة