Excel VBA සමඟින් පෙළ අංකයට පරිවර්තනය කරන්නේ කෙසේද (Macros සමඟ උදාහරණ 3ක්)

Hugh West

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

Microsoft Excel හි, අංක සමඟ වැඩ කිරීම වඩාත් සුලභ වේ. සමහර විට, අපට විශාල සංඛ්‍යා සහිත දත්ත කට්ටලයක් සැකසීමට සිදුවේ. නමුත්, ඔබගේ අංක පෙළක් මෙන් පෙනෙන තත්වයකට ඔබ පත්වනු ඇත. මෙම හේතුව නිසා, ඔබට කිසිදු ආකාරයක මෙහෙයුමක් එකතු කිරීම, අඩු කිරීම, බෙදීම, ගුණ කිරීම හෝ සිදු කළ නොහැක. ඔබ මෙය කිරීමට උත්සාහ කරන විට එය සෑම විටම දෝෂයක් පෙන්වයි. මෙම නිබන්ධනයේදී, සුදුසු උදාහරණ සහ නිසි නිදර්ශන සහිත VBA කේත භාවිතයෙන් Excel හි පෙළ අංකයට පරිවර්තනය කරන්නේ කෙසේදැයි අපි ඔබට කියා දෙන්නෙමු.

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

මෙම පරිචය බාගන්න. වැඩපොත

VBA.xlsm භාවිතයෙන් පෙළ අංක බවට පරිවර්තනය කරන්න

පෙළ ලෙස හැඩසවි ඇති අංක හඳුනාගන්නේ කෙසේද

Microsoft Excel ස්මාර්ට් වේ Text සහ Number අතර වෙනස තේරුම් ගැනීමට ප්‍රමාණවත්. එය ස්වයංක්‍රීයව ඒවා අදාළ ආකෘතිවලට පරිවර්තනය කරයි. නමුත්, සමහර විට දත්ත කට්ටලය වැරදි ලෙස භාවිතා කිරීම සහ වැරදි අර්ථකථන නිසා එය කළ නොහැක. එම හේතුව නිසා, එය ඔබගේ වැඩපොතෙහි එම අංක පෙළ ලෙස තබා ගනී.

මෙම දත්ත කට්ටලය දෙස බලන්න. මෙන්න, අපට තීරුවක අංක කිහිපයක් තිබේ.

තීරුවේ අපට සංඛ්‍යා තිබුණද, ඒවා සියල්ලම පෙළ මෙන් වමට පෙළගස්වා ඇත. දැන්, ඕනෑම කොටුවක් ක්ලික් කරන්න. කොටුව අසල ඔබට මෙම පෙට්ටිය හමුවනු ඇත.

දැන්, මූසික කර්සරය පෙට්ටිය මත තබා ගන්න. ඊට පසු, ඔබට මෙම පණිවිඩය පෙනෙනු ඇත.

එය සෛලය පෙළ ලෙස ෆෝමැට් කර ඇති බව පෙන්වයි. මේ ආකාරයෙන්, ඔබට සහතික විය හැකියසෛල පෙළ ලෙස ෆෝමැට් කර තිබේද නැද්ද යන්න.

Excel හි පෙළ අංකයට පරිවර්තනය කිරීමට VBA කේත 3ක්

ඔබට පහසුවෙන් පෙළ අතින් සංඛ්‍යා බවට පරිවර්තනය කළ හැකි වුවද, මෙම නිබන්ධනය යනු පෙළ බවට පරිවර්තනය කිරීම පිළිබඳවය. VBA කේත භාවිතා කරන අංකය. මෙම සියලු ක්‍රම ඉගෙන ගෙන ඔබේ දත්ත කට්ටලයට යොදන්න අපි නිර්දේශ කරමු. නිසැකවම, එය බොහෝ අවස්ථාවන්හිදී ප්‍රයෝජනවත් වනු ඇත.

1. Range.NumberFormat සමඟ VBA කේතය Excel හි පෙළ අංකයට පරිවර්තනය කිරීමේ ක්‍රමය

මෙම ක්‍රමය ඉතා සරල සහ භාවිතා කිරීමට පහසුය. ඕනෑම දත්ත කට්ටලයක් මත. ඔබ කළ යුත්තේ සෛල පරාසය තෝරා එය VBA කේතය තුළට ඇතුළු කිරීමයි.

📌 පියවර

1. පළමුව, VBA සංස්කාරකය විවෘත කිරීමට ඔබේ යතුරුපුවරුවේ ALT+F11 ඔබන්න.

2. ඇතුළු කරන්න > මොඩියුලය .

3. ඉන්පසු, පහත කේතය ටයිප් කරන්න:

9931

4. ගොනුව සුරකින්න.

5. ඉන්පසු, ALT+F8 ඔබන්න. එය මැක්‍රෝ සංවාද කොටුව විවෘත කරයි.

6. ConvertTextToNumber තෝරන්න සහ Run මත ක්ලික් කරන්න.

අවසානයේ, මෙම කේතය අපගේ පෙළ අංක බවට පරිවර්තනය කරයි.

තවත් කියවන්න: Excel VBA හි String අංකයට පරිවර්තනය කරන්නේ කෙසේද

2. VBA Code with Loop සහ CSng සමඟ පෙළ අංකයට පරිවර්තනය කිරීම

මෙම ක්‍රමයේදී අපි භාවිතා කරන්නේ Loop සහ CSng ශ්‍රිත. CSng ශ්‍රිතය මූලික වශයෙන් ඕනෑම පෙළක් තර්කයක් ලෙස ගෙන එය තනි අංකයකට පරිවර්තනය කරයි. අපගේ ලූපය එක් එක් සෛල හරහා ගමන් කරයිතෝරාගත් තීරුව. ඊට පසු, අපි එය පෙළ සිට අංකයට පරිවර්තනය කිරීම සඳහා එක් එක් කොටුවේ අගය CSng ශ්‍රිතය වෙත යමු.

📌 පියවර

1. පළමුව, VBA සංස්කාරකය විවෘත කිරීමට ඔබේ යතුරුපුවරුවේ ALT+F11 ඔබන්න.

2. ඇතුළු කරන්න > මොඩියුලය .

3. ඉන්පසු, පහත කේතය ටයිප් කරන්න:

9458

4. ගොනුව සුරකින්න.

5. ඉන්පසු, ALT+F8 ඔබන්න. එය මැක්‍රෝ සංවාද කොටුව විවෘත කරයි.

6. ConvertUsingLoop තෝරා Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, අපි මෙම VBA කේතය භාවිතයෙන් අපගේ පෙළ අංක බවට පරිවර්තනය කර ඇත. .

සමාන කියවීම්

  • එක්සෙල් හි තොග වශයෙන් පෙළ අංක බවට පරිවර්තනය කරන්න (මාර්ග 6ක්)
  • Excel හි දිගු කාලයක් භාවිතා කරන VBA බවට පරිවර්තනය කරන්නේ කෙසේද (මාර්ග 3)
  • Excel VBA හි String ද්විත්වයට පරිවර්තනය කරන්නේ කෙසේද (5 ක්‍රම)
  • කෙසේද Excel හි අංකයට පරිවර්තනය කිරීමේ දෝෂය නිවැරදි කිරීමට (ක්‍රම 6)

3. Excel හි ගතික පරාසයන් සඳහා පෙළ අංක බවට පරිවර්තනය කරන්න

දැන්, පෙර ක්‍රම තෝරාගත් පරාස සඳහා විය . ඒ කියන්නේ ඔබ ඔබේ සෛල පරාසය කේතයට අතින් ඇතුල් කළ යුතුයි. නමුත් සමහර විට ඔබගේ දත්ත කට්ටලය විශාල විය හැක. එවැනි අවස්ථාවන්හිදී, ඔබ සෛල පරාසය මතක තබා ගත යුතුය. මෙම ක්‍රමය එම ප්‍රශ්නය ජය ගනු ඇත. අපගේ දත්ත කට්ටලය Cell B5 වෙතින් ආරම්භ වන බව අපි දනිමු. නමුත් එය අවසන් විය හැක්කේ කොතැනින්දැයි අපි නොදනිමු.

එබැවින් අපි Cells(Rows.Count, "B").End(xlUp).Row භාවිතයෙන් දත්ත ඇති අවසන් වරට භාවිතා කළ එක්සෙල් පේළිය ගතිකව හඳුනා ගනිමු. ඒඅපි " B5:B " සමඟ සම්බන්ධ කරන අවසන් හිස් නොවන පේළි අංකය ලබා දෙයි.

📌 පියවර

1. පළමුව, VBA සංස්කාරකය විවෘත කිරීමට ඔබේ යතුරුපුවරුවේ ALT+F11 ඔබන්න.

2. Insert > Module මත ක්ලික් කරන්න.

3. ඉන්පසු, පහත කේතය ටයිප් කරන්න:

2767

4. ගොනුව සුරකින්න.

5. ඉන්පසු, ALT+F8 ඔබන්න. එය මැක්‍රෝ සංවාද කොටුව විවෘත කරයි.

6. ඉන්පසු ConvertDynamicRanges තෝරන්න සහ Run මත ක්ලික් කරන්න.

ඔබට පෙනෙන පරිදි, අපි අකුරු අංක බවට පරිවර්තනය කිරීම සාර්ථකයි VBA කේත.

💬 මතක තබා ගත යුතු දේවල්

✎ මෙන්න, අපි අපගේ දත්ත කට්ටලය සඳහා B තීරුව භාවිතා කරමු. ඔබේ දත්ත වෙනත් තීරුවක තිබේ නම්, ඒ අනුව VBA කේතවල සෛල පරාසය වෙනස් කරන්න.

✎ VBA කේත ක්‍රියා කරන්නේ සක්‍රිය පත්‍රයේ පමණි.

නිගමනය

අවසන් කිරීම සඳහා, VBA කේත භාවිතයෙන් Excel හි පෙළ අංක බවට පරිවර්තනය කිරීම පිළිබඳ ප්‍රයෝජනවත් දැනුමක් මෙම නිබන්ධනය ඔබට ලබා දී ඇතැයි මම බලාපොරොත්තු වෙමි. මෙම උපදෙස් සියල්ල ඉගෙන ගෙන ඔබේ දත්ත කට්ටලයට අදාළ කර ගැනීමට අපි නිර්දේශ කරමු. පුහුණු වැඩපොත බාගත කර ඔබම උත්සාහ කරන්න. එසේම, අදහස් දැක්වීමේ කොටසෙහි ප්‍රතිපෝෂණ ලබා දීමට නිදහස් වන්න. ඔබගේ වටිනා ප්‍රතිපෝෂණය මෙවැනි නිබන්ධන නිර්මාණය කිරීමට අපව පොලඹවයි. විවිධ Excel සම්බන්ධ ගැටළු සහ විසඳුම් සඳහා අපගේ වෙබ් අඩවිය Exceldemy.com පරීක්ෂා කිරීමට අමතක නොකරන්න.

කලින් පෝස්ට් එක අනුපිටපත් ඉවත් කර Excel හි පළමු අගය තබා ගන්නේ කෙසේද (ක්‍රම 5)
ඊළඟ පෝස්ට් එක Excel හි තීරුවක නිශ්චිත වචන ගණන් කරන්නේ කෙසේද (ක්‍රම 2)

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