Vlookup - VBA के साथ अनेक परिणाम - VBA कोड उदाहरण

व्लुकअप टेक्स्ट

मानक Vlookup फ़ंक्शन का उपयोग किसी तालिका के भीतर मान खोजने के लिए किया जा सकता है:

और हम इस तरह VLOOKUP का उपयोग करेंगे:

=VLOOKUP (A1:10, "कुत्ता", 2, FALSE)

मान देने के लिए 30.

हालाँकि, इस सूची में हम देखते हैं कि कुत्ता 3 बार होता है। मानक VLOOKUP फ़ंक्शन केवल इस सूची में पहले आइटम से संबद्ध मान लौटाएगा। यह इस सूची में "कुत्ते" के दूसरे या तीसरे उदाहरण के साथ 125 या 9,250 वापस नहीं करेगा।

Vlookup एकाधिक परिणाम

निम्नलिखित फ़ंक्शन हमें एक श्रेणी निर्दिष्ट करने की अनुमति देता है, एक अभिव्यक्ति जिसे खोजा जाना है, और उदाहरण (परिणाम संख्या) और फिर संबंधित मान वापस करें:

फ़ंक्शन Find_nth_Occurrence(Column_Range as Range, Expression as string, Occ as Integer) डबल डिम सेल मंद घटनाओं के रूप में_to_date पूर्णांक के रूप में Find_nth_Occurrence = 1000000 Occurences_to_date = 0 प्रत्येक सेल के लिए Column_Range में यदि Cell.Value घटना_घटना_घटना = 1 घटना_घटना_घटना_घटना फिर Find_nth_Occurrence = Cell.Offset(0, 1)। वैल्यू एंड इफ एंड इफ नेक्स्ट सेल एंड फंक्शन

इस और मानक VLOOKUP फ़ंक्शन के बीच मुख्य अंतर यह है कि इस मामले में, श्रेणी केवल लेबल की श्रेणी है - संपूर्ण डेटा श्रेणी नहीं।
निम्नलिखित एक सबरूटीन है जो कमांड बटन से क्लिक इवेंट के आधार पर इस फ़ंक्शन को कॉल करता है। यह कुत्ते शब्द के तीसरे उदाहरण के लिए शीट 2 पर ए 1: ए 8 श्रेणी में दिखता है:

निजी सब कमांडबटन1_क्लिक () डबल उत्तर के रूप में मंद उत्तर = Find_nth_Occurrence (शीट्स ("शीट 2")। रेंज ("ए 1: ए 8"), "डॉग", 3) MsgBox AnswerEnd Sub

चर "उत्तर" फ़ंक्शन के परिणाम को संग्रहीत करता है - जो तब स्क्रीन पर एक Msgbox में प्रदर्शित होता है:

> हालांकि यदि शब्द सूची में नहीं पाया जा सकता है या आवृत्ति नहीं होती है जैसे "डॉग" शब्द का 5 वां उदाहरण नहीं है, तो 1,000,000 का मान वापस कर दिया जाता है: -
उत्तर = Find_nth_Occurrence (शीट्स ("शीट 2")। रेंज ("ए 1: ए 8"), "डॉग", 5)
या
उत्तर = Find_nth_Occurrence (शीट्स ("शीट 2")। रेंज ("ए 1: ए 8"), "हॉर्स", 2)

आप साइट के विकास में मदद मिलेगी, अपने दोस्तों के साथ साझा करने पेज

wave wave wave wave wave