Excel හි Active Cell වෙතින් පරාසයක් තෝරා ගැනීමට VBA භාවිතා කරන්නේ කෙසේද (ක්‍රම 3)

Hugh West

20-08-2023 මැක්‍රෝස් සහ amp; එක්සෙල් VBA
  • මේක Share කරන්න
Hugh West

අපි ඔබට 3 ක්‍රම පෙන්වන්නට යන්නේ Excel VBA පරාසය තේරීමට ක්‍රියාකාරී කොටුවෙන් . මෙය ප්‍රදර්ශනය කිරීම සඳහා, අපි 3 තීරු සහිත දත්ත කට්ටලයක් තෝරා ගත්තෙමු: “ මුල් නම ”, “ අවසාන නම ”, සහ “ ඊමේල් ". අපි සෛලයක් තෝරාගෙන Excel VBA භාවිතා කර එම සෛලය වෙතින් පරාසය තෝරන්නෙමු.

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

Active Cell.xlsm වෙතින් පරාසය තෝරන්න

3 Excel හි VBA භාවිතයෙන් Active Cell වෙතින් පරාසයක් තෝරා ගැනීමට ක්‍රම

1. සක්‍රිය කොටුවේ සිට අවසාන හිස්-නොවන කොටුව දක්වා පරාසය තේරීමට VBA භාවිතා කිරීම

පළමු ක්‍රමය සඳහා, අපි Range.End ගුණාංගය භාවිතා කරන්නෙමු.

මෙහි, අපි අපගේ කේතය මොඩියුලය ලෙස ඇතුළත් කරන්නෙමු. මොඩියුලය කවුළුව ගෙන ඒමට, මේවා කරන්න-

පියවර:

  • පළමුව, සංවර්ධක වෙතින් ටැබ් >>> Visual Basic තෝරන්න.

Visual Basic කවුළුව දිස්වේ.

  • අවසාන වශයෙන්, ඇතුළු කරන්න >>> මොඩියුලය තෝරන්න.

මෙය මොඩියුලය කවුළුව ගෙන එනු ඇත.

1.1. අවසානය(xlUp) ගුණාංගය භාවිතා කරමින්

මෙම කොටසේ, අපි අවසාන හිස් නොවන කොටුව දක්වා පරාසය ඉහළට තේරීමට යන්නෙමු. 2> අපගේ ක්‍රියාකාරී කොටුවෙන් .

පියවර:

  • පළමුව, මොඩියුලය කවුළුව ගෙන එන්න.
  • දෙවනුව, පහත කේතය ටයිප් කරන්න . 
6969

අපි අපේ උප ක්‍රියා පටිපාටිය ToUp . ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. පළමු අගය අපගේ ක්‍රියාකාරී සෛලය වේ. අවසාන අගය ActiveCell.End(xlUp) වේ. අවසාන වශයෙන්, අපි පරාසය තෝරාගන්නේ පරාසය . තෝරන්න ක්‍රමයයි.

  • තෙවනුව, එය සුරකින්න සහ කවුළුව වසා දමන්න.
  • ඊට පසු, cell C6 තෝරන්න. මෙම සෛලය අපගේ ක්‍රියාකාරී සෛලය වේ.

දැන්, අපි යන්නේ Macro කවුළුව ගෙන එන්න. එය කිරීමට-

  • සංවර්ධක ටැබයෙන් >>> Macros තෝරන්න.

ඉන් පසු Macro සංවාද කොටුව දිස්වේ.

  • ඉන්පසු, “ මැක්‍රෝ නාමය: ” වෙතින් “ ToUp ” තෝරන්න.
  • අවසාන වශයෙන්, Run<2 මත ක්ලික් කරන්න>.

අපි තෝරාගත් සෛල පරාසය C4:C6 .

තවත් කියවන්න: Excel VBA: Dynamic Range වෙනත් වැඩපොතකට පිටපත් කරන්න

1.2. End(xlDown) Property

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

පියවර:

  • පළමුව, මොඩියුල කවුළුව ගෙන එන්න.
  • දෙවනුව, වර්ගය පහත කේතය. 
2858

අපි අපගේ උප ක්‍රියාපටිපාටිය ToDown අමතන්නෙමු. ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. පළමු අගය අපගේ ක්‍රියාකාරී සෛලය වේ. අවසාන අගය ActiveCell.End(xlDown) වේ. අවසාන වශයෙන්, අපි පරාසය සමඟින් පරාසය තේරීම. ක්‍රමය තෝරන්න.

  • තෙවනුව, සුරකින්න එය කවුළුව වසා දමන්න.
  • ඊට පසු, cell C6 තෝරන්න. මේ අපේ ක්‍රියාකාරී සෛලය .

  • ඉන්පසු, මැක්‍රෝ සංවාද කොටුව ගෙන එන්න.
  • “ ToDown ” තෝරන්න.
  • අවසානයේ, Run මත ක්ලික් කරන්න.

මේ අනුව, අපි අපගේ ක්‍රියාකාරී කොටුවෙන් Excel VBA .

භාවිතයෙන් පරාසයක් තෝරාගෙන ඇත.

තවත් කියවන්න: Excel VBA to Loop to Range to Empty Cell (උදාහරණ 4)

සමාන ලිපි

  • Excel VBA: පරාසය තුළ තීරු හරහා ලූප් කරන්න (උදාහරණ 5)
  • Excel හි පරාසයක එක් එක් පේළිය සඳහා VBA භාවිතා කරන්නේ කෙසේද
  • Excel මැක්‍රෝ: ගතික පරාසයකින් බහුවිධ තීරු වර්ග කරන්න (ක්‍රම 4)
  • VBA එක්සෙල් හි පරාසයක පේළි සහ තීරු හරහා ලූප් කිරීමට (උදාහරණ 5)
  • Excel VBA හි පරාසය Array බවට පරිවර්තනය කරන්නේ කෙසේද (මාර්ග 3)

1.3. අවසානය(xlToLeft) ගුණාංගය යෙදීම

මෙම කොටසේ, අපි අපගේ ක්‍රියාකාරී කොටුවේ පරාසය සිට වමට තේරීමට යන්නෙමු. .

පියවර:

  • පළමුව, මොඩියුල කවුළුව ගෙන එන්න.
  • දෙවනුව, වර්ගය පහත කේතය. 
3734

අපි අපගේ උප ක්‍රියාපටිපාටිය ToLeft අමතන්නෙමු. ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. පළමු අගය අපගේ ක්‍රියාකාරී සෛලය වේ. අවසාන අගය වන්නේ ActiveCell.End(xlToLeft) . අවසාන වශයෙන්, අපි පරාසය තෝරා ගන්නේ පරාසය සමඟිනි. ක්‍රමය තෝරන්න.

  • තෙවනුව, එය සුරකින්න සහ කවුළුව වසා දමන්න.
  • ඊට පසු, සෙල් D7 තෝරන්න. මේ අපේ ක්‍රියාකාරී සෛලය .

  • ඉන්පසු, මැක්‍රෝ සංවාද කොටුව ගෙන එන්න.
  • “ ToLeft ” තෝරන්න.
  • අවසානයේ, Run මත ක්ලික් කරන්න.

මේ අනුව, අපි අපගේ ක්‍රියාකාරී කොටුවෙන් Excel VBA .

භාවිතයෙන් පරාසයක් තෝරාගෙන ඇත.

1.4. අවසානය (xlToRight) දේපල ක්‍රියාත්මක කිරීම

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

පියවර:

  • පළමුව, මොඩියුල කවුළුව ගෙන එන්න.
  • දෙවනුව, වර්ගය පහත කේතය. 
9731

අපි අපගේ උප ක්‍රියාපටිපාටිය ToRight අමතන්නෙමු. ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. පළමු අගය අපගේ ක්‍රියාකාරී සෛලය වේ. අවසාන අගය ActiveCell.End(xlToRight) වේ. අවසාන වශයෙන්, අපි පරාසය තෝරා ගන්නේ පරාසය සමඟිනි. ක්‍රමය තෝරන්න.

  • තෙවනුව, එය සුරකින්න සහ කවුළුව වසා දමන්න.
  • ඊට පසු, cell C8 තෝරන්න. මේ අපේ ක්‍රියාකාරී කොටුව .

  • ඉන්පසු, මැක්‍රෝ සංවාද කොටුව ගෙන එන්න.
  • “ Toright ” තෝරන්න.
  • අවසානයේ, Run මත ක්ලික් කරන්න.

මේ අනුව, අපි තේරී ඇත පරාසයක් අපගේ ක්‍රියාකාරී කොටුවෙන් Excel VBA .

2. VBA පරාසය භාවිතා කිරීම Excel හි VBA භාවිතා කිරීම

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

පියවර:

  • පළමුව, මොඩියුල කවුළුව තුළට ටයිප් කරන්න . 
3854

අපි අපගේ උප පටිපාටිය UsingOffset නිර්මාණය කර ඇත. ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. පළමු අගය අපගේ ක්‍රියාකාරී සෛලය වේ. අවසාන අගය ActiveCell.Offset (1,2) වේ. Offset properties සමඟින් අපි 1 පේළියක් පහළට සහ 2 තීරු දකුණට ගෙන යමු. අවසාන වශයෙන්, අපි පරාසය තෝරන්නේ පරාසය සමඟිනි. ක්‍රමය තෝරන්න.

  • දෙවනුව, එය සුරකින්න සහ කවුළුව වසා දමන්න.
  • ඊට පසුව, cell B8 තෝරන්න. මේ අපේ ක්‍රියාකාරී සෛලය .

  • ඉන්පසු, මැක්‍රෝ සංවාද කොටුව ගෙන එන්න.
  • “ UsingOffset ” තෝරන්න.
  • අවසානයේ, Run මත ක්ලික් කරන්න.

<0 අවසාන වශයෙන්, අපි ක්‍රියාකාරී කොටුවෙන් පරාසයක් තෝරාගෙන ඇත. එපමණක් නොව, අවසාන පියවර දිස්විය යුත්තේ මෙයයි.

වැඩිදුර කියවන්න: Excel VBA: අගයන් සහිත සෛල පරාසයක් ලබා ගන්න (7) උදාහරණ)

3. වත්මන් ප්‍රදේශයේ දේපල භාවිතා කිරීමෙන් Excel හි VBA භාවිතා කරමින් Active Cell වෙතින් පරාසය තෝරන්න

අවසාන ක්‍රමය සඳහා, අපි Range.CurrentRegion දේපල භාවිතා කරන්නෙමු.

පියවර:

  • පළමුව, මොඩියුලය කවුළුව තුළට පහත කේතය ටයිප් කරන්න . 
7595

අපි අපගේ උප ක්‍රියාපටිපාටිය අමතන්නෙමු. cRegion . ඉන්පසු අපි අපගේ පරාසය තෝරා ගනිමු. CurrentRegion property සමඟින්, අපි පරාසය හිස් කොටුවක් දක්වා තෝරා ගනිමු. අවසාන වශයෙන්, අපි පරාසය තෝරන්නේ පරාසය සමඟිනි. ක්‍රමය තෝරන්න.

  • දෙවනුව, එය සුරකින්න සහ Excel පත්රය වෙත ආපසු යන්න.
  • ඉන් පසු, cell C10 තෝරන්න. මේ අපේ ක්‍රියාකාරී සෛලය .

  • ඉන්පසු, මැක්‍රෝ සංවාද කොටුව ගෙන එන්න.
  • “ cRegion ” තෝරන්න.
  • අවසානයේ, Run මත ක්ලික් කරන්න.

මේ අනුව, අපි තෝරාගත් පරාසය දක්වා හිස් කොටුවක් .

පුහුණු අංශය

අපි Excel ගොනුවේ එක් එක් ක්‍රමය සඳහා ප්‍රායෝගික දත්ත කට්ටල සපයා ඇත.

නිගමනය

අපි' මම ඔබට 3 Excel VBA හි ක්‍රම පෙන්වා ඇත පරාසය තෝරන්න ක්‍රියාකාරී කොටුවෙන් . පියවර තේරුම් ගැනීමේදී ඔබට කිසියම් ගැටළුවක් ඇත්නම්, පහත අදහස් දැක්වීමට නිදහස් වන්න. කියවීමට ස්තූතියි, විශිෂ්ට ලෙස සිටින්න!

කලින් පෝස්ට් එක දිනය YYYYMMDD පෙළට පරිවර්තනය කරන්නේ කෙසේද (ඉක්මන් ක්‍රම 3ක්)
ඊළඟ පෝස්ට් එක Excel හි VBA DIR කාර්යය භාවිතා කරන්නේ කෙසේද (ප්‍රායෝගික උදාහරණ 7)

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