Ana içeriğe atla

Excel'deki dizeden tüm HTML etiketlerini nasıl kaldırırım?

Bir çalışma sayfanız HTML etiketleri ile çevrelenmiş metin dizeleri içeriyorsa, şimdi, aşağıdaki ekran görüntülerinde gösterildiği gibi hücreleri net ve daha okunaklı hale getirmek için dizelerden tüm HTML etiketlerini kaldırmak istersiniz. Bu makalede, Excel'de bu görevin üstesinden gelmek için bazı yöntemler tanıtacağım.

doc html etiketlerini kaldır 1
1
doc html etiketlerini kaldır 2

Bul ve Değiştir komutuyla metin dizesindeki tüm HTML etiketlerini kaldırın

VBA kodu ile metin dizesindeki tüm HTML etiketlerini kaldırın


ok mavi sağ balon Bul ve Değiştir komutuyla metin dizesindeki tüm HTML etiketlerini kaldırın

Aslında, Bul ve Değiştir Excel'deki işlev bu sorunu çözebilir, lütfen aşağıdaki işlemleri gerçekleştirin:

1. HTML etiketlerini kaldırmak istediğiniz hücreleri seçin.

2. Ambar Ctrl + H tuşlarını açmak için Bul ve Değiştir iletişim kutusunda, iletişim kutusunda, Ne bul metin kutusu, tür <*>ve bırak Ile değiştirin metin kutusu boş, ekran görüntüsüne bakın:

doc html etiketlerini kaldır 3

3. Sonra tıklayın Tümünü Değiştir düğmesi, tüm HTML etiketleri bir defada kaldırılır.


ok mavi sağ balon VBA kodu ile metin dizesindeki tüm HTML etiketlerini kaldırın

Aşağıdaki VBA kodu, HTML etiketlerini bir seçimden kaldırmanıza yardımcı olabilir, lütfen aşağıdakileri yapın:

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 Pencere.

VBA kodu: tüm HTML etiketlerini metin dizesinden kaldı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, açılan iletişim kutusunda, lütfen HTML etiketlerini kaldırmak istediğiniz hücreleri seçin, ekran görüntüsüne bakın:

doc html etiketlerini kaldır 4

4. Ve sonra tıklayın OK, tüm HTML etiketleri aynı anda seçimden kaldırıldı.

Kutools for Excel'i Şimdi Ücretsiz İndirin!

En İyi Ofis Üretkenlik Araçları

🤖 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 Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  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  |  Aralıkları ve Sütunları Karşılaştırın ...
Ö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ı, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...

Açıklama


Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Formatting is also removed, as it is with the Find and Replace.

Thanks for the code and tips.
This comment was minimized by the moderator on the site
Вариант с <*> просто великолепен.
Спасибо Вам
This comment was minimized by the moderator on the site
I have some text that is in bullet points, when i run this program it strips this out. how can i select which html tags to remove and which to keep?
This comment was minimized by the moderator on the site
xAddress is never used
This comment was minimized by the moderator on the site
Thank you .. The VBA instructions worked!
This comment was minimized by the moderator on the site
Thank you! I was able to clean up a large excel file with VBA with your simple instructions
This comment was minimized by the moderator on the site
Thank you for the code to remove all HTML tags from text string using VBA. I am going to pass your site along to my co-workers.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations