كيفية تحديد خلايا غير فارغة في نطاق في إكسيل؟
لنفترض أن هناك العديد من الخلايا الفارغة غير المتجاورة الموجودة في نطاق ، والآن تحتاج إلى تحديد جميع الخلايا التي تحتوي على محتوى في الوقت الحالي. كيف تحدد بسهولة جميع الخلايا غير الفارغة في Excel بسهولة؟ هناك عدة حيل لحلها.
- حدد خلايا غير فارغة في نطاق باستخدام ميزة Go To Special
- حدد خلايا غير فارغة في نطاق باستخدام VBA
- حدد خلايا غير فارغة في نطاق باستخدام Kutools for Excel (خطوة واحدة فقط)
حدد خلايا غير فارغة في نطاق باستخدام ميزة Go To Special
يمكن أن تساعدنا ميزة Go To Special في تحديد خلايا غير فارغة في نطاق محدد من خلال الخطوات التالية.
1. حدد النطاق الذي ستحدد جميع الخلايا غير الفارغة منه ، واضغط على F5 مفتاح لفتح مربع الحوار "الانتقال إلى". ثم انقر فوق ملف خاص زر لفتح مربع الحوار "الانتقال إلى خاص".
ملاحظة: يمكنك أيضًا فتح ملف انتقل إلى خاص مربع الحوار مباشرة مع النقر فوق الرئيسية > بحث وتحديد > انتقل إلى خاص.
2. في مربع الحوار Go To Special ، حدد ملف ثابت اختيار، أرقام اختيار، نص اختيار، المنطق الخيار، و أخطاء الخيار، وانقر فوق OK .
الآن سترى فقط الخلايا غير الفارغة مع تحديد المحتوى في النطاق المحدد. انظر أدناه لقطات:
نقرة واحدة لتحديد جميع الخلايا غير الفارغة في نطاق في Excel
كوتولس ل إكسيل حدد الخلايا غير الفارغة يمكن أن تساعدك الأداة المساعدة في تحديد جميع الخلايا غير الفارغة بسرعة من نطاق محدد بنقرة واحدة فقط.

حدد خلايا غير فارغة في نطاق باستخدام VBA
نقدم هنا ماكرو VBA لتحديد جميع الخلايا غير الفارغة من نطاق محدد. الرجاء القيام بما يلي:
1. اضغط على قديم + F11 مفاتيح لفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.
2. انقر على إدراج > وحدة، ثم الصق رمز فبا التالي في نافذة الوحدة النمطية الافتتاحية.
فبا: حدد خلايا غير فارغة من نطاق
Sub SelectNonBlankCells()
Dim Rng As Range
Dim OutRng As Range
Dim InputRng As Range
Dim xTitle As String
On Error Resume Next
xTitle = Application.ActiveWindow.RangeSelection.Address
Set InputRng = Application.InputBox("Range :", "KutoolsforExcel", xTitle, Type:=8)
Set InputRng = Application.Intersect(InputRng, Application.ActiveSheet.UsedRange)
For Each Rng In InputRng
If Not Rng.Value = "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Application.Union(OutRng, Rng)
End If
End If
Next
If Not (OutRng Is Nothing) Then
OutRng.Select
End If
End Sub
3. اضغط على F5 مفتاح أو انقر فوق يجري زر لتشغيل هذا VBA.
4. في مربع حوار الفتح ، يرجى تحديد النطاق الذي ستحدده من الخلايا غير الفارغة فقط ، وانقر فوق OK .
الآن يتم تحديد جميع الخلايا غير الفارغة في النطاق المحدد على الفور.
حدد خلايا غير فارغة في نطاق باستخدام Kutools for Excel
كوتولس ل إكسيل حدد الخلايا غير الفارغة تتيح لك الأداة المساعدة تحديد جميع الخلايا غير الفارغة من نطاق معين بنقرة واحدة فقط.
كوتولس ل إكسيل - يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. نسخة تجريبية مجانية كاملة الميزات 30اليوم ، لا حاجة لبطاقة ائتمان! تجربة مجانية الآن!
حدد النطاق الذي ستحدد الخلايا غير الفارغة فقط ، وانقر فوق كوتولس > اختار > حدد الخلايا غير الفارغة.
الآن يتم تحديد جميع الخلايا غير الفارغة في النطاق المحدد مرة واحدة.
كوتولس ل إكسيل - يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. نسخة تجريبية مجانية كاملة الميزات 30اليوم ، لا حاجة لبطاقة ائتمان! احصل عليه الآن
عرض توضيحي: حدد خلايا غير فارغة في نطاق في Excel
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
