በVBA ውስጥ ተግባርን ያግኙ፡ እንዴት እንደሚጠቀሙበት?

እንዴት እንደሚጠቀሙ መማር ይፈልጋሉ በVBA ውስጥ ተግባር አግኝ🇧🇷 ከዚያ በትክክለኛው ቦታ ላይ ነዎት!

በ Excel ውስጥ የ SEARCH አማራጭን የማያውቅ ማነው? ከኤክሴል ጋር ለትንሽ ጊዜ ከሰሩ በጠቅላላው የስራ ሉህ ውስጥ የሚፈልጉትን ቃል ወይም ቁራጭ ለማግኘት የ SEARCH ተግባርን ወይም ታዋቂውን Ctrl + L አቋራጭ ቁልፍ ተጠቅመው ይሆናል። እንደ ሙሉው የሥራ መጽሐፍ.

እንዲሁም፣ በVBA ውስጥ የምንፈልገውን እሴት እንድናገኝ የሚረዳን FIND የሚባል ተግባር አለን።

በተግባራዊ ምሳሌዎች ስለዚህ ባህሪ የበለጠ ለማወቅ ከዚህ በታች ያሉትን ዝርዝሮች ይከተሉ።

የFIND ተግባር በVBA ውስጥ እንዴት ነው የሚሰራው?

የExcel VBA FIND ተግባር በተወሰነ ክልል ውስጥ የተወሰነ እሴትን ይፈልጋል። የዚያ እሴት የመጀመሪያ ክስተትን ይፈልጋል እና ከተገኘ ተግባሩ በውስጡ የያዘውን ሕዋስ ይመልሳል። ነገር ግን፣ ምንም ተዛማጅ ካልተገኘ፣ ተግባሩ ምንም አይመልስም። የVBA FIND ተግባር ትክክለኛ ወይም ከፊል ተዛማጅ መመለስ ይችላል።

ለምሳሌ፣ የሚከተለው ኮድ ጽሑፉን ይፈልጋል።ሳን ዲባባ» በመካከል ሀ 1 ሀ 10 en «የስራ ሉህ1🇧🇷

በሉሆች("ሉህ1")።ክልል("A1፡A10")
Rng አዘጋጅ = .አግኝ(ምን:="ሳኦ ፓውሎ")

በVBA ውስጥ የFIND ተግባርን የመጠቀም አላማ በተሰጠው የውሂብ ስብስብ ውስጥ የሚፈለገውን እሴት ማግኘት ነው። በVBA ኮድ በ Excel ውስጥ እሴቶችን የማግኘት ስራን በራስ-ሰር ማድረግ ይችላሉ።

VBA አግኝ ተግባር አገባብ

የVBA FIND ተግባር አገባብ እንደሚከተለው ታውጇል።

አገላለጽ። አግኝ(ምን፣ በኋላ፣ LookIn፣ LookAt፣ SearchOrder፣ SearchDirection፣ Matchcase፣ MatchByte፣ SearchFormat)

የት

አገላለጽ በVBA ኮድ ውስጥ ከ FIND ተግባር የሚቀድመው የክልሎች ነገር ነው። የፍለጋው ክልል አንድ ወይም ከዚያ በላይ ረድፎች፣ ዓምዶች ወይም መላው የተመን ሉህ ሊሆን ይችላል። የVBA FIND ተግባር የሚከተሉትን ነጋሪ እሴቶች ይቀበላል።

  • ምን; ይህ ለመፈለግ ዋጋ ነው. እሱ ቁጥራዊ ፣ ጽሑፋዊ ወይም ሌላ ማንኛውም የ Excel ውሂብ ዓይነት ሊሆን ይችላል። ይህ ነጋሪ እሴት ከ “ፈልግ” አማራጭ ጋር ተመሳሳይ ነው።ማግኘት እና መተካት” ከኤክሴል።
  • በኋላ: ፍለጋው የሚጀመርበትን ሕዋስ ያመለክታል። እንደ ነጠላ ሕዋስ ማመሳከሪያ ገብቷል. ይህ ግቤት ከተተወ ፍለጋው የሚጀምረው ከተጠቀሰው የፍለጋ ክልል በላይኛው ግራ ጥግ ላይ ካለው ሕዋስ በኋላ ነው።
  • ተመልከት ወደዚህ: ይህ እሴቱ መታየት ያለበት ቦታ (ወይም ውሂብ) ነው። እሱ አስተያየት (xlComments)፣ ቀመር (xlFormulas) ወይም እሴት (xlValues) ሊሆን ይችላል። የዚህ ነባሪ እሴት xlFormulas ነው። እንዲሁም፣ ይህ ነጋሪ እሴት ከ" አግኝ አማራጭ ጋር ተመሳሳይ ነው።ማግኘት እና መተካት” ከኤክሴል።
  • ተመልከት ይህ ነጋሪ እሴት ሙሉውን የሕዋስ ይዘት (ትክክለኛ ግጥሚያ) ወይም የሕዋስ ይዘት ክፍል (ከፊል ተዛማጅ) መመሳሰልን ይወስናል። ቋሚዎቹ ለትክክለኛ እና ከፊል ግጥሚያዎች በቅደም ተከተል xlWhole እና xlPart ናቸው። የዚህ ነባሪ እሴት xlPart ነው።
  • የፍለጋ ቅደም ተከተል ይህ ክርክር የፍለጋ ቅደም ተከተልን ይጠቁማል። ፍለጋው በረድፎች (xlByRows) ወይም አምዶች (xlByColumns) መሆን አለመሆኑን መግለጽ ይችላሉ። የዚህ ነባሪ እሴት xlByRows ነው። እንዲሁም፣ ይህ ነጋሪ እሴት ከ" አግኝ አማራጭ ጋር ተመሳሳይ ነው።ማግኘት እና መተካት” ከኤክሴል።
  • አድራሻ ፈልግ፡ ፍለጋው የሚካሄድበትን አድራሻ ይጠቁማል። ወደ ታች ወይም ወደ ቀጣዩ ሕዋስ በ xlNext ቋሚ መፈለግ ትችላለህ። በአማራጭ፣ ወደ ኋላ (ወደላይ) ወይም በቀድሞው ሕዋስ ውስጥ በ xlPrevious ቋሚ መፈለግ ይችላሉ። የዚህ ነባሪ እሴት xlNext ነው።
  • የማዛመጃ መያዣ፡ ይህ ግቤት ፍለጋው ጉዳዩን ሚስጥራዊነት ያለው መሆን እንዳለበት ወይም እንዳልሆነ ይወስናል። ፍለጋው ለጉዳይ ሚስጥራዊነት ያለው ከሆነ፣ ይህ ነጋሪ እሴት እውነት (TRUE) ተብሎ ይገለጻል፣ ካልሆነ ግን ውሸት ነው (FALSE)። የዚህ ነባሪ ዋጋ ሐሰት ነው።
  • ተዛማጅ ባይት፡ አንድ ሰው ባለ ሁለት ባይት ቋንቋ ድጋፍ ከጫነ ወይም ከመረጠ ይህ ነጋሪ እሴት ጥቅም ላይ መዋል አለበት። ባለ ሁለት ባይት ቁምፊዎች ድርብ ባይት ቁምፊዎችን የሚዛመዱ ከሆነ እንደ እውነት መገለጽ አለበት። ባለ ሁለት ባይት ቁምፊዎች ከነጠላ ባይት አቻዎቻቸው ጋር የሚመሳሰሉ ከሆነ እንደ ሐሰት መገለጽ አለበት።
  • የፍለጋ ቅርጸት፡- የሚፈለገው ዋጋ በተወሰነ ቅርጸት (እንደ ደፋር ወይም ሰያፍ) መሆን አለመሆኑን ያመለክታል። የመፈለጊያ እሴቱ የቅርጸት ቴክኒክን መከተል ካለበት፣ ይህ ነጋሪ እሴት እንደ እውነት ነው የተገለጸው፣ አለበለዚያ ውሸት ነው። የዚህ ነባሪ እሴት ሐሰት ነው (FALSE)።

ክርክር ብቻ ምን አስፈላጊ ነው. ሌሎቹ ክርክሮች አማራጭ ናቸው.

የFIND ተግባር ከሚከተሉት ውጤቶች አንዱን ይመልሳል፡-

  • ግጥሚያ ከተገኘ ተግባሩ እሴቱ የሚገኝበትን የመጀመሪያውን ሕዋስ ይመልሳል።
  • ምንም ተዛማጅ ካልተገኘ, ተግባሩ ምንም ነገር አይመለስም. ይህ የሆነበት ምክንያት የተግባር ነገሩ ወደ ምንም ስለተቀናበረ ነው።

በአማራጭ፣ ምንም ተዛማጅ ካልተገኘ፣ ብጁ መልእክት በ የመልእክት ሳጥን ተግባር መመለስ ይቻላል (ከዚህ በታች ያሉትን የኮድ ምሳሌዎች ይመልከቱ)።

ማስታወሻ 1: ፍለጋው በክርክሩ ውስጥ ከተጠቀሰው ሕዋስ በኋላ ይጀምራል. በኋላ እና በፍለጋ ክልል ውስጥ ወደ መጨረሻው ሕዋስ ይቀጥላል። እሴቱ እስከዚህ የመጨረሻ ሕዋስ ድረስ ካልተገኘ ፍለጋው በፍለጋ ክልል ውስጥ ካለው የመጀመሪያው ሕዋስ እንደገና በክርክሩ ውስጥ ወደተገለጸው ሕዋስ ይጀምራል። በኋላ🇧🇷

ስለዚህ, በክርክሩ ውስጥ የተገለጸው ሕዋስ በኋላ በፍለጋው ሂደት መጨረሻ ላይ ይፈለጋል. በክርክሩ አጠቃቀም ላይ ተጨማሪ ዝርዝሮችን ለማግኘት በኋላበዚህ ርዕስ ውስጥ ሁለተኛውን ምሳሌ ተመልከት.

ማስታወሻ 2: የVBA FIND ተግባር በተጠቀመ ቁጥር፣ የ ተመልከት ወደዚህ🇧🇷 መመልከት🇧🇷 የፍለጋ ቅደም ተከተል y MatchByte ስለዚህ እነዚህ እሴቶች በሚቀጥለው ጊዜ ተግባሩ ጥቅም ላይ ከዋለ ኤክሴል ቀደም ሲል የተቀመጡ እሴቶችን ይጠቀማል። ስለዚህ የVBA FIND ተግባርን በመጠቀም ፍለጋው በሚካሄድበት ጊዜ የቀረቡትን ክርክሮች በግልፅ ማወጅ ይመከራል።

በ Excel VBA ውስጥ የFIND ተግባርን እንዴት መጠቀም እንደሚቻል?

በVBA ውስጥ ያለውን የ FIND ተግባር አጠቃቀም ለመረዳት፣ አንዳንድ ተግባራዊ ምሳሌዎችን ከዚህ በታች ለይተናል።

ምሳሌ 1፡ የፍለጋ እሴቱ የመጀመሪያ ክስተት ያለበትን ሕዋስ መምረጥ

በዚህ የመጀመሪያ ምሳሌ ከታች በምስሉ ላይ እንደሚታየው አንዳንድ ስሞችን የያዘ ዝርዝር አለህ እና ስሙን የያዘውን ሕዋስ ማሰስ እና መምረጥ ትፈልጋለህ። ፔሮ🇧🇷

ከዚያ እነዚህን ደረጃዎች ይከተሉ።

1. መመሪያውን ይድረሱ ገንቢ። 🇧🇷 ምስላዊ መሰረታዊ🇧🇷 (በእርስዎ ኤክሴል ውስጥ የገንቢ ትር ካልነቃዎት፣ እዚህ ያረጋግጡ ደረጃ በደረጃ).

የገንቢ መመሪያ

ሁለት. በ VBA ማያ ገጽ ላይ በግራ በኩል ካለው ምናሌ ውስጥ ተፈላጊውን የስራ ሉህ ይምረጡ። በዚህ ምሳሌ, እንመርጣለን የስራ ሉህ1 የስም ዝርዝር የያዘው የስራ ሉህ ነው።

3. የተፈለገውን ሉህ ከመረጡ በኋላ በቀኝ በኩል ባለው ቦታ ላይ ከዚህ በታች ያለውን ኮድ ያስገቡ።

የተፈለገው እሴት የመጀመሪያ ክስተት ያለበትን ሕዋስ ይምረጡ

ንዑስ አካባቢ ስም()
ክልል ("A1: A10"). ፈልግ (ምን: = "ጴጥሮስ"). ምረጥ
ጨርስ ንዑስ
  • የምንፈልገውን ክልል እንደጠቀስነው ከላይ ባለው ኮድ ላይ አስተውል (ሀ 1 ሀ 10🇧🇷
  • ክልሉን ከጠቀሱ በኋላ፣ ጊዜ (.) ያስቀምጡ እና ይተይቡ አግኝ🇧🇷
  • የመጀመሪያው መከራከሪያችን የምንፈልገው ነው። ክርክሩን ለማጉላት, ክርክሩን ማለፍ እንችላለን ምን::ይህ እኛ የምንጠቅሰው የትኛውን መለኪያ ለመለየት ጠቃሚ ይሆናል.
  • የመጨረሻው ክፍል እኛ ማድረግ የምንፈልገውን ቃሉን ካገኘን በኋላ ነው. ቃሉን መምረጥ አለብን, ስለዚህ ክርክሩን እንደ ይምረጡ🇧🇷
  • ከዚያ ቁልፉን በመጠቀም ይህንን ኮድ ያሂዱ F5 ወይም ከታች በምስሉ ላይ እንደሚታየው በእጅዎ ስሙን የያዘውን የመጀመሪያውን ሕዋስ ለመምረጥ ፔሮ🇧🇷

በ VBA ውስጥ ያግኙ

ምሳሌ 2፡ የፍለጋ እሴቱ ሁለተኛ ክስተት ያለበትን ሕዋስ ይምረጡ

በዚህ ሁለተኛ ምሳሌ፣ የሚከተለው ምስል በክልል A1፡A10 ውስጥ የተወሰኑ ስሞችን እንደያዘ ልብ ይበሉ። ስሙ መሆኑን ልብ ይበሉ"ፔሮ” በአምድ A ውስጥ ሁለት ጊዜ ይታያል።

በሁለተኛው ክስተት ሴሉን ይምረጡ

በዚህ አጋጣሚ, መፈለግ እና መምረጥ እንፈልጋለን ሁለተኛ መከሰት በአምድ A (ይህም ሕዋስ A7) ውስጥ "የጴጥሮስ" ስም. ይህንን ለማድረግ የሚከተለውን ኮድ እንጠቀማለን-

የVBA ሁለተኛ ክስተት አግኝ

ንዑስ አካባቢ ስም()
ክልል("A1:A10"). ፈልግ(ምን:="ጴጥሮስ"በኋላ:=ክልል("A2")) ምረጥ
ጨርስ ንዑስ

ከላይ ባለው ኮድ ውስጥ ፍለጋው የሚጀምረው ከሴል A2 በኋላ እንደሆነ እና በአምድ A ውስጥ ወዳለው የመጨረሻው ሕዋስ እንደሚቀጥል ልብ ይበሉ. ይህ የሆነበት ምክንያት የፍለጋው ክልል እንደ አምድ A (A1: A10) ስለተገለጸ ነው.

ስለዚህ ፍለጋው በሴል A3 ውስጥ ስለሚጀምር እሴቱ "ፔሮ” በሴል ውስጥ አለ። A7 ይሰጣል"የተመን ሉህ2🇧🇷 ስለዚህ ሴል A7 ኮዱን ሲሰራ በ FIND ተግባር ይመረጣል።

ስም ከሆነ "ፔሮ” በሴል A3 ውስጥ በአምድ A ውስጥ እስከ መጨረሻው ሕዋስ አልተገኘም ነበር፣ ፍለጋው እንደገና በሴል A1 ይጀምር እና በዚህ ጊዜ በሴል A2 ያበቃል። ስለዚህ በክርክሩ ውስጥ የተገለጸው ሕዋስ "በኋላ” በፍለጋው ሂደት መጨረሻ ላይ በትክክል ይፈለጋል።

ምሳሌ 3፡ አንዳንድ ቁምፊዎችን በመግለጽ ጽሑፍን ያግኙ

የተወሰነውን ክፍል ብቻ በመግለጽ ጽሑፍን ለመፈለግ ክርክሩን ያስገቡ መመልከት ኮሞ xlክፍል ወይም ይህን መከራከሪያ ተውት። በነባሪ የFIND ተግባር በፍለጋ ዋጋው ውስጥ ካሉት ቁምፊዎች ከጠቅላላው ሕብረቁምፊ ጋር ይዛመዳል። ከዚያም ይህን ሙሉ ሕብረቁምፊ የያዘውን ሕዋስ ይመልሳል.

የሚከተለውን ምሳሌ ተመልከት።

ንዑስ አካባቢ ስም()
ክልል("A1:A10"). ፈልግ(ምን:="Ped", LookAt:=xlPart) ምረጥ
ጨርስ ንዑስ

ይህ ኮድ ቁምፊዎችን ይፈልጋል"Ped"በ"ሉህ 1" ክልል A25፡A3 ውስጥ። እሴቱ የያዘው ሕዋስ ተመልሷል፣ እሱም የተሰየመ ከፊል የደብዳቤ ልውውጥ🇧🇷 ስለዚህ፣ የፍለጋ እሴት ቁምፊዎች በሕብረቁምፊው መጀመሪያ፣ መሃል ወይም መጨረሻ ላይ ቢቀመጡ፣ ኤክሴል ቪቢኤ ግጥሚያ ይመልሳል።

እይታ: ቋሚው xlክፍል የ FIND ተግባር ነባሪ እሴት ስለሆነ ከኮዱ ሊወገድ ይችላል። ነገር ግን ይህ ነጋሪ እሴት ከተገለጸ በድርብ ጥቅሶች ውስጥ አለመካተቱን ያረጋግጡ።

ምሳሌ 4፡ በአስተያየት ውስጥ ጽሑፍ ማግኘት

እንዲሁም በ Excel ውስጥ ባለው የሕዋስ አስተያየት ውስጥ ጽሑፍ ለማግኘት የVBA FIND ተግባርን መጠቀም ይችላሉ።

ለተሻለ ግንዛቤ፣ ሶስት ህዋሶችን ከአስተያየቶች ጋር የያዘ (በቀይ ትሪያንግሎች የተመለከተው) የስራ ሉህ ያለንበትን ምሳሌ ይመልከቱ። ከዚህ ጽሑፉን ማግኘት እንፈልጋለን "ኮሚሽን ተከፍሏል” ከአስተያየቶቹ በአንዱ ውስጥ ይገኛል። በዚህ ሁኔታ, የሚከተለውን ኮድ እንጠቀማለን.

ንዑስ ቦታ አስተያየት()
ክልል("A1:B10"). ፈልግ(ምን:="ኮሚሽን የሚከፍል", LookIn:=xlComments) ምረጥ
ጨርስ ንዑስ

በአስተያየቱ ውስጥ ጽሑፍ ያግኙ

በዚህ ምክንያት ኤክሴል የሚመርጠው ጽሑፉ በእኛ ኮድ ውስጥ የተገለጸውን አስተያየት የያዘውን ሕዋስ ብቻ ነው።

ምሳሌ 5፡ በ VBA ውስጥ ያለውን የFIND ተግባርን ማስተናገድ ላይ ስህተት

የምንፈልገው ጽሁፍ በተሰጠው ክልል ውስጥ ካልሆነ፣ VBA ከዚህ በታች እንደሚታየው ስህተት ይመልሳል።

ስህተት 91

ይህንን ስህተት ለማስወገድ ከዚህ በታች እንደሚታየው ኮድ መጠቀም እንችላለን።

ንዑስ አካባቢ ስም()
የዲም ውጤት እንደ ተለዋጭ

ስህተት ላይ ቀጣይ ከቆመበት ቀጥል
ክልል ("A1: A10"). ፈልግ (ምን: = "ክርስቲና"). ምረጥ
በ GoTo 0 ስህተት ላይ

ውጤት = ActiveCell.እሴት

ውጤት ከሆነ = "" ከዚያ
MsgBox "የሚፈልጉት እሴት በተሰጠው ክልል ውስጥ አይገኝም!"
ንዑስ ክፍል ውጣ
ያቁሙ

ጨርስ ንዑስ

ከላይ ባለው ኮድ ላይ VBA እሴቱን ካገኘ የተገኘውን እሴት ያሳያል፣ አለበለዚያ መልዕክቱን እንደ " ያሳያል።የሚፈልጉት እሴት በተሰጠው ክልል ውስጥ አይገኝም🇧🇷

የVBA ስህተቶችን እንዴት ማስተካከል እንደሚችሉ ላይ ተጨማሪ ምክሮችን ለማግኘት ጽሑፉን ይመልከቱ፡- የ Excel VBA ስህተቶች: ማወቅ ያለብዎት ነገር ሁሉ!

ለማስታወስ ዝርዝሮች

  • የFIND ተግባር የRANGE ንብረቱ አካል ነው እና ክልሉን ብቻ ከመረጡ በኋላ FIND መጠቀም አለብዎት።
  • በ FIND ተግባር ውስጥ፣ የመጀመሪያው ነጋሪ እሴት (ምን), በተጨማሪም ሁሉም ነገር አማራጭ ነው.
  • ከአንድ የተወሰነ ሕዋስ በኋላ እሴቱን ካገኘህ, በመለኪያው ውስጥ ያለውን ሕዋስ መጥቀስ ትችላለህ በኋላ የፍለጋ አገባብ.

የተመን ሉህ እዚህ ያውርዱ በዚህ መማሪያ ውስጥ የቀረቡትን ምሳሌዎች የያዘ።

እንዲሁም የሚከተሉትን የ Excel ምክሮች ይመልከቱ።

ስለዚህ በ VBA ውስጥ ስለ FIND ተግባር ምን ያስባሉ? ማንኛውም ጥያቄ ካለዎት አስተያየትዎን ከዚህ በታች ይተዉት. እንዲሁም በድረ-ገፃችን ላይ ተጨማሪ የ Excel እና VBA ምክሮችን ይመልከቱ!

ቶሚ ባንኮች
የሚያስቡትን ለመስማት ደስተኞች እንሆናለን።

መልስ አስቀምጥ

TechnoBreak | ቅናሾች እና ግምገማዎች
አርማ
በቅንብሮች ውስጥ ምዝገባን ያንቁ - አጠቃላይ
የግዢ ጋሪ