Skip to main content

كيفية نسخ ولصق الخلايا غير الفارغة فقط في Excel؟

Author: Xiaoyang Last Modified: 2025-05-30

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

نسخ ولصق الخلايا غير الفارغة فقط باستخدام أمر Go To Special

نسخ ولصق الخلايا غير الفارغة فقط باستخدام Kutools لـ Excel good idea3

نسخ ولصق الخلايا غير الفارغة فقط باستخدام ميزة التصفية

نسخ ولصق الخلايا غير الفارغة فقط باستخدام صيغة المصفوفة

نسخ ولصق الخلايا غير الفارغة فقط باستخدام كود VBA


arrow blue right bubble نسخ ولصق الخلايا غير الفارغة فقط باستخدام أمر Go To Special

باستخدام أمر Go To Special، يمكنك تحديد جميع البيانات أولاً، ثم نسخها ولصقها في موقع آخر.

1. حدد قائمة البيانات التي تريد استخدامها.

select the data list

2. ثم انقر فوق Home > Find & Select > Go To Special، شاهد لقطة الشاشة:

screenshort of clicking Home > Find & Select > Go To Special

3. في مربع الحوار Go To Special، قم بتحديد خيار Constants، شاهد لقطة الشاشة:

check Constants option in the Go To Special dialog box

4. ثم انقر فوق OK، وسيتم تحديد الخلايا ذات القيم فقط في القائمة.

all value cells are selected

5. وبعد ذلك قم بنسخ ولصق البيانات إلى الموقع الذي تريده. وسيتم لصق قيم الخلايا غير الفارغة فقط. شاهد لقطة الشاشة:

copy and paste the data to another location

ملاحظة: هذه الطريقة متاحة فقط للثوابت، ولا يتم تطبيقها على خلايا الصيغ.


arrow blue right bubble نسخ ولصق الخلايا غير الفارغة فقط باستخدام Kutools لـ Excel

هل هناك طريقة أسهل من تلك المذكورة أعلاه؟ بالطبع، يمكن لأداة Select Nonblank Cells في Kutools لـ Excel أن تساعدك في تحديد الخلايا غير الفارغة أولاً، ثم نسخها ولصقها.

Kutools لـ Excel يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة. بالتكامل مع قدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات أمرًا سهلاً للغاية. معلومات تفصيلية عن Kutools لـ Excel... نسخة تجريبية مجانية...

بعد تثبيت Kutools لـ Excel مجانًا ، يرجى القيام بما يلي:

1. حدد نطاق الخلية، وانقر فوق Kutools > Select > Select Nonblank Cells. شاهد لقطة الشاشة:
click Select Nonblank Cells feature of kutools

2. بعد ذلك يتم تحديد الخلايا غير الفارغة، اضغط على Ctrl + C لنسخها، ثم انتقل إلى تحديد الخلية حيث تريد إخراج النتيجة الملصوقة واضغط على Ctrl + V لصق الخلايا غير الفارغة المحددة. شاهد لقطة الشاشة:
copy and paste the selected nonblank cells to other place


arrow blue right bubble نسخ ولصق الخلايا غير الفارغة فقط باستخدام ميزة التصفية

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

2. انقر فوق Data > Filter، شاهد لقطة الشاشة:

screenshot of clicking Data > Filter

3. ثم انقر فوق زر القائمة المنسدلة في الزاوية اليمنى من الخلية في القائمة المحددة، وألغِ تحديد الخيار Blanks تحت القائمة المنسدلة. شاهد لقطة الشاشة:
uncheck the Blanks option from Filter feature

4. وبعد ذلك انقر فوق OK، سيتم تصفية جميع الخلايا غير الفارغة كما هو موضح في لقطة الشاشة التالية:

 all the non-blank cells have been filtered out

5. أخيرًا، يمكنك نسخ البيانات المُرشحة ولصقها في أي مكان تحتاج إليه.

ملاحظة: كل من القيم والصيغ تتأثر باستخدام هذه الطريقة.


arrow blue right bubble نسخ ولصق الخلايا غير الفارغة فقط باستخدام صيغة المصفوفة

لنسخ ولصق الخلايا غير الفارغة فقط، يمكنك أيضًا تطبيق صيغة المصفوفة التالية.

1. بجانب بياناتك، أدخل الصيغة التالية في خلية فارغة:

=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))

enter a formula to get the first result

ملاحظة: في الصيغة أعلاه، A1:A15 هي قائمة البيانات التي تريد استخدامها. يمكنك تغييرها حسب حاجتك.

2. ثم اضغط معًا على مفاتيح Shift + Ctrl + Enter، وبعد ذلك حدد الخلية B1، واسحب مقبض التعبئة إلى النطاق الذي تريد أن يحتوي على هذه الصيغة، وسيتم استخراج جميع قيم الخلايا غير الفارغة. شاهد لقطة الشاشة:

drag and fill the formula to other cells to get all nonblank cell values

3. بما أنها صيغ، عند نسخها إلى مكان آخر، يجب عليك نسخها ولصقها كقيم.

ملاحظة: هذه الصيغة متاحة فقط للثوابت، ولا يتم تطبيقها على خلايا الصيغ.


arrow blue right bubble نسخ ولصق الخلايا غير الفارغة فقط باستخدام كود VBA

إذا كنت مهتمًا بكود VBA، يمكنك تنفيذ الكود التالي لإكمال هذه المهمة.

1. اضغط معًا على مفاتيح ALT + F11، ويفتح لك نافذة Microsoft Visual Basic for Applications.

2. انقر فوق Insert > Module، والصق الكود التالي في نافذة الوحدة.

كود VBA: نسخ ولصق الخلايا غير الفارغة فقط في Excel

Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
    MsgBox "Please select one column."
    Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub

3. ثم اضغط على مفتاح F5 لتشغيل هذا الكود، ستظهر مربع رسالة لتذكيرك باختيار نطاق البيانات الذي تريد استخدامه. شاهد لقطة الشاشة:

vba code to select the data list

4. وبعد ذلك انقر فوق OK، سيظهر مربع رسالة آخر ليدعوك لاختيار خلية لوضع البيانات فيها.

vba code to select a cell to put the result

5. انقر فوق OK لإنهاء هذا الكود، وسيتم لصق قيم الخلايا غير الفارغة فقط في الموقع المحدد.

ملاحظة: هذا الكود متاح فقط للثوابت.

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

🤖 Kutools AI Aide: أحدث ثورة في تحليل البيانات من خلال: التنفيذ الذكي |توليد الشيفرة |إنشاء الصيغ المخصصة |تحليل البيانات وتوليد الرسوم البيانية |استدعاء الوظائف المحسنة
الميزات الشائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو العنوان دون فقدان البيانات | تقريب ...
بحث متقدم: بحث V متعدد المعايير | بحث V متعدد القيم | بحث في عدة ورقات | مطابقة غامضة ....
قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة تابعة | قائمة منسدلة متعددة الاختيار ....
إدارة الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاق والأعمدة ...
ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | أدوات المصنف & أدوات الورقة العمل | مكتبة النص التلقائي (Auto Text) | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب القائمة | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع من الرسوم البيانية (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد

عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...


Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير

  • تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
  • افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
  • يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!