Ana içeriğe atla

Metin dizelerinden html etiketlerini soyun veya kaldırın

Html etiketleri ile çevrelenmiş birden çok metin dizesi varsa, tüm html etiketlerini kaldırmak için bu makaledeki yöntemler size bir iyilik yapabilir.


Formül ile tüm basit html etiketlerini soyun veya kaldırın

Metin dizeleriniz bazı basit html etiketleriyle çevriliyse, Excel'deki MID işlevi bu işi çözmenize yardımcı olabilir. Genel sözdizimi şöyledir:

=MID(string,text_start,LEN(string)-tag_len)
  • string: html etiketlerini kaldırmak istediğiniz metin dizesi veya hücre değeri.
  • text_start: kullanmak istediğiniz ilk karakterin bulunduğu konumun numarası.
  • tag_len: metin dizesindeki html etiketlerinin uzunluğu.

Lütfen aşağıdaki formülü boş bir hücreye kopyalayın veya girin:

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

Ardından, doldurma tutamacını bu formülü uygulamak istediğiniz hücrelere sürükleyin ve tüm html etiketleri, aşağıda gösterilen ekran görüntüsü gibi hücrelerden kaldırılmıştır:


Formülün açıklaması:

UZUNLUK (A2) -7: Bu UZUNLUK işlevi, A2 hücresindeki metin dizesinin uzunluğunu hesaplamak için kullanılır ve 7'yi çıkarır (html etiketlerinin sayısı, hem başlangıç ​​hem de bitiş etiketleri), hariç tutmak istediğiniz karakter sayısını elde etmek anlamına gelir. html etiketi. Döndürülen değer, MID işlevi içinde sayı_karakterler bağımsız değişkeni olarak kullanılacaktır.

ORTA (A2,4; UZUNLUK (A2) -7): Bu MID işlevi, dördüncü karakterden başlayan tüm karakterleri ayıklamak için kullanılır ve dizenin uzunluğu, LEN işlevi tarafından döndürülen sayı karakterlerdir.


VBA kodu ile bazı karmaşık html etiketlerini soyun veya kaldırın

Metin dizesi içinde aşağıda gösterilen ekran görüntüsü gibi birden fazla html etiketi varsa, yukarıdaki formül doğru çalışmayabilir, bu durumda aşağıdaki VBA kodu, metin dizelerindeki bazı karmaşık html etiketleriyle başa çıkmanıza yardımcı olabilir.

1. Basılı tutun Alt + F11 Excel'de anahtarlar ve açılır Uygulamalar için Microsoft Visual Basic pencere.

2. tıklayın Ekle > modülve aşağıdaki VBA kodunu Modül Penceresine yapıştırın.

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. Daha sonra, tuşuna basın. F5 Bu kodu çalıştırmak için anahtar ve bir komut kutusu açılır, lütfen html etiketlerini kaldırmak istediğiniz hücreleri seçin, ekran görüntüsüne bakın:

4. Ve sonra tıklayın OK düğmesi ve seçilen hücrelerden tüm html etiketleri kaldırıldı, ekran görüntüsüne bakın:


Kullanılan göreceli işlevler:

  • LEN:
  • UZUNLUK işlevi, bir metin dizesindeki karakter sayısını döndürür.
  • MID:
  • MID işlevi, belirli bir metin dizesinin ortasından belirli sayıda karakteri bulup döndürmek için kullanılır.

Daha fazla makale:


En İyi Ofis Üretkenliği Araçları

Kutools for Excel - Kalabalıktan Ayrılmanıza Yardımcı Olur

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla  |  Boş Satırları Sil  |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin  |  Formülsüz Tur ...
Süper VArama: Çoklu Kriterler  |  Çoklu Değer  |  Çoklu Sayfalarda  |  Bulanık Arama...
Av. Açılır liste: Kolay Açılır Liste  |  Bağımlı Açılır Liste  |  Çoklu Seçim Açılır Liste...
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  Sütunları şununla karşılaştır: Aynı ve Farklı Hücreleri Seçin ...
Öne Çıkan Özellikler: Izgara Odağı  |  Tasarım görünümü  |  Büyük Formül Çubuğu  |  Çalışma Kitabı ve Sayfa Yöneticisi | Kaynak Kütüphanesi (Otomatik metin)  |  Tarih Seçici  |  Çalışma Sayfalarını Birleştirin  |  Hücreleri Şifrele/Şifresini Çöz  |  E-postaları Listeye Göre Gönder  |  Süper Filtre  |  Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır ...)  |  50+ Grafik Türleri (Gantt şeması ...)  |  40+ Pratik Formüller (Yaşı doğum gününe göre hesapla ...)  |  19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle ...)  |  12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme ...)  |  7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Excel Hücrelerini Böl ...)  |  ... ve dahası

Kutools for Excel 300'den Fazla Özelliklere Sahiptir, İhtiyacınız Olanın Bir Tık Uzağınızda Olmasını Sağlıyoruz...

Açıklama


Office Sekmesi - Microsoft Office'te Sekmeli Okuma ve Düzenlemeyi Etkinleştir (Excel dahil)

  • Düzinelerce açık belge arasında geçiş yapmak için bir saniye!
  • Her gün yüzlerce fare tıklamasını azaltın, fare eline veda edin.
  • Birden çok belgeyi görüntülerken ve düzenlerken üretkenliğinizi% 50 artırır.
  • Tıpkı Chrome, Edge ve Firefox gibi Verimli Sekmeleri Office'e (Excel dahil) getirir.
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