كيفية حساب فواصل الأسطر في الخلية في إكسيل؟

إذا كانت المحتويات طويلة جدًا لدخول الخلية ، فعادة ما نستخدم فواصل الأسطر لكسر المحتويات بحيث يمكن عرض المحتويات بالكامل في الخلية كما هو موضح أدناه. هل سبق لك أن حاولت حساب عدد فواصل الأسطر في الخلية؟

عد فواصل الأسطر في الخلية مع الصيغة

عد فواصل الأسطر في الخلية باستخدام VBA

---

عد فواصل الأسطر في الخلية مع الصيغة

لحساب فواصل الأسطر في خلية ، يمكنك تجربة هذه الصيغة.

حدد خلية بجوار السلسلة التي تريد حساب فواصل الأسطر ، اكتب = LEN (A2) -LEN (الاستبدال (A2، CHAR (10)، ""))، و اضغط أدخل مفتاح. انظر لقطة الشاشة:

ملاحظة:

1. إذا كنت تعمل بنظام Mac ، فجرب هذه الصيغة = LEN (A2) -LEN (الاستبدال (A2، CHAR (13)، ""))

2. تحسب الصيغ أعلاه فقط فواصل الأسطر اليدوية.

---

عد فواصل الأسطر في الخلية باستخدام VBA

فيما يلي رمز VBA الذي يمكنه أيضًا حساب فواصل الأسطر في خلية في Excel.

1. صحافة ALT + F11 مفاتيح للتمكين ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، نسخ ولصق التعليمات البرمجية في الوحدة النمطية.

فبا: عد فاصل الأسطر اليدوي

Public Sub CountLines()
'UpdatebyExtendoffice20171222
    Dim xStrLen As Double
    Dim xChrLen As Double
    With Range("A2")
        xStrLen = Len(.Text)
        xChrLen = Len(Replace(.Text, Chr(10), ""))
    End With
    MsgBox "There are " & xStrLen - xChrLen & " line breaks"
End

3. صحافة F5 المفتاح ، يظهر مربع حوار ليخبرك بعدد فواصل الأسطر.

---