كيفية تحديد خلايا غير فارغة في نطاق في إكسيل؟
لنفترض أن هناك العديد من الخلايا الفارغة غير المتجاورة الموجودة في نطاق ، والآن تحتاج إلى تحديد جميع الخلايا التي تحتوي على محتوى في الوقت الحالي. كيف تحدد بسهولة جميع الخلايا غير الفارغة في 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 يومًا دون الحاجة إلى بطاقة ائتمان! التحميل الان!
حدد النطاق الذي ستحدد الخلايا غير الفارغة فقط ، وانقر فوق كوتولس > أختار > حدد الخلايا غير الفارغة.
الآن يتم تحديد جميع الخلايا غير الفارغة في النطاق المحدد مرة واحدة.
كوتولس ل إكسيل - شحن برنامج Excel بأكثر من 300 أداة أساسية. استمتع بتجربة مجانية كاملة المواصفات لمدة 30 يومًا دون الحاجة إلى بطاقة ائتمان! احصل عليه الآن
عرض توضيحي: حدد خلايا غير فارغة في نطاق في Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!