የ VLOOKUP ተግባርን ማሻሻል

ማውጫ

ፓራሹትን በትክክል እንዴት ማሸግ እንደሚቻል?

ጥቅም። እትም 2፣ ተሻሽሏል።

የሚከተለውን የትዕዛዝ ሠንጠረዥ አለን እንበል፡-

የ VLOOKUP ተግባርን ማሻሻል

ለምሳሌ የኢቫኖቭ ሶስተኛ ትዕዛዝ መጠን ወይም ፔትሮቭ ሁለተኛውን ስምምነቱን ሲፈጽም ምን ያህል እንደሆነ ማወቅ አለብን. አብሮ የተሰራው የ VLOOKUP ተግባር በሰንጠረዡ ውስጥ ያለውን የአያት ስም የመጀመሪያ ክስተት ብቻ መፈለግ ይችላል እና አይረዳንም። እንደ “የትእዛዝ ቁጥር 10256 አስተዳዳሪ ማን ነበር?” ያሉ ጥያቄዎች እንዲሁም መልስ ሳይሰጥ ይቀራል፣ tk. አብሮ የተሰራው VLOOKUP ከፍለጋው በስተግራ ያሉትን እሴቶች ከአምዶች መመለስ አይችልም።

እነዚህ ሁለቱም ችግሮች በአንድ ጊዜ ተፈትተዋል - እስቲ የራሳችንን ተግባር ለመጀመሪያ ጊዜ ብቻ ሳይሆን በአጠቃላይ ሁኔታ ለ Nth ክስተት እንመለከታለን. ከዚህም በላይ በማንኛውም አምዶች ውስጥ መፈለግ እና ውጤቶችን ማምጣት ይችላል. VLOOKUP2 እንበል። 

ALT + F11 ን በመጫን ወይም ከምናሌው በመምረጥ Visual Basic Editor ን ይክፈቱ አገልግሎት - ማክሮ - ቪዥዋል ቤዚክ አርታዒ (መሳሪያዎች - ማክሮ - ቪዥዋል ቤዚክ አርታዒ)አዲስ ሞጁል አስገባ (ምናሌ አስገባ - ሞጁል) እና የዚህን ተግባር ጽሑፍ እዚያ ይቅዱ፡-

ተግባር VLOOKUP2(ሠንጠረዡ እንደ ተለዋጭ፣ የፍለጋ ዓምድNum እንደ ረጅም፣ የፍለጋ እሴት እንደ ተለዋጭ፣ _ N እስከ ረጅም፣ ውጤትColumnNum እንደ ረጅም) Dim i እንደ ረጅም፣ iCount እንደ ረጅም የጉዳይ አይነት ስም (ሠንጠረዥ) ምረጥ መያዣ "ክልል" ለ i = 1 ወደ ረድፎች. .መቁጠር ከሠንጠረዥ.ሴሎች(i, SearchColumnNum) = SearchValue ከዚያም iCount = iCount + 1 End If iCount = N then VLOOKUP2 = Table.ሴሎች(i, ResultColumnNum) ለመጨረሻ ጊዜ ውጡ ከሆነ በመቀጠል i Case "Variant()" For i = 1 ወደ UBound (ሠንጠረዥ) ከሆነ ሰንጠረዥ(i, SearchColumnNum) = SearchValue ከዚያም iCount = iCount + 1 If iCount = N ከዚያም VLOOKUP2 = Table(i, ResultColumnNum) ለመጨረሻ ጊዜ ውጣ በሚቀጥለው ከሆነ እና ካበቃ የማብቂያ ተግባርን ምረጥ  

ቪዥዋል ቤዚክ አርታዒን ይዝጉ እና ወደ ኤክሴል ይመለሱ።

አሁን አልፈዋል አስገባ - ተግባር (አስገባ - ተግባር) በምድብ ተጠቃሚ ተገልጻል (በተጠቃሚ የተገለጸ) የእኛን VLOOKUP2 ተግባር ማግኘት እና ሊጠቀሙበት ይችላሉ። የተግባር አገባብ እንደሚከተለው ነው።

=VLOOKUP2(ሠንጠረዥ፣የምንፈልግበት_የአምድ_ቁጥር፤የፍለጋ_ዋጋ፤N፤የእሴት_የማግኘት_የአምድ_ቁጥር)

አሁን የመደበኛ ተግባር ገደቦች ለእኛ እንቅፋት አይደሉም።

የ VLOOKUP ተግባርን ማሻሻል

PS ልዩ ምስጋና ለ The_Prist በተዘጉ መጽሃፍት ውስጥ መፈለግ እንዲችል ተግባሩን ስላሻሻለ።

  • የ VLOOKUP ተግባርን በመጠቀም ከአንድ ሠንጠረዥ ወደ ሌላ ውሂብ መፈለግ እና መተካት
  • INDEX እና MATCH ተግባራትን በመጠቀም "ግራ VLOOKUP"

 

መልስ ይስጡ