كيفية إضافة فاصلة بين كل رقم في خلية من خلايا Excel؟
يمكن أن تكون إضافة فاصلة بين كل رقم في خلية من خلايا Excel مهمة مفيدة، خاصة عند تنسيق البيانات لتحسين قابلية القراءة أو للمعالجة الإضافية. يقدم هذا المقال دليلاً تفصيليًا حول كيفية تحقيق ذلك باستخدام الصيغ، VBA، وKutools، بالإضافة إلى نصائح تحسين لتعزيز الكفاءة.

إضافة فاصلة أو فاصل آخر بين كل رقم في خلية
إضافة فاصلة أو فاصل آخر بين كل رقم باستخدام دالة TEXTJOIN
إذا كنت تستخدم Excel 2019 أو إصدارًا أحدث، يمكنك استخدام دالة TEXTJOIN لإدراج فواصل بين كل رقم.
1. أدخل الصيغة التالية في خلية فارغة، إذا كنت تستخدم Excel 2019، اضغط على "Ctrl" + "Shift" + "Enter". (إذا كنت تستخدم Excel 365 أو إصدارات أحدث، فقط اضغط على مفتاح "Enter".)
2. بعد ذلك، اسحب الصيغة لأسفل لتطبيقها على الخلايا الأخرى. الآن يمكنك رؤية أن الأرقام في الخلية مفصولة بفاصلة.
=TEXTJOIN(",", TRUE, MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1))
- "LEN(A2)": يحسب العدد الإجمالي للأحرف في A2.
- "ROW(INDIRECT("1:"&LEN(A2)))": ينشئ مجموعة من الأرقام من 1 إلى طول A2.
- "MID(A3, ROW(...), 1)": يستخرج كل حرف من A2 بناءً على مواقع الأرقام من الخطوة السابقة.
- "TEXTJOIN(",", TRUE, ...)": يربط جميع الأحرف المستخرجة مع الفاصلة , كفاصل.
إضافة فاصلة أو فاصل آخر بين كل رقم باستخدام Kutools لـ Excel
عزز تنسيق بياناتك بسهولة باستخدام "Kutools لـ Excel"، وهو إضافة قوية مصممة لتبسيط المهام المعقدة. إذا كنت بحاجة إلى إضافة فواصل أو أي فواصل أخرى بين كل رقم في خلية، توفر لك "Kutools" حلًا سريعًا وفعالًا.
بعد تثبيت Kutools لـ Excel، انقر على "Kutools" > "Text" > "Add Text" للانتقال إلى مربع الحوار "Add Text".
في مربع الحوار "Add Text"، قم بتكوين الإعدادات التالية:
- في مربع النص "Text"، أدخل الفاصلة أو الفاصل الآخر الذي تحتاجه؛
- حدد خيار "بين الحروف" من قائمة "Only add to" المنسدلة؛
- أخيرًا، انقر على زر "OK".
النتيجة: ستقوم Kutools بإدراج الفاصل المحدد تلقائيًا بين كل رقم في الخلايا المحددة. شاهد لقطة الشاشة:
إضافة فاصلة أو فاصل آخر بين كل رقم باستخدام دالة معرفة من قبل المستخدم
يقدم هذا القسم شرحًا تفصيليًا لإنشاء وتحسين UDF لهذا الغرض.
- اضغط على "Alt" + "F11" لفتح محرر VBA في Excel.
- في المحرر، انتقل إلى "Insert" > "Module" لإنشاء وحدة جديدة.
كود VBA: إضافة فاصلة بين كل رقمFunction AddCommas(inputText As String) As String 'Updateby Extendoffice Dim i As Integer Dim result As String For i = 1 To Len(inputText) result = result & Mid(inputText, i, 1) & "," Next i AddCommas = Left(result, Len(result) - 1) End Function
- أغلق نافذة الكود، وفي خلية، اكتب الصيغة التالية، ثم اسحب مؤشر التعبئة لأسفل لتطبيق هذه الصيغة على الخلايا الأخرى. سيتم إضافة الفواصل بين كل حرف كما هو موضح في لقطة الشاشة أدناه:
=AddSeparator(A2)
باتباع هذه الطرق ونصائح التحسين، يمكنك إضافة فواصل بين كل رقم في خلية من خلايا Excel بفعالية، مما يعزز قابلية القراءة وقدرات معالجة البيانات. إذا كنت مهتمًا باستكشاف المزيد من نصائح وحيل Excel، موقعنا الإلكتروني يقدم آلاف الدروس التعليمية.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...
Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير
- تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
- افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!
جميع إضافات Kutools. مثبت واحد
حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.





- حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
- الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
- تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد