إضافة صفوف أو أعمدة بسرعة إلى جدول في مستند Word

عند العمل على مستند Word، تعد إضافة صفوف وأعمدة إلى الجداول مهمة شائعة يمكن أن تساعدك في تنظيم المعلومات وعرضها بشكل أكثر فعالية. يوفر هذا الدليل خطوات مفصلة حول كيفية إضافة صفوف أو أعمدة بسرعة وكفاءة إلى جدول في Word.

إضافة صفوف فوق أو أسفل التحديد إلى جدول

إضافة أعمدة إلى اليسار أو اليمين من التحديد إلى جدول

إضافة صفوف متعددة إلى جدول باستخدام كود VBA

حذف الصفوف أو الأعمدة

إضافة صفوف فوق أو أسفل التحديد إلى جدول

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

الخطوة 1: حدد الصفوف التي تريد إدراج صفوف جديدة فوقها أو أسفلها

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

الخطوة 2: قم بتطبيق ميزة "إدراج أعلاه" / "إدراج أدناه"

• الطريقة الأولى: مع الصفوف المحددة، انتقل إلى التخطيط علامة التبويب، اختر إدراج أعلاه أو إدراج أدناه في المجموعة "الصفوف والأعمدة" انظر لقطة الشاشة:
  
• الطريقة الثانية: انقر بزر الماوس الأيمن على التحديد، ثم اختر إدراج > إدراج صفوف أعلاه / إدراج صفوف أدناه, انظر لقطة الشاشة:
  

النتيجة:

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

• إدراج صفوف فوق التحديد
  
• إدراج صفوف بعد التحديد
  

إضافة أعمدة إلى اليسار أو اليمين من التحديد إلى جدول

يقدم هذا القسم نظرة عامة مفصلة حول كيفية إضافة أعمدة إلى اليسار أو اليمين من التحديد الحالي في جدول Word. سنغطي طريقتين رئيسيتين: باستخدام علامة التبويب "التخطيط" واستخدام قائمة السياق بالزر الأيمن للماوس.

الخطوة 1: حدد الأعمدة التي تريد إدراج أعمدة جديدة إلى اليسار أو اليمين منها

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

الخطوة 2: قم بتطبيق ميزة "إدراج إلى اليسار" / "إدراج إلى اليمين"

• الطريقة الأولى: مع الأعمدة المحددة، انتقل إلى التخطيط علامة التبويب، اختر إدراج إلى اليسار أو إدراج إلى اليمين في المجموعة "الصفوف والأعمدة" انظر لقطة الشاشة:
  
• الطريقة الثانية: انقر بزر الماوس الأيمن على التحديد، ثم اختر إدراج > إدراج أعمدة إلى اليسار / إدراج أعمدة إلى اليمين, انظر لقطة الشاشة:
  

النتيجة:

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

• إدراج أعمدة إلى اليسار من التحديد
  
• إدراج أعمدة إلى اليمين من التحديد
  

إضافة صفوف متعددة إلى جدول باستخدام كود VBA

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

الخطوة 1: حدد صفًا تريد إدراج صفوف جديدة أعلاه أو أدناه

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

الخطوة 2: افتح محرر وحدة VBA ونسخ الكود

1. اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. في النافذة المفتوحة، انقر على إدراج > وحدة لإنشاء وحدة فارغة جديدة.
3. ثم، انسخ والصق أيًا من الأكواد أدناه في الوحدة الفارغة.
   كود VBA: إضافة صفوف متعددة أعلاه الصف المحدد

   Sub Addrowsabove()
   'Updateby Extendoffice
       Dim lngIndex As Long
       Dim lngRowsToAdd As Long
       Dim lngPosit As Long
       Dim oTbl As Word.Table
       If Selection.Information(wdWithInTable) Then
           lngRowsToAdd = InputBox("How many rows?", "Kutools for Word", 1)
           Set oTbl = Selection.Tables(1)
           lngPosit = Selection.Rows(1).Range.Information(wdEndOfRangeRowNumber)
           For lngIndex = 1 To lngRowsToAdd
               oTbl.Rows.Add oTbl.Rows(lngPosit)
           Next lngIndex
       End If
   End Sub

   
   كود VBA: إضافة صفوف متعددة أدناه الصف المحدد

   Sub Addrowsbelow()
   'Updateby Extendoffice
       Dim lngIndex As Long
       Dim lngRowsToAdd As Long
       Dim lngRowPosition As Long
       Dim oTbl As Word.Table
       If Selection.Information(wdWithInTable) Then
           lngRowsToAdd = InputBox("How many rows?", "Kutools for Word", 1)
           Set oTbl = Selection.Tables(1)
           lngRowPosition = Selection.Rows(1).Index
           For lngIndex = 1 To lngRowsToAdd
               oTbl.Rows.Add oTbl.Rows(lngRowPosition + lngIndex)
           Next lngIndex
       End If
   End Sub

الخطوة 3: تنفيذ الكود

ثم اضغط على مفتاح F5 لتشغيل الكود. في مربع الحوار المنبثق، الرجاء كتابة عدد الصفوف الذي تريد إدراجه، والنقر على الزر موافق .

النتيجة:

سيضيف الكود عدد الصفوف المحدد إلى جدولك في الموقع المخصص دفعة واحدة، إما أعلاه أو أدناه.

حذف الصفوف أو الأعمدة

إذا كنت تريد حذف صف أو أعمدة من جدول في مستند Word، هنا، سأتحدث عن بعض الحيل السهلة.

الخطوة 1: حدد الصف أو العمود بالكامل في جدول

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

الخطوة 2: اضغط على مفتاح Backspace

اضغط على مفتاح Backspace على لوحة المفاتيح لإزالة الصف أو العمود المحدد فورًا.

مقالات ذات صلة: