जब आप Excel में बहुभाषी डेटा प्रबंधित कर रहे होते हैं, तो भाषा पहचान बहुभाषी डेटासेट, ग्राहक प्रतिक्रिया विश्लेषण, या सामग्री वर्गीकरण के लिए अविश्वसनीय रूप से उपयोगी हो सकती है।
इस ट्यूटोरियल में, हम दिखाएंगे कि Power Query या VBA का उपयोग करके Excel सेल में भाषा का स्वचालित रूप से पता कैसे लगाया जाए।
भाषा स्वचालित रूप से पहचानने के लिए Power Query
Power Query Excel में एक शक्तिशाली अंतर्निहित उपकरण है जो आपको डेटा आयात, साफ, और परिवर्तित करने की अनुमति देता है, और यहां तक कि API कॉल भी कर सकता है। आप Power Query के साथ DetectLanguage API, LibreTranslate API, या किसी भी सशुल्क API का उपयोग कर सकते हैं।
चरण 1: अपना मुफ़्त API कुंजी प्राप्त करें
- DetectLanguage.com पर जाएं
- साइन अप करें (मुफ़्त) और डैशबोर्ड से अपनी API कुंजी कॉपी करें।

चरण 2: अपना डेटा टेबल तैयार करें
अपनी भाषा सूची को Excel में डालें।
- डेटा रेंज चुनें।
- सम्मिलित करें टैब पर जाएं >> टेबल चुनें।
- मेरी टेबल में हेडर हैं चेक करें।
- ओके पर क्लिक करें।

- अपनी टेबल का नाम बदलें:
- टेबल डिज़ाइन टैब पर जाएं >> टेबल नाम चुनें >> Language_List डालें।

चरण 3: भाषा पहचानने के लिए Power Query का उपयोग करना
- अपनी टेबल में किसी भी सेल का चयन करें।
- डेटा टैब पर जाएं >> टेबल/रेंज से चुनें।

- होम टैब पर जाएं >> नया स्रोत चुनें >> अन्य स्रोत चुनें >> खाली क्वेरी चुनें।
- इसे Auto Detect Language नाम दें।

- होम टैब पर जाएं >> उन्नत संपादक चुनें।
- निम्न कोड कॉपी और पेस्ट करें।
- हो गया पर क्लिक करें।
let APIKey = "YOUR_API_KEY", // <-- इसे बदलें Source = Excel.CurrentWorkbook(){[Name="Language_List"]}[Content], AddJson = Table.AddColumn(Source, "JsonBody", each Text.ToBinary("q=" & Uri.EscapeDataString([Text])) ), AddResponse = Table.AddColumn(AddJson, "Response", each Json.Document( Web.Contents("https://ws.detectlanguage.com/0.2/detect", [ Headers = [ #"Authorization" = "Bearer " & APIKey, #"Content-Type" = "application/x-www-form-urlencoded" ], Content = [JsonBody] ]) ) ), ExtractLang = Table.AddColumn(AddResponse, "Language", each try [Response][data][detections]{0}[language] otherwise "error"), Final = Table.SelectColumns(ExtractLang, {"ID", "Text", "Language"}) in Final
- "YOUR_API_KEY" को अपनी वास्तविक कुंजी से बदलें।

- बंद करें और लोड करें पर क्लिक करें। आपको पहचाने गए भाषा कोड (en, fr, आदि) के साथ एक भाषा कॉलम दिखाई देगा।

भाषा स्वचालित रूप से पहचानने के लिए VBA का उपयोग करना
आप भाषा का स्वचालित रूप से पता लगाने के लिए VBA का उपयोग कर सकते हैं। VBA में, आप मुफ़्त से सशुल्क सभी प्रकार के API को कॉल कर सकते हैं या भाषा का पता लगाने के लिए उपयोगकर्ता-विशिष्ट फ़ंक्शन बना सकते हैं।
- डेवलपर टैब पर जाएं >> विजुअल बेसिक चुनें।

- सम्मिलित करें >> मॉड्यूल चुनें।
- निम्न VBA कोड कॉपी-पेस्ट करें।
VBA कोड:
Function Detect_Language(text As String) As String On Error GoTo handleErr Dim http As Object Dim url As String Dim response As String Dim apiKey As String apiKey = "YOUR_API_KEY" ' <-- अपनी API कुंजी से बदलें! url = "https://ws.detectlanguage.com/0.2/detect?q=" & URLEncode(text) Set http = CreateObject("MSXML2.XMLHTTP") With http .Open "GET", url, False .setRequestHeader "Authorization", "Bearer " & apiKey .send response = .responseText End With ' "भाषा" कोड के लिए JSON परिणाम पार्स करें Dim startPos As Integer Dim endPos As Integer startPos = InStr(response, """language"":""") + Len("""language"":""") If startPos > Len("""language"":""") Then endPos = InStr(startPos, response, """") Detect_Language = Mid(response, startPos, endPos - startPos) Else Detect_Language = "unknown" End If Exit Function handleErr: Detect_Language = "ERROR: " & Err.Description End Function ' URL एन्कोडिंग के लिए सहायक (अधिकांश बुनियादी यूनिकोड का समर्थन करता है) Function URLEncode(str As String) As String Dim i As Long Dim ch As String Dim encoded As String For i = 1 To Len(str) ch = Mid(str, i, 1) Select Case AscW(ch) Case 48 To 57, 65 To 90, 97 To 122 ' 0-9, A-Z, a-z encoded = encoded & ch Case Else encoded = encoded & "%" & Hex(AscW(ch)) End Select Next i URLEncode = encoded End Function

- कोड सेव करें और Excel शीट पर वापस जाएं।
- सेल C2 चुनें और निम्न UDF फ़ंक्शन डालें।
यह कस्टम फ़ंक्शन स्वचालित रूप से भाषा का पता लगाता है और भाषा कोड लौटाता है।

बोनस: Excel में DETECTLANGUAGE फ़ंक्शन का उपयोग (केवल Microsoft 365 और वेब)
यदि आप Microsoft 365 के लिए Excel या वेब के लिए Excel का उपयोग कर रहे हैं, तो आप किसी भी सेल के टेक्स्ट की भाषा की पहचान करने के लिए अंतर्निहित DETECTLANGUAGE फ़ंक्शन का उपयोग कर सकते हैं। यह सुविधा केवल Microsoft 365 ग्राहकों और Excel Online में उपलब्ध है, जिसे 2022 के अंत से शुरू किया गया है।
- एक सेल चुनें और निम्न सूत्र डालें।
यह वेब से परिणाम प्राप्त करता है।

यह फ़ंक्शन स्वचालित रूप से भाषा का पता लगाता है।

उपलब्धता: DETECTLANGUAGE फ़ंक्शन केवल इसमें उपलब्ध है:
- वेब के लिए Excel (Excel Online)।
- Microsoft 365 (कुछ डेस्कटॉप बिल्ड, लेकिन सभी उपयोगकर्ता नहीं)।
- उपलब्ध नहीं Excel 2019, Excel 2016, या पूर्व के स्थायी लाइसेंस संस्करणों में।
निष्कर्ष
उपरोक्त विधियों का पालन करके, आप Excel सेल में स्वचालित रूप से भाषा का पता लगा सकते हैं। Power Query का उपयोग करके, आप अपने बहुभाषी डेटा प्रोसेसिंग वर्कफ़्लो को आसानी से सुपरचार्ज कर सकते हैं। Power Query अधिकांश उपयोगकर्ताओं के लिए पसंदीदा है, जो अधिक स्थिरता, स्केलेबिलिटी और प्रत्यक्ष डेटा परिवर्तन प्रदान करता है। VBA हल्के, स्थानीय और त्वरित उपयोग के लिए सर्वोत्तम है।
मुफ़्त उन्नत Excel अभ्यास समाधान के साथ प्राप्त करें!