विषय - सूची
टेक्स्ट की स्ट्रिंग में nth Word लौटाएं
निम्नलिखित फ़ंक्शन को एक स्ट्रिंग में nth शब्द मिलेगा:
फ़ंक्शन Find_nth_word (वाक्यांश स्ट्रिंग के रूप में, n पूर्णांक के रूप में) स्ट्रिंग मंद करंट_Pos के रूप में लंबी मंद लंबाई_of_String के रूप में पूर्णांक मंद Current_Word_No पूर्णांक के रूप में Find_nth_word = "" Current_Word_No = 1 'अग्रणी रिक्त स्थान निकालें वाक्यांश के लिए = ट्रिम करें (वाक्यांश) L = 1 से Length_of_String यदि (Current_Word_No = n) तो Find_nth_word = Find_nth_word & Mid(Phrase, Current_Pos, 1) End if (Mid(Phrase, Current_Pos, 1) = "") फिर Current_Word_No = Current_Word_No + 1 End यदि अगला Current_Pos सबसे दाहिनी जगह निकालें Find_nth_word = Trim(Find_nth_word) End Function
इसके लिए दो तर्कों की आवश्यकता है - वह वाक्यांश जिसे खोजा जाना है और शब्द संख्या:
Find_nth_word("ऑटोमेटएक्सेल दुनिया की पसंदीदा एक्सेल साइट है", 4)
"दुनिया" वापस आ जाएगी।
यदि वाक्यांश में शब्दों की संख्या निर्दिष्ट शब्द संख्या से कम है तो एक रिक्त स्थान लौटा दिया जाता है।
इसलिए: Find_nth_word("ऑटोमेटएक्सेल दुनिया की पसंदीदा एक्सेल साइट है",12)
खाली लौटेगा क्योंकि "ऑटोमेटएक्सेल एलएस द वर्ल्ड फेवरेट एक्सेल साइट" वाक्यांश में 12 शब्द नहीं हैं।
डाउनलोड
इस लेख से .XLSM फ़ाइल डाउनलोड करने के लिए, यहाँ क्लिक करें