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

تحديد الخلايا غير الفارغة في نطاق باستخدام VBA
هنا نقدم ماكرو VBA لتحديد جميع الخلايا غير الفارغة من النطاق المحدد. يرجى القيام بما يلي:
1. اضغط على مفاتيح Alt + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر فوق إدراج > وحدة، ثم ألصق الكود التالي VBA في نافذة الوحدة المفتوحة.
VBA: تحديد الخلايا غير الفارغة من نطاق
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. في مربع الحوار المفتوح، يرجى تحديد النطاق الذي ستحدد فيه الخلايا غير الفارغة فقط، وانقر فوق الزر موافق .
الآن يتم تحديد جميع الخلايا غير الفارغة في النطاق المحدد فوراً.
تحديد الخلايا غير الفارغة في نطاق باستخدام Kutools لـ Excel
أداة تحديد الخلايا غير الفارغة في Kutools لـ Excel تمكنك من تحديد جميع الخلايا غير الفارغة من نطاق معين بنقرة واحدة فقط.
حدد النطاق الذي ستحدد فيه الخلايا غير الفارغة فقط، وانقر فوق Kutools > تحديد > تحديد الخلايا غير الفارغة.
الآن يتم تحديد جميع الخلايا غير الفارغة في النطاق المحدد دفعة واحدة.
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
عرض: تحديد الخلايا غير الفارغة في نطاق في Excel
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!