كيف تُدرج أو تحذف جزءًا من صف في Excel؟
يُعد إدراج أو حذف صفٍّ كامل في Excel من المهارات الأساسية التي يتقنها معظم المستخدمين. ومع ذلك، توجد العديد من السيناريوهات العملية التي تتطلب منك إضافة أو إزالة جزءٍ فقط من صفٍّ ما — أي مجموعة من الخلايا المتصلة أو غير المتصلة ضمن صفٍ واحد — دون التأثير على باقي محتويات ذلك الصف. على سبيل المثال، قد ترغب في إزاحة عناصر معيّنة إلى اليمين في جزءٍ من جدول البيانات، أو حذف بيانات من خلايا محددة داخل صفٍ معين مع الحفاظ على بقية الخلايا كما هي. وغالبًا ما يظهر هذا الحاجة عند التعامل مع جداول بيانات معقدة تحتوي على بيانات منظمة، أو جداول زمنية، أو نماذج، حيث تصبح التعديلات الدقيقة ذات قيمة كبيرة. إذا لم تكن متأكدًا من كيفية إدراج أو حذف جزءٍ من صفٍ بدلاً من الصف بأكمله، فستوفّر لك هذه المقالة إرشاداتٍ خطوة بخطوة وحلولًا عمليةً لتحقيق ذلك.
➤ إدراج أو حذف صف جزئي باستخدام كود VBA
إدراج أو حذف جزء من صف باستخدام وظيفة إدراج/حذف خلايا
افترض أنك بحاجة إلى إدراج أو حذف جزء من صف—مثل ثلاث خلايا محددة—في الصف 5. تُمكّنك وظيفتا «إدراج خلايا» و«حذف خلايا» في Excel من تنفيذ ذلك بنقرات قليلة فقط، وهما الخيار المثالي عندما تكون لديك مجموعة خلايا محددة بوضوح تريد تعديلها داخل صف أو منطقة ثابتة تتطلب تحديثات دورية.
إدراج جزء من صف
1. حدد العدد الدقيق من الخلايا المتصلة في الصف 5 حيث تريد إدراج الخلايا الجديدة. على سبيل المثال، إذا أردت إدراج ثلاث خلايا، فحدد ثلاث خلايا متجاورة في الصف 5. يجب أن يتطابق عدد الخلايا المحددة مع عدد الخلايا التي تنوي إدراجها للحفاظ على المحاذاة.
2. انتقل إلى علامة التبويبالرئيسية، ثم انقر فوقإدراج > إدراج خلايا. راجع لقطة الشاشة:

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

يقوم Excel بإدراج خلايا جديدة ويدفع المحتوى الموجود وفقًا لاختيارك. إليك مثالًا على النتيجة:

- الصيغ والمراجع:قد يؤدي الإدراج باستخدامإزاحة الخلايا إلى اليمينإلى تحريك الخلايا المرجعية؛ لذا راجع الصيغ التابعة بعد ذلك.
- التحديد المتصل:تعمل وظيفة الإدراج بشكل أفضل مع الخلايا المتصلة؛ لذا تجنّب التحديدات غير المجاورة المختلطة.
حذف جزء من صف
1. حدد الخلايا المتجاورة في الصف 5 التي تريد إزالتها (مثل ثلاث خلايا متصلة).
2. انتقل إلى علامة التبويبالرئيسية، ثم انقر فوقحذف > حذف خلايا.
3. في مربع الحوارحذف، اختر: إزاحة الخلايا إلى اليسارلسحب الخلايا من اليمين وملء الفراغ (وهو الخيار المعتاد لعمليات الحذف الأفقية)، أوإزاحة الخلايا لأعلىلسحب الخلايا من الأسفل وتحريكها للأعلى (يُستخدم في التعديلات الرأسية). ثم انقر فوقموافق.

تُحذف الخلايا المحددة، ويتم إزاحة المحتوى المتبقي وفقًا لاختيارك.
- تحقق من الصيغ:قد يؤثر الحذف باستخدامإزاحة الخلايا إلى اليسارعلى المراجع في نفس الصف؛ لذا تحقق من النتائج.
- الخلايا غير المتصلة:قم بحذف المجموعات المتصلة لتجنب حدوث تحركات غير متوقعة في التنسيق.
- التراجع:استخدمCtrl+Z للإلغاء فورًا إذا لم يكن التنسيق كما تريد.
تُعد هذه الخيارات المدمجة مباشرةً مثالية للتعديلات الفردية أو غير المتكررة، أما للعمليات المتكررة أو الواسعة النطاق، فننصحك باستخدام نهج VBA.

افتح سحر إكسل مع KUTOOLS AI
- التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
- الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
- برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
- تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
- ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
إدراج أو حذف جزء من صف باستخدام كود VBA
يوفّر VBA (Visual Basic for Applications) للمستخدمين المتقدمين أو عند تنفيذ مهام متكررة وسيلة مرنة لإدراج أجزاء من الصفوف أو حذفها برمجيًا. ويُعد هذا النهج فعّالًا للغاية عند التعامل مع مجموعات بيانات كبيرة، حيث تكون العمليات اليدوية مُستهلكة للوقت، أو عندما تتطلب عمليات الصف الجزئية تخصيصًا يتجاوز الخيارات القياسية المتوفرة في Excel.
يمكنك الاستفادة من حلول VBA التالية لإدراج أو حذف أجزاء من الصفوف في Excel، حيث تقوم هذه الماكروهات بأتمتة معالجة الخلايا وفقًا للمعاملات التي تحددها.
1. حدد أي خلية في الصف الذي تريد إدراج أجزاء صفوف فيه، ثم اضغط علىAlt+F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. في نافذةMicrosoft Visual Basic for Applications، انقر فوقإدراج > وحدة نمطية (Module). ثم انسخ والصق كود VBA الموضح أدناه في نافذة الكود.
كود VBA: إدراج جزء من صف في Excel
Sub InsertRow()
Dim I As Long
On Error Resume Next
LInput:
I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
If I < 1 Then
MsgBox "Error, please retype", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Insert xlDown
End Sub شرح المعاملات:في كود VBA هذا، يُحدد1 (المعامل الأول) أن الإدراج يبدأ منالعمود 1 (أي العمود A)، بينما يُحدد3 (المعامل الثاني) أنه سيتم إدراج ثلاث خلايا جديدة عبر الصف المحدد. يمكنك بسهولة تعديل هذه القيم لتناسب احتياجاتك بدقة—مثل البدء من عمود مختلف أو تغيير عدد الخلايا المُدرجة—مما يمنحك مرونة كاملة في تخصيص هياكل بياناتك.
3. بعد لصق الكود، اضغط علىF5 أو انقر فوق زرتشغيل (Run)لتنفيذ الماكرو. ستظهر نافذة حوارKutools لـ Excelتطلب منك إدخال عدد الصفوف التي ترغب في إدراجها. أدخل العدد المطلوب (على سبيل المثال،)3)، ثم انقر فوقموافق.
بعد التأكيد، سيقوم الماكرو بإدراج عدد الصفوف الجزئية المحدد مع العدد المختار من الأعمدة، بدءًا من الموقع الذي حددته في ورقة العمل الخاصة بك—مما يلغي الحاجة إلى الإجراءات اليدوية المتكررة ويضمن دقةً عاليةً حتى في أكثر المهام تعقيدًا.

إذا كنت بحاجة بدلاً من ذلك إلى حذف عدة صفوف جزئية، يمكنك استخدام كود VBA التالي، الذي يُعدّ أداة فعّالة جدًّا لتنظيف البيانات المنظمة أو إزالة الأجزاء القديمة من مجموعة البيانات بكفاءة.
كود VBA: حذف جزء من صف في Excel
Sub DelActiveCell_Row()
Dim I As Long
On Error Resume Next
LInput:
I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
If I < 1 Then
MsgBox " Error, please retype", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Delete xlShiftUp
End Sub بعد تشغيل هذا الكود، ستظهر نافذة حوارKutools لـ Excelتطلب منك إدخال عدد الصفوف الجزئية التي ترغب في حذفها. أدخل القيمة المناسبة، ثم انقر فوقموافق. وسيقوم الكود فورًا بإزالة العدد المحدد من الصفوف الجزئية من ورقة العمل الخاصة بك.
- احفظ أولًا:لا يمكن التراجع عن الماكرو باستخدام خاصيةالتراجع (Undo). احفظ نسخة احتياطية قبل التشغيل.
- إعدادات الماكرو:تأكد من تفعيل الماكرو وأن الورقة أو ملف العمل غير محمي.
- النطاقات المتصلة:تعمل هذه الإجراءات على كتل متصلة تبدأ من الصف النشط، العمود 1، وتمتد عبر 3 أعمدة ولعددI من الصفوف.
- الصيغ والمراجع:قد يؤدي إدراج أو حذف الخلايا إلى إزاحة المراجع؛ لذا تأكد من مراجعة أي صيغ مرتبطة بعد التنفيذ.
باختصار، يعتمد الأسلوب الذي تختاره على هيكل بياناتك، واحتياجك إلى الأتمتة، والقيود المدمجة في Excel. فللمهام الروتينية، تُغطّي وظيفتا «إدراج/حذف خلايا» معظم احتياجاتك؛ أما في حالات الأتمتة أو السيناريوهات الأكثر تعقيدًا، فيمنحك VBA مرونةً أكبر. تأكد دائمًا من مراجعة بياناتك بعد تنفيذ العمليات لتجنب التغييرات غير المتوقعة، خاصة عند إزاحة الخلايا، إذ قد تُحدَّث المراجع والصيغ تلقائيًا.
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل