كيف يمكن تكرار حرف معين n مرة داخل خلية في إكسل؟

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

تكرار حرف n مرة في خلية باستخدام صيغة
ملء خلية بحرف متكرر في إكسل
ملء خلية بعلامة * متكررة ورقم معيّن في إكسل
ملء خلايا بأحرف متكررة باستخدام كود VBA

تكرار حرف n مرة في خلية باستخدام صيغة

عندما تحتاج إلى تكرار حرف معيّن عددًا محدّدًا من المرات داخل خلية واحدة، توفّر دالةREPT في إكسل حلاً مباشرًا وسهلًا! وهي مفيدة بشكل خاص للتمييز البصري للنصوص، أو إنشاء رموز ذات طول ثابت، أو توليد عناصر نائبة. ويضمن استخدام الصيغة اتساقًا ومرونةً تامّين، حيث يمكنك تعديل الحرف المتكرر وعدد التكرارات بحسب احتياجاتك.

1. حدد الخلية الفارغة التي تريد عرض الحرف المتكرر فيها، ثم أدخل الصيغة التالية في شريط الصيغة:

=REPT("*",4)

ثم اضغط مفتاحEnterللحصول على النتيجة. ستعرض الخلية أربع علامات نجمية («****»). راجع لقطة الشاشة أدناه لمثال توضيحي.

نصائح وملاحظات:

• في هذه الصيغة، يُستخدم"*" كحرف سيتم تكراره، و4 هو عدد مرات التكرار. ويمكنك استبدال القيمتين حسب احتياجاتك، على سبيل المثال: =REPT("#",10).
• إذا أردت جعل الصيغة ديناميكية بناءً على قيم الخلايا—مثل تكرار الحرف الموجود في العمود A عدد مرات يحدده العدد في العمود B—فيمكنك استخدام=REPT(A1,B1).
• إذا أدخلت أرقامًا كبيرة جدًّا كقيمة لعدد النسخ المكررة، فقد يعرض إكسل خطأً أو يتوقف عند الحد الأقصى المدعوم (وهو عادةً 32،767 حرفًا لكل خلية).

هذا الحل مباشرٌ ومثالي لإدخال البيانات يدويًّا أو عند وجود منطق تكرار بسيط. ومع ذلك، يصبح أقل فعالية إذا احتجتَ إلى معالجة مدخلات ديناميكية دفعة واحدة عبر عدة خلايا، حيث تُوفِّر أتمتة VBA في هذه الحالة مرونةً أكبر.

افتح سحر إكسل مع KUTOOLS AI

• التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
• الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
• برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
• تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
• ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!

حسِّن قدراتك في إكسل بأدوات مدعومة بالذكاء الاصطناعي.حمِّل الآنوجرِّب الكفاءة كما لم تفعل من قبل!

ملء خلية بحرف متكرر في إكسل

إذا كان هدفك ملء عرض الخلية أفقيًّا بالكامل بتكرار حرف واحد (مثل "-" أو «*»)، فإن خيارات تنسيق الخلايا في إكسل تجعل هذه المهمة سهلة وسلسة. وتُعد هذه الطريقة شائعةً لإنشاء مقسّمات بصرية أو خطوط داخل الجداول. وعلى عكس الاعتماد على الصيغ، تعتمد هذه الطريقة على تنسيق الخلية نفسه، الذي يكرر تلقائيًّا الحرف المدخل ليملأ المساحة المرئية للخلية بأكملها.

1. انقر على الخلية الفارغة التي تريد عرض الحرف المتكرر فيها، ثم اضغطCtrl+1 لفتح مربع الحوارتعيين تنسيق الخلية.

2. في مربع حوار تعيين تنسيق الخلية، انقر على علامة التبويبالمحاذاة، ثم ابحث عن القائمة المنسدلةأفقيًّاوحدد الخيارتعبئة، ثم انقرموافقلحفظ التغيير. راجع لقطة الشاشة:

الآن، عندما تكتب حرفًا واحدًا (على سبيل المثال، "-") في هذه الخلية، سيكرر إكسل هذا الحرف تلقائيًّا ليملأ بصريًّا كامل مساحة الخلية الأفقية، كما يظهر في المثال أدناه:

ملاحظات وسيناريوهات التطبيق:

• هذه الطريقة مثالية لإنشاء خطوط فاصلة أو مقسّمات سياقية أو مؤشرات بصرية داخل الجداول.
• يملأ المحتوى الخلية بصريًّا فحسب؛ فعند الإشارة إلى الخلية، سيتم إرجاع الحرف الوحيد الذي أدخلته، وليس السلسلة الكاملة المتكررة.
• هذا التنسيق أنسب للعرض، وقد لا يكون ملائمًا في السيناريوهات التي تتطلب القيمة المتكررة لأغراض الحسابات أو معالجة النصوص.

ملء خلية بعلامة * متكررة ورقم معيّن في إكسل

في بعض الحالات، قد ترغب في عرض رمز متكرر (مثل *) متبوعًا برقم داخل نفس الخلية—وهو أسلوب يُستخدم غالبًا لتنسيق قيم معيّنة كالأكواد أو معرّفات المنتجات أو كلمات المرور، لإضفاء مظهر ذي عرض ثابت أو لتسليط الضوء على البيانات الرقمية.

1. حدد الخلية المستهدفة، ثم انقر بزر الماوس الأيمن واخترتعيين تنسيق الخليةمن قائمة السياق كما هو موضح أدناه:

2. في نافذةتعيين تنسيق الخلية، انتقل إلى علامة التبويبالرقم، واخترمخصصضمنالفئة. في مربع الإدخالالنوع، اكتب**0، ثم انقرموافق.

الآن، كلما كتبت رقمًا مثل "45" في هذه الخلية، سيعرضه إكسل تلقائيًّا كـ «**45» مع تكرار علامة النجمة قبل الرقم، كما هو موضح أدناه:

اعتبارات:

• يمكنك تعديل النمط في مربعالنوع، مثل إدخال"$$"0 لإضافة علامتي دولار قبل الأرقام، أو***0 لثلاث علامات نجمية.
• هذا يؤثر فقط على طريقة عرض القيمة، وليس على القيمة الفعلية المستخدمة في الحسابات.

ملء خلايا بأحرف متكررة باستخدام كود VBA

إذا كانت مهمتك تتضمن معالجة خلايا متعددة أو أتمتة العملية لعمليات دُفعية، فإن استخدام ماكرو VBA يوفّر مرونةً وكفاءةً تفوق الصيغ اليدوية. وتتيح لك هذه الطريقة معالجة خلايا متعددة دفعة واحدة وملأها مباشرةً بالأحرف المتكررة المطلوبة—بدون الحاجة إلى صيغ أو سحب.

التطبيقات والاعتبارات:

• مناسبة للسيناريوهات التي تحتاج فيها إلى معالجة أو ملء العديد من الخلايا دفعةً واحدة، أو عندما يكون الحرف المتكرر أو عدد التكرارات مخزَّنًا في خلايا مختلفة.
• تتطلب ماكروات VBA ملفات عمل مُفعَّلة للماكرو، كما يتوجب عليك تمكين الماكروات في إكسل لتنفيذها.
• تذكّر دائمًا حفظ عملك قبل تشغيل الماكروات، وفكّر في إنشاء نسخة احتياطية من بياناتك المهمة لتجنب الكتابة فوقها عن طريق الخطأ.

خطوات أتمتة تكرار حرف باستخدام VBA:

1. افتح إكسل، ثم اضغطAlt+F11 لفتح نافذة محررVisual Basic for Applications. بعد ذلك، انقرإدراج > وحدة نمطيةلإضافة وحدة نمطية جديدة. انسخ والصق الكود أدناه في نافذة الوحدة النمطية:

Sub RepeatCharBatch()
    Dim rng As Range
    Dim cell As Range
    Dim RepeatChar As String
    Dim RepeatTimes As Long
    Dim Answer As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.Selection
    Set rng = Application.InputBox("Select the range to process:", xTitleId, rng.Address, Type:=8)
    
    RepeatChar = Application.InputBox("Enter the character to repeat:", xTitleId, "", Type:=2)
    
    RepeatTimes = Application.InputBox("How many times to repeat the character?", xTitleId, 1, Type:=1)
    
    If rng Is Nothing Or RepeatChar = "" Or RepeatTimes <= 0 Then
        MsgBox "Cancelled or invalid input.", vbExclamation
        Exit Sub
    End If
    
    For Each cell In rng
        cell.Value = String(RepeatTimes, RepeatChar)
    Next cell
End Sub

2. لتنفيذ الماكرو، اضغطF5 أو انقر على زرتشغيل. سيظهر مربع حوار يطلب منك تحديد الخلية (أو الخلايا) المستهدفة، واختيار الحرف الذي سيتم تكراره، وإدخال عدد مرات التكرار. انقر «موافق» للمعالجة.

استكشاف الأخطاء وإصلاحها ونصائح:

• إذا لم يكن إدخال «كم عدد المرات» عددًا صحيحًا موجبًا، فلن يُتابع الماكرو تنفيذه.
• يمكنك استخدامه على خلية واحدة أو تحديد نطاقٍ دُفعةً للمعالجة بالجملة.
• سيتم إعادة ضبط جميع الخلايا في النطاق الذي اخترته لاحتواء مخرجات الحرف المتكرر فقط، مع استبدال البيانات السابقة تمامًا.
• احفظ ملف العمل الخاص بك قبل تشغيل الماكرو لتجنب فقدان البيانات غير المقصود، خاصةً عند تطبيقه على نطاقات كبيرة.
• تدعم هذه الطريقة استخدام الرموز المتكررة (مثل «*») بالإضافة إلى الأحرف الأبجدية الرقمية لإنشاء أنماط متنوعة (مثل «A»، "0"، «#»، وغيرها).

باستخدام ماكرو VBA هذا، يمكنك أتمتة تكرار الأحرف في Excel بسرعة ومرونة عبر خلايا أو أوراق متنوعة، مع إمكانية تعديل الحرف وعدد مرات التكرار ديناميكيًا أثناء التشغيل.

مقالات ذات صلة:

• كيف يمكن تكرار قيمة خلية في إكسل حتى تظهر أو يتم الوصول إلى قيمة جديدة؟
• كيف يمكن تكرار الصفوف في أعلى كل صفحة عند الطباعة، باستثناء الصفحة الأخيرة، في إكسل؟

أفضل أدوات الإنتاجية لمكتبتك

🤖	KUTOOLS AI مساعد: ثوّر تحليل البيانات استنادًا إلى:التنفيذ الذكي   |  إنشاء الكود|  إنشاء الصيغ المخصصة  |  تحليل البيانات وإنشاء المخططات البيانية|  استدعاء الوظائف المحسنة…
	الميزات الشائعة:البحث، التمييز أو وضع علامة على المكررات   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |  التقريب بدون استخدام الصيغة...
	بحث متقدم:VLookup متعدد المعايير  |  VLookup متعدد القيم  |   VLookup عبر أوراق متعددة   |   مطابقة غامضة....
	قائمة منسدلة متقدمة:إنشاء قائمة منسدلة بسرعة   |  قائمة منسدلة تابعة   |  قائمة منسدلة متعددة الاختيار....
	مدير الأعمدة:إضافة عدد محدد من الأعمدة|نقل الأعمدة|تبديل حالة ظهور الأعمدة المخفية|مقارنة النطاقات والأعمدة...
	ميزات مميزة:التركيز على الشبكة   |  عرض التصميم   |شريط الصيغ المحسن   | مدير الدفتر والورقة   |  مكتبة الموارد(نص تلقائي)|  أداة اختيار التاريخ   |  تجميع ورقات العمل  |  تشفير/فك تشفير الخلايا   | إرسال رسائل البريد الإلكتروني حسب القائمة   |  مرشح متقدم   |   تصفية خاصة(تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...) ...
	أفضل 15 مجموعات الأدوات:12 أدواتالنصوص(إضافة نص،حذف الأحرف المحددة، ...)|   50+أنواعالمخططات البيانية(مخطط جانت، ...)|   40+ صيغعملية(حساب العمر بناءً على تاريخ الميلاد، ...)|   19 أدواتالإدراج(إدراج رمز QR،إدراج صورة من المسار، ...)|   12 أدواتالتحويل(تحويل إلى كلمات،تحويل العملة، ...)|   7 أدواتدمج وتقسيم(دمج متقدم للصفوف،تقسيم الخلايا، ...)|... وأكثر من ذلك

استخدم Kutools باللغة التي تفضلها – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية و40+ لغات أخرى!

عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...

مزيد من التفاصيل حول Kutools لـ Excel...تنزيل مجاني...

---

يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير

• تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
• افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
• يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!

مزيد من التفاصيل حول Office Tab...تنزيل مجاني...

---

جميع الإضافات من Kutools في برنامج تثبيت واحد!

Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.

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

مزيد من التفاصيل حول Kutools for Office...تنزيل مجاني...