एक्सेल में सेल्स में html को टेक्स्ट में कैसे बदलें?

जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है, यदि आपके वर्कशीट सेल में HTML टैग्स की संख्या मौजूद है, तो आप उन्हें Excel में सादे टेक्स्ट में कैसे परिवर्तित कर सकते हैं? यह आलेख आपको एक्सेल में सेल से सभी HTML टैग हटाने के दो तरीके दिखाएगा।

फाइंड और रिप्लेस फ़ंक्शन के साथ चयनित सेल में html को टेक्स्ट में बदलें
VBA के साथ संपूर्ण वर्कशीट में html को टेक्स्ट में बदलें

फाइंड और रिप्लेस फ़ंक्शन के साथ सेल में HTML को टेक्स्ट में कनवर्ट करें

आप सभी html को सेलों में मौजूद टेक्स्ट में परिवर्तित कर सकते हैं ढूँढें और बदलें एक्सेल में कार्य करें। कृपया निम्नानुसार करें.

1. उन कक्षों का चयन करें जिनसे आप सभी html को टेक्स्ट में परिवर्तित करेंगे, और दबाएँ कंट्रोल + F कुंजी को खोलने के लिए ढूँढें और बदलें संवाद बॉक्स।

2। में ढूँढें और बदलें डायलॉग बॉक्स में जाएं बदलें टैब, दर्ज करें <*> में क्या पता बॉक्स, रखो साथ बदलें बॉक्स खाली करें, और क्लिक करें सभी को बदलें बटन। स्क्रीनशॉट देखें:

3. फिर ए माइक्रोसॉफ्ट एक्सेल संवाद बॉक्स आपको यह बताने के लिए पॉप अप होता है कि कितने HTML टैग बदले गए हैं, क्लिक करें OK बटन और बंद करें ढूँढें और बदलें संवाद बॉक्स।

फिर आप देख सकते हैं कि सभी HTML टैग चयनित सेल से हटा दिए गए हैं जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।

VBA के साथ संपूर्ण वर्कशीट में html को टेक्स्ट में बदलें

इसके अलावा, आप नीचे दिए गए वीबीए कोड के साथ एक ही समय में संपूर्ण वर्कशीट में सभी HTML को टेक्स्ट में परिवर्तित कर सकते हैं।

1. उस वर्कशीट को खोलें जिसमें html है जिसे आप टेक्स्ट में कनवर्ट करेंगे, फिर दबाएं ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल, फिर नीचे दिए गए VBA कोड को मॉड्यूल विंडो में कॉपी करें।

VBA कोड: html को संपूर्ण वर्कशीट में टेक्स्ट में कनवर्ट करें

Sub RemoveHTMLTags()
'Update by Extendoffice 20180703
    Dim xRg As Range
    Dim xCell As Range
    Dim xStr As String
    Dim xRegEx As RegExp
    Dim xMatch As Match
    Dim xMatches As MatchCollection
    Set xRegEx = New RegExp
    Application.EnableEvents = False
    Set xRg = Cells.SpecialCells(xlCellTypeConstants)
    With xRegEx
        .Global = True
        .Pattern = "<(""[^""]*""|'[^']*'|[^'"">])*>"
    End With
    For Each xCell In xRg
        xStr = xCell.Value
            Set xMatches = xRegEx.Execute(xCell.Text)
            For Each xMatch In xMatches
                xStr = Replace(xStr, xMatch.Value, "")
            Next
        xCell.Value = xStr
    Next
   Application.EnableEvents = True
End Sub

3. अभी भी में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया क्लिक करें टूल्स > संदर्भ, चेक माइक्रोसॉफ्ट वीबीस्क्रिप्ट रेगुलर एक्सप्रेशन 5.5 में विकल्प सन्दर्भ-VBAप्रोजेक्ट संवाद बॉक्स, और फिर क्लिक करें OK बटन.

4। दबाएं F5 कोड को चलाने के लिए कुंजी या रन बटन पर क्लिक करें।

फिर सभी html टैग पूरी वर्कशीट से तुरंत हटा दिए जाते हैं।

संबंधित आलेख:

• एक्सेल में टेक्स्ट के रूप में संग्रहीत संख्याओं को बड़े पैमाने पर संख्याओं में कैसे परिवर्तित करें?

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖	कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
	लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
	सुपर लुकअप: एकाधिक मानदंड VLookup  |   मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
	उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
	स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
	फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार   |  कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल   |  सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
	शीर्ष 15 टूलसेट:  12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

अधिक पढ़ें... मुफ्त डाउनलोड...

---

ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

• Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
• नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
• आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!

अधिक पढ़ें... मुफ्त डाउनलोड...