انتقل إلى المحتوى الرئيسي

قم بإزالة علامات html أو إزالتها من السلاسل النصية

إذا كانت هناك سلاسل نصية متعددة محاطة بعلامات html ، لإزالة جميع علامات html ، فإن الأساليب الواردة في هذه المقالة قد تفيدك.


قم بإزالة أو إزالة كل علامات html البسيطة بالصيغة

إذا كانت السلاسل النصية الخاصة بك محاطة ببعض علامات html البسيطة ، يمكن أن تساعدك وظيفة MID في Excel في حل هذه المهمة. الصيغة العامة هي:

=MID(string,text_start,LEN(string)-tag_len)
  • string: السلسلة النصية أو قيمة الخلية التي تريد إزالة علامات html منها.
  • text_start: رقم الموضع الذي حدده الحرف الأول الذي تريد استخدامه.
  • tag_len: طول علامات html داخل السلسلة النصية.

الرجاء نسخ أو إدخال الصيغة التالية في خلية فارغة:

=MID(A2,4,LEN(A2)-7)

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


شرح الصيغة:

LEN (A2) -7: تُستخدم وظيفة LEN هذه لحساب طول السلسلة النصية في الخلية A2 ، وتطرح 7 (عدد علامات html ، كل من علامات البداية والنهاية) تعني الحصول على عدد الأحرف التي تريد استخراجها والتي تستبعد علامة html. سيتم استخدام القيمة التي تم إرجاعها كوسيطة num_chars داخل دالة MID.

MID (A2,4،2، LEN (A7) -XNUMX): تُستخدم وظيفة MID هذه لاستخراج جميع الأحرف التي تبدأ من الحرف الرابع ، وطول السلسلة هو عدد الأحرف التي تُرجعها الدالة LEN.


قم بإزالة أو إزالة بعض علامات html المعقدة باستخدام كود VBA

إذا كانت هناك علامات html متعددة داخل السلسلة النصية كما هو موضح أدناه ، فقد لا تعمل الصيغة أعلاه بشكل صحيح ، في هذه الحالة ، يمكن أن يساعدك رمز VBA التالي في التعامل مع بعض علامات html المعقدة في السلاسل النصية.

1. اضغط باستمرار على ALT + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. انقر إدراج > وحدة، ولصق التعليمات البرمجية لـ VBA التالية في Module Window.

Sub RemoveTags()
'updateby Extendoffice 
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select data range", "Kutools for Excel", xAddress, , , , , 8)
    Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    xRg.NumberFormat = "@"
    With CreateObject("vbscript.regexp")
        .Pattern = "\<.*?\>"
        .Global = True
        For Each xCell In xRg
            xCell.Value = .Replace(xCell.Value, "")
        Next
    End With
End Sub

3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وانبثق مربع موجه ، يرجى تحديد الخلايا التي تريد إزالة علامات html ، انظر لقطة الشاشة:

4. ثم انقر فوق OK ، وتم إزالة جميع علامات html من الخلايا المحددة ، انظر الصورة:


الدوال النسبية المستخدمة:

  • LEN:
  • ترجع الدالة LEN عدد الأحرف في سلسلة نصية.
  • MID:
  • تُستخدم وظيفة MID للبحث عن عدد محدد من الأحرف وإرجاعه من منتصف سلسلة نصية معينة.

المزيد من المقالات:


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

كوتولس ل إكسيل - يساعدك على التميز من بين الحشود

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

Kutools for Excel يضم أكثر من 300 ميزة، التأكد من أن ما تحتاجه هو مجرد نقرة واحدة...

الوصف


علامة تبويب Office - تمكين القراءة والتحرير المبوب في Microsoft Office (بما في ذلك Excel)

  • ثانية واحدة للتبديل بين عشرات المستندات المفتوحة!
  • قلل مئات النقرات بالماوس كل يوم ، وداعًا ليد الماوس.
  • يزيد من إنتاجيتك بنسبة 50٪ عند عرض مستندات متعددة وتحريرها.
  • يجلب علامات التبويب الفعالة إلى Office (بما في ذلك Excel)، تمامًا مثل Chrome وEdge وFirefox.
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations