Excel VBA තීරුවේ අගය සොයා ගැනීමට (සුදුසු උදාහරණ 6)

  • මේක Share කරන්න
Hugh West

MS Excel හි අපට නිතර සෙවීමට හෝ දත්ත කට්ටලයේ අගයන් සෙවීමට අවශ්‍ය වේ. එය පේළිවල හෝ තීරුවේ දත්ත සොයා ගැනීම විය හැකිය. වාසනාවකට මෙන්, එක්සෙල් මෙවැනි කාර්යයන් කිරීමට විවිධ කාර්යයන් සහ සූත්‍ර සපයයි. Excel VBA කේතය ආධාරයෙන්, අපට මෙම සෙවීම් හෝ අගයන් සෙවීමේ කාර්යය ස්වයංක්‍රීය කළ හැක. මෙම ලිපියෙන් අපි Excel VBA හි තීරුවක අගය සොයා ගැනීමට විවිධ ක්‍රම දකිමු.

පුහුණු වැඩපොත බාගන්න

තීරුවේ අගය සොයන්න .xlsm

6 Excel හි තීරුවේ අගය සොයා ගැනීමට VBA හි උදාහරණ

ඔවුන්ගේ නිෂ්පාදන ID<2 සමඟ නිෂ්පාදන තොරතුරු දත්ත කට්ටලයක් ලබා ගනිමු>, වෙළඳ නාමය , ආකෘතිය , ඒකක මිල , සහ ඇණවුම් ID . අපගේ කාර්යය වන්නේ ගැලපෙන ඇණවුම් ID සොයා ගැනීමයි. දැන් අපගේ කාර්යය වන්නේ නිෂ්පාදන ID හා සම්බන්ධ ඇණවුම් ID සොයා ගැනීමයි.

1. තීරුව භාවිතා කර අගය සොයන්න VBA Find Function

පළමු උදාහරණයේ දී, අපි තීරුවක අගයක් සෙවීමට VBA හි ශ්‍රිතය සොයන්න භාවිතා කරමු.

📌 1>පියවර:

  • පත්‍රයේ පතුලේ ඇති පත්‍රයේ නම වෙත යන්න.
  • මූසිකයේ දකුණු බොත්තම ඔබන්න.
  • තෝරන්න ලැයිස්තුවෙන් කේතය බලන්න විකල්පය.

  • VBA කවුළුව විවෘත වේ. ඉන්පසු Insert option

  • දැන් VBA console එකේ පහත කේතය ලියන්න Module තෝරන්න
3277

  • දැන් බොත්තමක් ඇතුළු කරන්නදත්ත කට්ටලය.
  • සංවර්ධක ටැබයට යන්න.
  • ඇතුළු කරන්න බොත්තම ( ආකෘතිය පාලනය ) තෝරන්න. කොටස.

  • බොත්තමෙහි ඕනෑම නමක් දෙන්න. මම එය Search ලෙස දෙනවා වගේ.

  • මෙම බොත්තමට කේතය පවරන්න.
  • තෝරන්න බොත්තම සහ මූසිකයේ දකුණු බොත්තම ඔබන්න.
  • ලැයිස්තුවෙන් මැක්‍රෝව පැවරීම තෝරන්න.

  • Assign Macro කවුළුවෙන් අවශ්‍ය මැක්‍රෝ එක තෝරන්න.
  • ඉන්පසු, OK ඔබන්න.

  • දැන් ඕනෑම නිෂ්පාදන ID ලියා Search බොත්තම මත ක්ලික් කරන්න.

අපිට No බලන්න පුළුවන්. මෙම නිෂ්පාදන අංකය ලැයිස්තුවේ නොමැති බැවින් ගැලපීම පෙන්වයි.

  • තවත් නිෂ්පාදන ID දමා නැවතත් Search බොත්තම ඔබන්න.
  • 14>

    අපි ලබා දී ඇති නිෂ්පාදන ID සඳහා ඇණවුම් අංකය ලබා ගනිමු.

    වැඩිදුර කියවන්න: කෙසේද Excel VBA හි පේළි සහ තීරු අනුව සෛල අගය ලබා ගැනීමට

    2. VBA විවිධ වැඩ පත්‍රිකා වලින් අගය සොයා ගැනීමට

    දැන් මෙම කොටසේදී, අපි ඉහත දේම නමුත් විවිධ වැඩ පත්‍රිකා සඳහා කරන්නෙමු. අපගේ නිෂ්පාදන තොරතුරු Sheet 2 හි ඇති බවත්, සෙවුම් කොටුව Sheet 3 හි ඇති බවත් උපකල්පනය කරමු. දැන් අපි VBA කේතය ලියන්නෙමු, එවිට අපට නිෂ්පාදන හැඳුනුම්පත භාවිතා කර ඇණවුම් හැඳුනුම්පත Sheet 3 වෙතින් සෙවිය හැක.

    Sheet 2:

    පත්‍රය3:

    📌 පියවර:

    11>
  • එකම අනුගමනය කරන්නVBA කොන්සෝලය විවෘත කිරීමට පෙර ක්‍රමයේ සිට පියවර 1 සිට පියවර 2 දක්වා පියවර
  • දැන් පහත කේතය VBA කොන්සෝලයේ ලියන්න
3561

  • දැන් නැවතත් කලින් එක වගේ බොත්තමක් ඇතුල් කරන්න.
  • ඉන්පසු මැක්‍රෝ කේතය බොත්තමට assign කරන්න.

  • ඕනෑම නිෂ්පාදන ID ඇතුළු කර ක්‍රියාත්මක බොත්තම ක්ලික් කරන්න

වැඩිදුර කියවන්න: තීරුවේ සෙවීම් අගය සහ Excel හි වෙනත් තීරුවක අගය ආපසු හැරීම

3. තීරුවේ අගය සොයාගෙන ලකුණු කරන්න

අපි බලමු තීරුවක අගයන් ලකුණු කිරීමෙන් ඒවා සොයා ගන්නේ කෙසේදැයි බලමු. මේ සඳහා, Delivery Status නමින් අතිරේක තීරුවක් සමඟ ඉහත දත්ත කට්ටලයම උපකල්පනය කරමු. දැන් අපගේ කාර්යය වන්නේ බෙදාහැරීමේ තත්ත්‍වය තීරුවේ පොරොත්තු වන අගයන් සලකුණු කිරීමයි.

📌 පියවර:

  • VBA කොන්සෝලය විවෘත කිරීමට පෙර ක්‍රමය ලෙස පියවර 1 සිට පියවර 2 දක්වා එකම පියවර අනුගමනය කරන්න
  • දැන් පහත කේතය VBA කොන්සෝලයේ ලියන්න
2404

  • දැන් වැඩ පත්‍රිකාවට ගොස් කේතය ක්‍රියාත්මක කරන්න.
  • 12>වගුවෙහි ප්‍රතිදානය බලන්න.

වැඩිදුර කියවන්න: Excel තීරුවේ ඉහළම අගය සොයා ගන්නේ කෙසේද (ක්‍රම 4 )

4. වයිල්ඩ්කාඩ් භාවිතයෙන් තීරුවේ අගයන් සොයා ගැනීමට VBA

අවසාන වශයෙන්, Excel VBA හි Wildcard අක්ෂර භාවිතයෙන් තීරුවල අගයන් සෙවිය හැකි ආකාරය හෝ සොයා ගන්නේ කෙසේදැයි අපි බලමු. නැවතත්, අපි එම දත්ත කට්ටලයම භාවිතා කරමුමෙම ක්රමය සඳහා ඉහත. අපගේ කාර්යය වන්නේ ඔවුන්ගේ මාදිලිය භාවිතා කර නිෂ්පාදන මිල සොයා ගැනීමයි. අපට නිෂ්පාදන ID හි සම්පූර්ණ නම හෝ අවසාන/පළමු අක්ෂර ටයිප් කළ හැක.

📌 පියවර:

  • VBA කොන්සෝලය විවෘත කිරීමට පෙර ක්‍රමය ලෙස පියවර 1 සිට පියවර 2 දක්වා එකම පියවර අනුගමනය කරන්න
  • දැන් පහත කේතය VBA කොන්සෝලයේ ලියන්න
8937

  • නැවතත්, පෙර එක මෙන් බොත්තමක් ඇතුළු කරන්න.
  • දැන් මැක්‍රෝ එක පවරන්න බොත්තම වෙත කේතය.

  • දැන් ඕනෑම අර්ධ නිෂ්පාදන ID ඇතුලත් කර ක්‍රියාත්මක බොත්තම ඔබන්න.

වැඩිදුර කියවන්න: Excel තීරුවක අඩුම අගය සොයා ගන්නේ කෙසේද (විධි 6ක්)

9> 5. Excel VBA තීරුවේ උපරිම අගය සොයා ගැනීමට

මෙහි, අපට VBA කේතය භාවිතයෙන් තීරුවක උපරිම අගය සොයා ගැනීමට අවශ්‍යයි.

📌 පියවර:

  • අපට උපරිම මිල සොයා ගැනීමට අවශ්‍යයි.

  • දැන්, පහත VBA එක දමන්න. නව මොඩියුලයක කේතය.
9974

  • ඉන්පසු, VBA කේතය ක්‍රියාත්මක කිරීමට F5 බොත්තම ඔබන්න.
  • ආදාන සංවාද කොටුව දිස්වේ.
  • දත්ත කට්ටලයෙන් පරාසය තෝරන්න.

  • අවසාන වශයෙන්, OK බොත්තම ඔබන්න.

අපට සංවාද කොටුවේ උපරිම අගය පෙන්වනු දැකිය හැක.

6. Excel VBA තීරුවේ අවසාන අගය සොයා ගැනීමට

මෙහි, අපට a හි අවසාන පේළියේ හෝ කොටුවේ අගය දැන ගැනීමට අවශ්‍යයි.නිශ්චිත තීරුව. උදාහරණයක් ලෙස, අපට නිෂ්පාදන තීරුවෙන් අවසාන නිෂ්පාදනය දැන ගැනීමට අවශ්‍යයි

📌 පියවර:

  • පහත ඇති VBA කේතය මොඩියුලයට ඇතුළත් කරන්න.
9868

  • ඉන්පසු, <1 එබීමෙන් කේතය ක්‍රියාත්මක කරන්න>F5 බොත්තම.

අවසාන අගය සංවාද කොටුවේ පෙන්වා ඇත.

වැඩිදුර කියවන්න: Excel හි තීරුවක අගයක අවසාන සිදුවීම සොයා ගන්නේ කෙසේද (ක්‍රම 5)

මතක තබා ගත යුතු කරුණු

සමහර පොදු දෝෂ: <3

  • දෝෂය: වරකට එක් අගයක්. FIND ක්‍රමයට වරකට එක් අගයක් පමණක් සොයාගත හැකි බැවිනි.
  • දෝෂය: #NA VLOOKUP හි. සෙවූ අගය ලබා දී ඇති දත්ත කට්ටලයේ නොමැති නම්, මෙම ශ්‍රිතය මෙම #NA දෝෂය ලබා දෙනු ඇත.
  • පරාසය(“Cell_Number”).ClearContents කොටස වේ සෛලයෙන් පෙර අගය ඉවත් කිරීමට භාවිතා කරයි. එසේ නොමැතිනම්, පෙර අගය අතින් ඉවත් කිරීමට අවශ්‍ය වේ.

නිගමනය

මෙය Excel හි VBA කේතය භාවිතයෙන් තීරු වල අගයන් සෙවීමට ක්‍රම කිහිපයකි. මම සියලුම ක්‍රම ඒවායේ අදාළ උදාහරණ සමඟ පෙන්වා දී ඇති නමුත් තවත් බොහෝ පුනරාවර්තන තිබිය හැකිය. භාවිතා කරන ලද කාර්යයන්හි මූලික කරුණු ද මම සාකච්ඡා කර ඇත. ඔබට මෙය සාක්ෂාත් කර ගැනීමට වෙනත් ක්‍රමයක් තිබේ නම්, කරුණාකර එය අප සමඟ බෙදා ගැනීමට නිදහස් වන්න. Excel හි තවත් රසවත් ලිපි සඳහා අපගේ වෙබ් අඩවිය ExcelWIKI වෙත පිවිසෙන්න.

Hugh West යනු ක්ෂේත්‍රයේ වසර 10කට වැඩි පළපුරුද්දක් ඇති ඉතා පළපුරුදු Excel පුහුණුකරුවෙකු සහ විශ්ලේෂකයෙකි. ඔහු ගිණුම්කරණය සහ මූල්‍ය පිළිබඳ ශාස්ත්‍රවේදී උපාධියක් සහ ව්‍යාපාර පරිපාලනය පිළිබඳ ශාස්ත්‍රපති උපාධියක් ලබා ඇත. හියු ඉගැන්වීම සඳහා දැඩි ආශාවක් ඇති අතර අනුගමනය කිරීමට සහ තේරුම් ගැනීමට පහසු වන අද්විතීය ඉගැන්වීම් ප්‍රවේශයක් වර්ධනය කර ඇත. ඔහුගේ Excel පිළිබඳ විශේෂඥ දැනුම ලොව පුරා සිටින දහස් ගණනක් සිසුන්ට සහ වෘත්තිකයන්ට ඔවුන්ගේ කුසලතා වැඩිදියුණු කිරීමට සහ ඔවුන්ගේ වෘත්තීය ජීවිතය තුළ විශිෂ්ටත්වයට පත් කිරීමට උපකාර කර ඇත. ඔහුගේ බ්ලොගය හරහා, හියු ඔහුගේ දැනුම ලෝකය සමඟ බෙදා ගනී, නොමිලේ එක්සෙල් නිබන්ධන සහ පුද්ගලයන්ට සහ ව්‍යාපාරවලට ඔවුන්ගේ පූර්ණ හැකියාවන් කරා ළඟා වීමට උපකාර කිරීමට මාර්ගගත පුහුණුව ලබා දෙයි.