KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف تُدخل نصًا إضافيًا في منتصف الخلايا المحددة في Excel؟

المؤلفSiluviaتاريخ التعديل
إضافة نص في وسط الخلايا

يُعدّ إدراج نص في منتصف الخلايا المحددة في Excel تقنيةً فعّالة لتنظيم البيانات وعرضها بشكل أوضح. ويقدّم لك هذا الدليل إرشاداتٍ خطوة بخطوة حول كيفية دمج النص الجديد ضمن المحتوى الحالي للخلايا باستخدام الدوال والميزات المدمجة في Excel.


إضافة نص في منتصف صيغة المحددة

في هذا القسم، سنزوّدك بالصيغة المثالية لإدراج نص في منتصف الخلايا المحددة. يُرجى اتباع الخطوات التالية بدقة.

1. يجب تطبيق هذه الطريقة باستخدام عمود مساعد. حدد الخلية الفارغة المجاورة للبيانات الأصلية؛ فهنا نختار الخلية B2.

2. انقل الصيغة التالية وانسخها=LEFT(A2,1) & «D» & MID(A2,2,100) في شريط الصيغة، ثم اضغط على مفتاحEnter. انظر لقطة الشاشة:

إضافة نص في وسط الخلايا باستخدام صيغة

ملاحظات:

  • 1). في الصيغة، يشير الرقم 1 إلى أن النص سيُضاف بعد الحرف الأول في الخلية.
  • 2). يُشير الرقمان 2 و100 إلى أن الأحرف من الموضع الثاني إلى الموضع المائة من الخلية الأصلية سيتم إلحاقها بالنص الجديد المُدرج.
  • 3). إذا كنت ترغب في إضافة نص بعد الحرف الثاني، يُرجى تغيير الرقم 1 إلى 2، والرقم 2 إلى 3 في الصيغة.
  • 4). والحرف «D» هو النص الذي ستضيفه إلى الخلية. يُرجى تعديله وفقًا لاحتياجاتك.

3. حدد الخلية B2، ثم اسحب مقبض الملء (Fill Handle) لأسفل حتى الخلية التي ترغب في تطبيق الصيغة عليها. وستلاحظ أن النص قد أُضيف تلقائيًا في منتصف الخلايا عبر القائمة بأكملها.

اسحب مقبض التعبئة (Fill Handle) لأسفل حتى الخلية

نصائح: إلى جانب الصيغة السابقة، يمكنك أيضًا استخدام هذه الصيغة=REPLACE(A2,2,0,«D») (حيث يشير الرقم 2 إلى الموقع الذي تريد إدخال النص فيه، ويشير الحرف D إلى النص الذي تحتاج إلى إضافته؛ ويمكنك تغييرهما حسب احتياجاتك)، ثم اضغط على مفتاح Enter للحصول على النتيجة.


إضافة نص في منتصف الخلايا المحددة باستخدام Kutools لـ Excel

يجب أن نعترف بأن الطريقتين السابقتين غير مريحتين لنا. لذا، سنعرض لك الآن أداةإضافة نصمنKutools لـ Excel، التي تتيح لك تحديد موقع المنتصف في القائمة بسهولة، ثم إضافة نص معين إلى ذلك الموقع في القائمة بأكملها دفعة واحدة!

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

1. حدد القائمة التي تريد إضافة نص في منتصف خلاياها، ثم انقر علىKutools > Text > إضافة نص. انظر لقطة الشاشة:

انقر فوق Kutools > Text > Add Text

2. في مربع حوارإضافة نص، أدخل النص الذي تريد إضافته إلى الخلايا في حقلText، وحدد الموقع الذي تريد إضافة النص إليه بتحديد خيارSpecify (هنا أدخل الرقم 1)، ثم انقر على زرOK (يمكنك معاينة نتيجة الإضافة فورًا في المربع الموجود على اليمين).

حدد الخيارات في مربع الحوار

ملاحظة: لإدخال نص إضافي في مواقع متعددة داخل الخلية المحددة دفعة واحدة، يمكنك تحديد تلك المواقع باستخدام فواصل في الحقلSpecify. راجع لقطة الشاشة التالية:

حدد المواقع مفصولة بفواصل لإضافتها في مواضع متعددة

الآن، تم إدراج النص المحدد بعد الحرف الأول في القائمة المحددة.

تمت إضافة النص المحدد بعد الحرف الأول

إذا كنت ترغب في تجربة هذه الأداة مجانًا (لمدة 30 يومًا)،فما عليك سوى النقر لتنزيلها، ثم اتبع الخطوات المذكورة أعلاه لتطبيق العملية.


إضافة نص في منتصف الخلايا المحددة باستخدام كود VBA

بالإضافة إلى ذلك، يمكنك إدراج نص في منتصف الخلايا المحددة باستخدام كود VBA.

1. اضغط علىAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.

2. انقر علىInsert > Module، ثم الصق الكود التالي المكتوب بلغة VBA في محرر الكود.

انسخ والصق الكود في الوحدة النمطية (module)

كود VBA: إضافة نص إلى قائمة البيانات بعد الحرف الأول

Sub AddString()
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	For Each Rng In WorkRng
		Rng.Value = VBA.Left(Rng.Value, 1) & "D" & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)
	Next
End Sub

3. اضغط على مفتاحF5 لتشغيل الكود، ثم في مربع الحوار المنبثقKutools for Excel، حدد النطاق الذي تريد إضافة نص إليه، وانقر على زرOK.

 حدد النطاق لإضافة النص

الآن، تم إدراج النص المحدد بعد الحرف الأول في الخلايا المحددة.

ملاحظة: في الكود أعلاه، ستُدخل قيمة محددة بعد الحرف الأول داخل الخلية. يمكنك تغيير الرقمين 1 و2 إلى 2 و3 إذا رغبت في إضافة النص بعد الحرف الثاني في هذا السكربتVBA.Left(Rng.Value, 1) & «D» & VBA.Mid(Rng.Value, 2, VBA.Len(Rng.Value) - 1)، حيث يمثل الحرف D النص الجديد الذي تريد إدراجه.

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


مقال ذو صلة:.

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

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

عزِّز مهاراتك في 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.

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