Note: The other languages of the website are Google-translated. Back to English

كيفية إضافة بادئة أو لاحقة إلى مجموعة من الخلايا في إكسيل؟

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


أضف بادئة أو لاحقة إلى كل الخلايا بالصيغ

في Excel سلسل يمكن للوظيفة إدراج بادئة أو لاحقة لخلية واحدة بسرعة.

1. أدخل وظيفة =CONCATENATE("Food - ",A1) في زنزانة فارغة ، تقول الخلية C1، ثم اسحب مقبض الملء التلقائي لهذه الخلية عبر النطاق الذي تريد تعبئته. وأضيفت جميع الخلايا نص البادئة المحددة. انظر لقطة الشاشة:. انظر لقطة الشاشة:

يمكنك استخدام وظيفة concatenate لإدراج البادئة أو اللاحقة أو كل من اللاحقة والبادئة على النحو التالي:

أدخل الصيغ النتائج في الخلايا
= Concatenate ("Food - ", A1) طعام - تفاح
=Concatenate (A1, " - Fruit") فاكهة التفاح
=Concatenate ("Food - ", A1, " - Fruit") طعام - تفاح - فواكه

أضف نصًا مشتركًا بسهولة إلى بداية جميع الخلايا أو نهايتها (بادئة أو لاحقة) في Excel

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


إعلان إضافة بادئة نصية لاحقة

أضف بادئة أو لاحقة إلى كل الخلايا باستخدام VBA

يمكنك أيضًا التعامل مع هذه المشكلة باستخدام رمز VBA التالي:

1. حدد النطاق الذي تريد إدراج البادئة أو اللاحقة.

2. انقر Developer > Visual Basic، وجديدة Microsoft Visual Basic for applications ستظهر النافذة ، انقر فوق Insert > Module، ثم أدخل الكود التالي:

فبا: أضف بادئة إلى النص:

Sub AddTextOnLeft()
'Updateby20131128
Dim Rng As Range
Dim WorkRng As Range
Dim addStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
addStr = Application.InputBox("Add text", xTitleId, "", Type:=2)
For Each Rng In WorkRng
    Rng.Value = addStr & Rng.Value
Next
End Sub

فبا: أضف لاحقة إلى النص:

Sub AddTextOnRight()
'Updateby20131128
Dim Rng As Range
Dim WorkRng As Range
Dim addStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
addStr = Application.InputBox("Add text", xTitleId, "", Type:=2)
For Each Rng In WorkRng
    Rng.Value = Rng.Value & addStr
Next
End Sub

3. ثم اضغط Run زر أو اضغط على F5 مفتاح لتشغيل VBA.

4. والآن يرجى تحديد النطاق الذي ستضيف بادئة أو لاحقة له في الأول KutoolsforExcel مربع الحوار وانقر فوق OK زر ، ثم اكتب اللاحقة أو البادئة التي ستضيفها إلى الثانية KutoolsforExcel مربع الحوار وانقر فوق OK زر. انظر أدناه لقطات:
     
الآن تمت إضافة اللاحقة أو البادئة المحددة إلى كل خلية محددة كما هو موضح أدناه لقطة الشاشة:


أضف بادئة أو لاحقة إلى جميع الخلايا باستخدام Kutools for Excel

قد لا تكون على دراية بالوظائف ورمز VBA في Excel. وهذا Add Text فائدة Kutools for Excel سيساعدك على إدراج بادئة أو لاحقة في أي نطاقات محددة بسرعة.

كوتولس ل إكسيل - يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. نسخة تجريبية مجانية كاملة الميزات 30اليوم ، لا حاجة لبطاقة ائتمان! تجربة مجانية الآن!

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

2. في Add Text في مربع الحوار ، أدخل البادئة أو اللاحقة في ملف نص مربع ، تحقق من Before first character اختيار (لإضافة البادئة) أو After last character اختيار (لإضافة لاحقة) حسب حاجتك ، وانقر فوق Ok .
والآن يتم إضافة البادئة أو اللاحقة المحددة إلى كل خلية محددة مرة واحدة. انظر لقطة الشاشة:


عرض توضيحي: إضافة بادئة أو لاحقة إلى خلايا متعددة باستخدام Kutools for Excel


كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel ، يمكن تجربتها مجانًا دون قيود في غضون 30 يومًا. تنزيل وتجربة مجانية الآن!

قم بإزالة البادئة أو اللاحقة (نفس عدد الأحرف) من بداية / يمين / نهاية الخلايا في Excel

Kutools for Excel's Remove By Position تسهل لك الميزة إزالة البادئة أو اللاحقة (عدد معين من الأحرف) من البداية / النهاية / الموضع المحدد للسلسلة النصية في الخلايا.


إعلان إزالة بادئة لاحقة

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


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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع

فرز التعليقات حسب
التعليقات (21)
لا يوجد تقييم. كن أول من يقيم!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرًا ، Kutools أنقذني الكثير من العمل :-)
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرًا لك ، لقد وفرت لي التعليمات المذكورة أعلاه ساعات من العمل.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
قم بإضافة KUltools بدون حقوق المسؤول
تم تصغير هذا التعليق بواسطة المشرف على الموقع
[اقتباس] يمكنني إضافة KUltools بدون حقوق المسؤولبواسطة فيشال[/ quote] :-) أنت بحاجة إلى تثبيت البرنامج بحساب مسؤول. بعد التثبيت ، يمكنك استخدامه بدون حساب المسؤول.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرًا! = CONCATENATE جعلت يومي!
تم تصغير هذا التعليق بواسطة المشرف على الموقع
إذا كانت البادئة رقمًا ، فكيف يمكن إدخالها في الخلايا التي تحتوي على رقم؟
تم تصغير هذا التعليق بواسطة المشرف على الموقع
ماريا ، يمكنك تحرير الكود عن طريق إضافة: Dim OriValue As String ثم إضافة هذا الرمز بعد For each .... OriValue = Rng.Value وتغيير Rng.Value إلى OriValue في المعادلة: Rng.Value = addStr & OriValue
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لدي بيانات حيث لا يوجد في العمود ، مثل هذا rs 10 rs 20 rs 30 rs 40 يرجى إعلامي كيف يمكنني جمعها دون إزالة "rs" من العمود بأكمله
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لا يمكنني تسلسل تاريخ ، (يحاول Excel تقسيمه كمجموع). لقد حاولت تغيير تنسيق الخلية المصدر والوجهة ، فلن يمنع أي شيء تسلسل من تقسيم التاريخ. لا أريد شراء Kutools أيضًا. (أعلم أن هناك نسخة تجريبية مجانية ولكن هذا ليس حلاً طويل الأمد).
تم تصغير هذا التعليق بواسطة المشرف على الموقع
يمكنك أيضًا استخدام هذا الموقع
تم تصغير هذا التعليق بواسطة المشرف على الموقع
على سبيل المثال 44444 Out I need as DL / 44444
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا :)
تم تصغير هذا التعليق بواسطة المشرف على الموقع
بحاجة إلى مساعدة ، أريد إضافة حرف في Excel مثال ، خلية لا A1 إظهار A ، لذا تظهر الخلية التالية A2 BI تريد إظهار B في الخلية التالية
تم تصغير هذا التعليق بواسطة المشرف على الموقع
arihhurthj hshsjsyshsj shshydjdj shshssj shshdj shshjddj من فضلك قل لي كيفية إضافة سطر جديد مع حرف GO بعد كل سطر.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لدي أحرف أبجدية واحدة في خلية مختلفة ، لنقل 10 خلايا مختلفة .... كيف يمكنني إضافة هذه الحروف الهجائية في خلية واحدة ، أي العدد الإجمالي. من الأبجديات في خلية واحدة
تم تصغير هذا التعليق بواسطة المشرف على الموقع
لقد قمت بتصفية cloumn ولا بد لي من تطبيق TC001 حتى TC0209 على الخلايا المصفاة ، هل يمكن لأي شخص مساعدتي في هذا
تم تصغير هذا التعليق بواسطة المشرف على الموقع
شكرا جزيلا على KUTOOLS FOR EXCEL
تم تصغير هذا التعليق بواسطة المشرف على الموقع
مرحبًا ، هل يستطيع أي شخص إضافة رقمين في خلية واحدة. على سبيل المثال ، X 2.2 3.6 0.9 1.2 وأريد إضافة كل رقم بترتيبه ، مثل ؛ X 2.2 (2) 3.6 (1) 0.9 (4) 1.2 (3) وهذه الرتب يجب أن تكون غامقة ولون مختلف.
تم تصغير هذا التعليق بواسطة المشرف على الموقع
كيف أقوم بربط حرف إلى تاريخ بتنسيق "Cmmddyy".

مثال. يحتوي A1 على تاريخ بتنسيق mm / dd / yy (دعنا نقول 01/31/18)

أريد أن يظهر A2 "C013118".
تم تصغير هذا التعليق بواسطة المشرف على الموقع
استخدم هذه الصيغة في A2:
=IF(A1<>"","C"&IF(MONTH(A1)>=10,MONTH(A1),"0"&MONTH(A1))&DAY(A1)&RIGHT(YEAR(A1),2),"")
تم تصغير هذا التعليق بواسطة المشرف على الموقع
asfdasdfawfe
لا توجد تعليقات منشورة هنا حتى الآن
اترك تعليقاتك
النشر كضيف
×
قيم المنشور:
0   الشخصيات
المواقع المقترحة

تواصل معنا

حقوق التأليف والنشر © 2009 - شبكة الاتصالات العالمية.extendoffice.com. | كل الحقوق محفوظة. مشغل بواسطة ExtendOffice. | | خريطة الموقع
Microsoft وشعار Office هما علامتان تجاريتان أو علامتان تجاريتان مسجلتان لشركة Microsoft Corporation في الولايات المتحدة و / أو دول أخرى.
محمي بواسطة Sectigo SSL