एक्सेल में टेक्स्ट स्ट्रिंग से वर्ड कैसे निकालें

एक्सेल खोलें, फिर पहले वर्कशीट के किसी भी सेल में कम से कम तीन शब्दों वाला वाक्य टाइप करें। आप इस वाक्य को इसके अलग-अलग शब्दों में तोड़ेंगे।

"डेटा" मेनू शीर्षक पर क्लिक करें, फिर "टेक्स्ट टू कॉलम" बटन पर क्लिक करें। यह फ़ंक्शन टेक्स्ट को विभाजित करता है जिसके शब्दों को आपके द्वारा निर्दिष्ट वर्ण द्वारा अलग किया जाता है।

"स्पेस" चेक बॉक्स पर क्लिक करें, फिर "फिनिश" बटन पर क्लिक करें। एक्सेल आपके द्वारा लिखे गए वाक्य को अलग-अलग कॉलम में विभाजित कर देगा। प्रत्येक कॉलम में वाक्य से एक शब्द होगा।

फ़ंक्शन टाइप करें, उद्धरण चिह्नों को घटाकर, "=index([ARRAY],1,[NUMBER OF WORD TO EXTRACT])" को अलग-अलग शब्दों की स्ट्रिंग के नीचे एक सेल में टाइप करें। शब्द "ARRAY" को शब्दों की स्ट्रिंग वाली श्रेणी से बदलें। उदाहरण के लिए, यदि शब्द "A1" से "C1" तक के कक्षों में हैं, तो "ARRAY" टेक्स्ट के स्थान पर "A1:C1" टेक्स्ट दर्ज करें। "नंबर ऑफ़ वर्ड टू एक्सट्रैक्ट" टेक्स्ट को उस शब्द की संख्या से बदलें जिसे आप वाक्य से निकालना चाहते हैं। उदाहरण के लिए, यदि आप "A1:C1" श्रेणी से तीसरा शब्द निकालना चाहते हैं, तो अंतिम तर्क के लिए "3" टाइप करें।

एक नई एक्सेल स्प्रेडशीट खोलें, फिर सेल F4 में तीन या अधिक शब्दों का कोई भी क्रम टाइप करें। आप इस वाक्य से एक शब्द निकालने के लिए एक संक्षिप्त विज़ुअल बेसिक प्रोग्राम का उपयोग करेंगे।

"डेवलपर" मेनू शीर्षक पर क्लिक करें, फिर "विजुअल बेसिक" बटन पर क्लिक करें। एक्सेल के लिए प्रोग्रामिंग वातावरण खुल जाएगा।

दिखाई देने वाली विंडो में निम्न प्रोग्राम पेस्ट करें। इस सबरूटीन का दिल "स्प्लिट" फ़ंक्शन है, जो एक वाक्य को उसके अलग-अलग शब्दों में अलग करता है, जैसा कि "टेक्स्ट टू कॉलम" कमांड करता है।

Sub Macro1() Dim ar, str1, n str1 = Range("F4") n = Range("F5") - 1 ar = Split (str1, "") MsgBox "Word number" & n + 1 & " is " & ar (एन) एंड सब

"डेवलपर" टैब के "मैक्रोज़" बटन पर क्लिक करें, फिर "मैक्रो 1" फ़ंक्शन पर डबल-क्लिक करें। चरण 1 में आपके द्वारा टाइप किए गए वाक्य से आपके प्रोग्राम को निकाले गए शब्द को दर्शाने वाला एक संदेश बॉक्स दिखाई देगा।