كيفية نسخ ولصق الخلايا غير الفارغة فقط في إكسيل؟
قد يعاني معظمنا من هذه المشكلة ، عندما نقوم بنسخ قائمة بيانات تحتوي على بعض الخلايا الفارغة ، ثم لصقها في عمود آخر ، سيتم أيضًا لصق الخلايا الفارغة أيضًا. هذا أمر مزعج للغاية عندما لا نحتاج إلى الفراغات ونريد لصق الخلايا غير الفارغة فقط. في هذه الحالة ، كيف يمكننا نسخ ولصق الخلايا غير الفارغة فقط في Excel بسرعة وسهولة؟ إليك بعض الحيل السريعة لحلها:
انسخ والصق الخلايا غير الفارغة فقط باستخدام الأمر Go To Special
نسخ ولصق الخلايا غير الفارغة فقط باستخدام ميزة التصفية
انسخ والصق الخلايا غير الفارغة فقط باستخدام صيغة Array Formula
انسخ والصق الخلايا غير الفارغة فقط برمز VBA
انسخ والصق الخلايا غير الفارغة فقط باستخدام Kutools for Excel
انسخ والصق الخلايا غير الفارغة فقط باستخدام الأمر Go To Special
مع انتقل إلى خاص الأمر ، يمكنك تحديد جميع البيانات أولاً ، ثم نسخها ولصقها في موقع آخر.
1. حدد قائمة البيانات التي تريد استخدامها.
2. ثم اضغط الصفحة الرئيسية > بحث وتحديد > انتقل إلى خاص، انظر لقطة الشاشة:
3. في انتقل إلى خاص مربع الحوار ، تحقق ثابت الخيار ، انظر لقطة الشاشة:
4. ثم اضغط OK، وتم تحديد خلايا القيمة فقط في القائمة.
5. ثم انسخ البيانات والصقها في الموقع الذي تريده. وتم لصق قيم الخلايا غير الفارغة فقط. انظر لقطة الشاشة:
ملاحظات: هذه الطريقة متاحة فقط للثوابت ، ولا يتم تطبيقها على خلايا الصيغة.
نسخ ولصق الخلايا غير الفارغة فقط باستخدام ميزة التصفية
• منقي يمكن أن تساعدك الميزة في تصفية الخلايا غير الفارغة أولاً ، ثم يمكنك نسخها ولصقها في خلايا أخرى حسب حاجتك.
2. انقر البيانات > منقي، انظر لقطة الشاشة:
3. ثم انقر فوق زر القائمة المنسدلة في الزاوية اليمنى للخلية في القائمة المحددة ، وقم بإلغاء تحديد الفراغات الخيار تحت القائمة المنسدلة. انظر لقطة الشاشة:
4. ثم انقر فوق OK، تم تصفية جميع الخلايا غير الفارغة كما هو موضح في لقطة الشاشة التالية:
5. أخيرًا ، يمكنك نسخ البيانات التي تمت تصفيتها ولصقها في أي مكان تريده.
ملاحظات: يتم تفعيل كل من القيم والصيغ باستخدام هذه الطريقة.
حدد خلايا غير فارغة مرة واحدة |
انقر للحصول على النسخة التجريبية المجانية الكاملة خلال 30 يومًا! |
انسخ والصق الخلايا غير الفارغة فقط باستخدام صيغة Array Formula
لنسخ ولصق الخلايا غير الفارغة فقط ، يمكنك أيضًا تطبيق صيغة الصفيف التالية.
1. إلى جانب البيانات الخاصة بك ، أدخل الصيغة التالية في خلية فارغة:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
ملاحظات: في الصيغة أعلاه ، A1: A15 هي قائمة البيانات التي تريد استخدامها. يمكنك تغييرها حسب حاجتك.
2. ثم اضغط شيفت + كترل + إنتر معًا ، ثم حدد الخلية B1 ، واسحب مقبض التعبئة إلى النطاق الذي تريده أن يحتوي على هذه الصيغة ، وتم استخراج جميع قيم الخلايا غير الفارغة. انظر لقطة الشاشة:
3. نظرًا لأنها صيغ ، عند نسخها إلى مكان آخر ، يجب نسخها ولصقها كقيم.
ملاحظات: هذه الصيغة متاحة فقط للثوابت ، ولا يتم تطبيقها على خلايا الصيغة.
انسخ والصق الخلايا غير الفارغة فقط برمز VBA
إذا كنت مهتمًا برمز VBA ، فيمكنك تنفيذ التعليمات البرمجية التالية لإنهاء هذه المهمة.
1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.
رمز فبا: نسخ ولصق فقط الخلايا غير الفارغة في إكسيل
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 مفتاح لتشغيل هذا الرمز ، سيظهر مربع موجه لتذكيرك بتحديد نطاق البيانات الذي تريد استخدامه. انظر لقطة الشاشة:
4. ثم انقر فوق OK، سيظهر مربع موجه آخر للسماح لك باختيار خلية لوضع البيانات.
5. انقر OK لإنهاء هذا الرمز ، ولم يتم لصق سوى قيم الخلايا غير الفارغة في الموضع المحدد.
ملاحظات: هذا الكود متاح فقط للثوابت.
انسخ والصق الخلايا غير الفارغة فقط باستخدام Kutools for Excel
هل هناك طريقة أسهل بكثير مما سبق؟ بالطبع، كوتولس ل إكسيل's حدد خلية غير فارغةيمكن أن تساعدك الأداة المساعدة في تحديد الخلايا غير الفارغة أولاً ، ثم نسخها ولصقها.
كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. | ||
بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:
1. حدد نطاق الخلايا ، وانقر فوق كوتولس > أختار > حدد الخلايا غير الفارغة. انظر لقطة الشاشة:
2. ثم يتم تحديد الخلايا غير الفارغة ، اضغط CTRL + C لنسخها ، ثم انتقل لتحديد الخلية التي تريد إخراج النتيجة المرحلية فيها ، اضغط على CTRL + V للصق الخلايا المحددة غير الفارغة. انظر لقطة الشاشة:
نسخ ولصق خلية غير فارغة فقط
Kutools for Excel: أكثر من 300 وظيفة يجب أن تكون لديك في Excel، نسخة تجريبية مجانية لمدة 30 يومًا من هنا |
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!