ඔබ Microsoft Excel සමඟ ටික වේලාවක් වැඩ කරන්නේ නම්, AutoFill හි වැදගත්කම ඔබ දන්නවා. පේළිය හෝ තීරුව හරහා සූත්‍රයක් පිටපත් කිරීම සඳහා, අපි මෙම ක්‍රමය භාවිතා කරමු. දැන්, අපට මූසිකය මගින් මෙය අතින් භාවිතා කළ හැක. නමුත්, ඔබට දත්ත සහිත විශාල පේළියක් තිබේ නම්, අවසාන පේළියට හෝ තීරුවට ඕනෑම සූත්‍රයක් පිටපත් කිරීමට අපහසු වනු ඇත. ඔබට පහසුවෙන් අවසන් පේළියට හෝ තීරුවට සූත්‍රයක් ස්වයංක්‍රීයව පිරවීමට VBA කේතය භාවිත කළ හැක.

මෙම නිබන්ධනයේදී, ඔබ VBA කේත භාවිතයෙන් Excel හි අවසාන පේළියට සූත්‍රයක් ස්වයංක්‍රීයව පිරවීමට ඉගෙන ගනු ඇත. මෙම නිබන්ධනය සුදුසු උදාහරණ සහ නිසි නිදර්ශන සහිත කරුණක් වනු ඇත. එබැවින්, අප සමඟ රැඳී සිටින්න.

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

ස්වයං පිරවුම් සූත්‍රය අවසන් පේළියේ සිට.xlsm

ස්වයංක්‍රීය පිරවීම යනු කුමක්ද? එක්සෙල්?

දැන්, ස්වයංක්‍රීය පිරවීම යනු Microsoft Excel හි ඇති අංගයක් වන අතර එමඟින් පරිශීලකයින්ට ඉතිරි පේළි හෝ තීරු අගයන්, ආකෘති හෝ සූත්‍ර සමඟ ස්වයංක්‍රීයව පිරවීමට ඉඩ සලසයි. ඔබ ඕනෑම සෛලයක දකුණු පහළ කෙළවරට කර්සරය ගෙන ගිය විට ඔබට එය හඳුනාගත හැකිය. අපි එය Excel හි autofill handler ලෙස හඳුන්වමු.

පහත තිර රුව දෙස බලන්න:

මෙහි, ඔබට අංක දෙකක් දැකිය හැක. අපි Excel හි ස්වයංක්‍රීය පිරවීම භාවිතයෙන් ඉතිරි පේළි පුරවන්නෙමු.

මුලින්ම, B5:B6 සෛල පරාසය තෝරන්න. ඊට පසු, ඔබට දකුණු පස පහළ කෙළවරේ ස්වයංක්‍රීය පිරවුම් හසුරුව පෙනෙනු ඇත.

දැන්, මෙම ස්වයංක්‍රීය පිරවුම් හසුරුව පහළට අදින්න.

ඔබට පෙනෙන පරිදි, Excel ස්වයංක්‍රීයව පුරවා ඇතඉතිරි සෛල. Excel හි ස්වයං පිරවුමේ මූලික භාවිතය මෙයයි.

Excel VBA සමඟ ස්වයංක්‍රීය පිරවුම භාවිතා කරන්නේ කෙසේද

ඔබට ලබා දී ඇති පරාසයක පේළි හෝ තීරු විශාල සංඛ්‍යාවක් තිබේ නම්, ඔබට පහළට ඇද දැමිය යුතුය. ස්වයං පිරවුම් හසුරුව අවසාන පේළියට හෝ තීරුවට. එය ඉතා කාර්යබහුල ක්‍රියාවලියකි. ස්තුතියි ඔබට Excel හි VBA කේත භාවිතයෙන් එය අවම කර ගත හැක. අගයන්, සූත්‍ර, හෝ ආකෘති සමඟ සෛල ස්වයංක්‍රීයව පිරවීමට ඔබට VBA කේතය භාවිත කළ හැකිය. .AutoFill ගමනාන්තය, වර්ගය

මෙහි,

පරාසය(“B5”): මාලාවේ ඉතිරි කොටස පිරවීම සඳහා ප්‍රධාන රටාව ඇති කොටුව.

ගමනාන්තය: ඔබට රටා ශ්‍රේණි සමඟ පිරවීමට අවශ්‍ය කොටු පරාසය.

xlAutoFillType ලෙස ටයිප් කරන්න: ශ්‍රේණි පිරවුම් වර්ගය. ඔබට තෝරා ගත හැකි විවිධ ස්වයං පිරවුම් වර්ග තිබේ.

තවත් කියවන්න: Excel හි VBA AutoFill භාවිතා කරන්නේ කෙසේද

Excel හි ස්වයංක්‍රීය පිරවුම් වර්ග 4 VBA

මෙම කොටසේදී, මම ස්වයං පිරවුම් වර්ග කිහිපයක් ගැන සාකච්ඡා කරමි. xlAutoFillType භාවිතයෙන් අපට ඕනෑම ස්වයං පිරවුම් වර්ගයක් තෝරාගත හැකි බව අපි දැනටමත් දැක ඇත්තෙමු. මෙන්න, මම ඔබට එහි උදාහරණ කිහිපයක් පෙන්වමි.

1. xlFillDefault

අපි කලින් උදාහරණයේ මේ ආකාරයේ ස්වයංක්‍රීය පිරවුමක් දැනටමත් දැක ඇත.

තිර රුව දෙස බලන්න:

ඉතිරි සෛල ස්වයංක්‍රීයව පිරවීම සඳහා පහත VBA කේතය ටයිප් කරන්න:

8428

දැන්, VBA macro ධාවනය කරන්න, ඉන්පසු ඔබට පෙනෙනු ඇතපහත දැක්වෙන්නේ:

එය VBA macro භාවිතයෙන් ඉතිරි සෛල ස්වයංක්‍රීයව පුරවයි.

2. xlFillCopy

එකම අගයන් පිටපත් කිරීමට ඔබට ස්වයං පිරවුම් වර්ගයෙහි xlFillCopy වර්ගය භාවිතා කළ හැක.

තිර රුව දෙස බලන්න:

ඉතිරි සෛල ස්වයංක්‍රීයව පිරවීමට පහත VBA කේතය ටයිප් කරන්න:

3997

දැන්, VBA මැක්‍රෝ එක ක්‍රියාත්මක කරන්න, ඉන්පසු ඔබට පහත දෑ පෙනෙනු ඇත:

Excel විසින් ඉතිරි කොටු එකම අගය රටාවකින් පුරවයි.

3. xlFillMonths

ඔබට xlFillMonths ස්වයං පිරවුම් වර්ගය භාවිතයෙන්ද මාස පිරවිය හැක.

තිර රුව දෙස බලන්න:

1>

මෙන්න, අපි ජනවාරි සහ පෙබරවාරි මාස දෙක ඇතුලත් කර ඇත.

ඉතුරු කොටු ස්වයංක්‍රීයව පිරවීමට පහත VBA කේතය ටයිප් කරන්න:

4969

දැන්, VBA macro ධාවනය කර පසුව එනම්, ඔබට පහත දෑ පෙනෙනු ඇත:

Excel ස්වයංක්‍රීයව රටා තේරුම් ගෙන ඒවායින් ඒවා පුරවයි.

4. xlFillFormats

ඔබට VBA ස්වයං පිරවුම භාවිතයෙන් වෙනත් සෛල වෙත ආකෘති පිටපත් කළ හැක. ඒ සඳහා, ඔබ xlFillFormats ස්වයං පිරවුම් වර්ගය භාවිතා කළ යුතුය.

තිර රුව දෙස බලන්න:

මෙහි, අපට තිබේ සෛල දෙක වර්ණ කිහිපයකින් පුරවා ඇත.

දැන්, ඉතිරි සෛල ස්වයංක්‍රීයව පිරවීම සඳහා පහත VBA කේතය ටයිප් කරන්න:

9410

දැන්, VBA මැක්‍රෝ එක ක්‍රියාත්මක කරන්න, ඉන්පසු ඔබට පෙනෙනු ඇත පහත දැක්වෙන්නේ:

ඔබට පෙනෙන පරිදි, අපගේ VBA මැක්රෝ ස්වයං පිරවුම භාවිතා කරයිB තීරුවේ පේළි ඵලදායී ලෙස පුරවන්න.

තවත් කියවන්න: Excel හි මාස ස්වයංක්‍රීයව පුරවන්නේ කෙසේද

5 ස්වයංක්‍රීය පිරවුම් සූත්‍රය සමඟ අවසාන පේළියේ දක්වා Excel VBA

1. VBA අවසන් වරට භාවිත කළ පේළියට සූත්‍රයක් ස්වයංක්‍රීයව පිරවීමට

ඒ හා සමානව, ඔබට VBA භාවිතයෙන් සූත්‍රයක් ස්වයංක්‍රීයව පිරවිය හැක. ඔබ පෙර කොටස් කියවා ඇත්නම්, ඔබට මෙය පහසුවෙන් කළ හැකිය. ඔබට අවසන් පේළියට සූත්‍රය ස්වයංක්‍රීයව පිරවිය යුතු විට ගැටළුව පැන නගී. ඔබ මුලින්ම අවසන් වරට භාවිතා කළ පේළිය හඳුනා ගත යුතුය. ඊට පසු, VBA කේතය ස්වයංක්‍රීයව ඒවා පුරවනු ඇත.

පහත දත්ත කට්ටලය දෙස බලන්න:

මෙන්න, අපට සමහර විකුණුම්කරුවන්ගේ විකුණුම් දත්ත කට්ටලයක් තිබේ. . අපගේ ඉලක්කය වන්නේ ජනවාරි සහ පෙබරවාරි මාසවල විකුණුම් සම්පූර්ණ තීරුවට එකතු කිරීමයි. ඊට පසු, අපි Excel හි අවසන් වරට භාවිතා කළ පේළියට VBA භාවිතයෙන් ස්වයංක්‍රීය පිරවුම් ක්‍රමය භාවිතා කරමු.

මෙය ක්‍රියාත්මක කිරීමට, පහත කේතය ටයිප් කරන්න:

2303

last_row = Cells(Rows.Count, 2).End(xlUp).පේළිය: එය B තීරුවෙන් අවසන් වරට භාවිතා කළ පේළිය ලබා දෙයි. ඔබට ඔබගේ දත්ත කට්ටලයෙන් ඕනෑම තීරුවක් තෝරාගත හැක.

පරාසය(“E5”).සූත්‍රය = “=SUM(C5:D5)”: අපි C5 සහ D5 හි විකුණුම් එකතු කරමු.

පරාසය(“E5”).AutoFill Destination:=Range(“E5:E” & last_row): ප්‍රතිඵලය ලැබීමෙන් පසු, අපි ස්වයං පිරවුම භාවිත කරමු. එය Cell E5 සිට අප කලින් ලබා ගත් අවසන් වරට භාවිත කළ පේළිය දක්වා ස්වයංක්‍රීයව පිරවීම ආරම්භ කරයි.

දැන්, VBA macro ධාවනය කරන්න. ඊට පසු, ඔබට පහත ප්‍රතිදානය පෙනෙනු ඇත:

ලෙසඔබට පෙනෙනු ඇත, අපගේ VBA කේතය පළමු ප්‍රතිඵලය එක් කරන අතර Excel හි අවසාන පේළියට සූත්‍රය ස්වයංක්‍රීයව පුරවයි.

තවත් කියවන්න: Data සමඟ අවසන් පේළියට පුරවන ආකාරය Excel

2. ActiveCell සිට අවසාන පේළිය දක්වා VBA ස්වයංක්‍රීය පිරවුම

දැන්, ඔබට ස්වයං පිරවුම් ක්‍රමය තුළ විශේෂිත පරාසයක් භාවිතා කිරීමට අවශ්‍ය නැතිනම්, ඔබට ක්‍රියාකාරී සෛල අගයන් භාවිතා කළ හැක. , සූත්‍ර, හෝ ආකෘති. ඔබ කොටුවක් මත ක්ලික් කර සක්‍රිය කොටුවේ සූත්‍රය සමඟ ඉතිරි පේළි ස්වයංක්‍රීයව පිරවීමට අවශ්‍ය වූ විට, මෙම ක්‍රමය භාවිතා කරන්න.

එය පෙර උදාහරණයට සමාන වේ. අපි භාවිතා කරන්නේ පෙර දත්ත කට්ටලය:

දැන්, අපි ජනවාරි සහ පෙබරවාරි මාසවල විකුණුම් එකතු කර Excel VBA භාවිතයෙන් අවසන් පේළියට සූත්‍රය ස්වයංක්‍රීයව පුරවන්නෙමු.

දැන්, පහත කේතය ටයිප් කරන්න:

2074

last_row = Cells(Rows.Count, 2).End(xlUp).Row: එය අවසන් වරට භාවිතා කළ එක ලබා දෙයි. B තීරුවෙන් පේළියක් C5 සහ D5 ඔබේ තෝරාගත් කොටුවේ.

ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & “:E” & last_row): ප්‍රතිඵලය ලැබුණු පසු අපි autofill එක භාවිතා කරමු. එය සක්‍රිය කොටුවේ සිට අප කලින් ලබා ගත් අවසන් වරට භාවිත කළ පේළිය දක්වා ස්වයංක්‍රීයව පිරවීම ආරම්භ කරයි.

දැන්, Cell E5 තෝරන්න.

ඉන් පසු, සූත්‍රය එක් කිරීමට සහ අවසාන පේළියට ස්වයංක්‍රීය පිරවීම සඳහා VBA මැක්‍රෝ ධාවනය කරන්න.

ඔබට පෙනෙන පරිදි, අපිඅවසාන පේළියට සූත්‍රය ස්වයංක්‍රීයව පිරවීම සඳහා VBA මැක්‍රෝ සාර්ථකව භාවිතා කරන ලදී.

සමාන කියවීම්

• නිශ්චිත වාර ගණනකින් පේළි නැවත කරන්නේ කෙසේද Excel (මාර්ග 4)
• Excel හි ස්වයංක්‍රීයව අංක පේළි (ක්‍රම 8)
• Excel හි තීරු එකම අගයකින් පුරවන්නේ කෙසේද (උපක්‍රම 9ක් )
• Excel හි ස්වයංක්‍රීය පිරවුම් කෙටිමඟ යොදන්න (ක්‍රම 7)

3. Excel VBA සමඟ ගතික පරාසය භාවිතා කරමින් අවසාන පේළියට ස්වයංක්‍රීය පුරවන්න

මීට පෙර අපි Excel හි අවසාන පේළියට ස්වයංක්‍රීයව පිරවීම සඳහා VBA මැක්‍රෝ කිහිපයක් පෙන්වමු. දැන්, එම උදාහරණ වල, අපි දැනටමත් ගතික පරාස භාවිතා කර ඇත.

ස්ථිතික පරාසයන් තේරුම් ගැනීමට, පහත කේතය බලන්න:

7578

අපි මූලික වශයෙන් Excel හට සූත්‍රයක් ඇතුළත් කිරීමට කීවෙමු. සෛල E5 සහ එය Cell E5 සිට Cell E11 දක්වා ස්වයංක්‍රීයව පුරවන්න. මෙන්න, අපි පරාසය නියම කළා. ඔබ තවත් පේළි එකතු කළහොත් කුමක් කළ යුතුද? එවැනි අවස්ථාවක, අපගේ VBA එම අමතර පේළි ස්වයංක්‍රීයව පුරවන්නේ නැත, මන්ද අපි එයට නිශ්චිත පරාසයක් ස්වයංක්‍රීයව පුරවන ලෙස දැනටමත් පවසා ඇත.

මෙම ගැටලුව විසඳීමට මම ගතික පරාසයක් ගත හැකි විසඳුමක් ඉදිරිපත් කළෙමි:

4796

ඔබට පෙනෙන පරිදි, අපි මුලින්ම අවසාන පේළිය මෙම කේත පේළියෙන් සොයා ගනිමු:

4873

ඉන්පසු, අපි ගතික පරාසය භාවිතයෙන් අවසාන පේළියට ස්වයං පුරවන්නෙමු:

5358

නැහැ ඔබ ඔබේ දත්ත කට්ටලයට පේළි කීයක් එකතු කළත්, ඒවා හඳුනා ගැනීමට මෙම VBA කේතය සාර්ථක වනු ඇත. තවද එය සූත්‍රයෙන් ඒවා ස්වයංක්‍රීයව පුරවනු ඇත.

ගතික පරාසය මූලික වශයෙන් අදහස් වන්නේ ඔබ පරාසයට ඇතුළු වීමට අවශ්‍ය නොවන බවයි.අතින්. Excel එය වරින් වර යාවත්කාලීන කරයි.

තවත් කියවන්න: Excel VBA: පරාස පන්තියේ ස්වයංක්‍රීය පිරවුම් ක්‍රමය අසාර්ථක විය

4. ස්වයංක්‍රීයව අවසන් කිරීමට VBA භාවිතා කරමින් Excel හි තීරුව

අවසන් පේළියට ස්වයංක්‍රීයව පිරවීම සඳහා ඔබ පෙර කොටස් කියවා ඇත්නම්, ඔබට පහසුවෙන් අවසාන තීරුවට ස්වයංක්‍රීයව පිරවිය හැක. ඔබට ඇත්තේ අවසාන තීරු අංකය සොයාගෙන එය Excel VBA සමඟ ස්වයංක්‍රීයව පිරවිය යුතුය.

පහත දත්ත කට්ටලය දෙස බලන්න:

මෙන්න, අපට තිබේ පුද්ගලයෙකුගේ මාස 3ක අයවැයක් නියෝජනය කරන දත්ත කට්ටලයක්. දැන්, අපි සියලු මාසවල වියදම් එකතු කර Excel VBA භාවිතයෙන් අවසාන තීරුවට සූත්‍රය ස්වයංක්‍රීයව පුරවන්නෙමු.

දැන්, පහත කේතය ටයිප් කරන්න:

8585

last_column = Cells(6, Columns.Count).End(xlToLeft).තීරුව: එය 6 වන පේළියෙන් අවසන් වරට භාවිත කළ තීරුව ලබා දෙයි. ඔබට ඔබේ දත්ත කට්ටලයෙන් ආරම්භ කිරීමට ඕනෑම පේළියක් තෝරාගත හැක.

පරාසය(“D9”).Formula = “=SUM(D6:D8)”: අපි මාස තුනක (ජනවාරි, පෙබරවාරි. මාර්තු) වියදම් එකතු කරමු.

පරාසය(“D9”).AutoFill Destination:=Range(“D9”, Cells(9, last_column)): ප්‍රතිඵලය ලැබීමෙන් පසු, අපි ස්වයං පිරවුම භාවිත කරමු. මෙන්න, අපගේ ප්‍රධාන පේළිය පේළි අංක 9 වේ. අපගේ සියලුම දත්ත මෙම පේළියේ ඇත. එය D තීරුවේ සිට last_column මඟින් අප කලින් ලබා ගත් අවසන් වරට භාවිත කළ තීරුව දක්වා ස්වයංක්‍රීයව පිරවීම ආරම්භ කරයි.

මැක්‍රෝව ධාවනය කිරීමෙන් පසු, ඔබට පහත ප්‍රතිදානය පෙනෙනු ඇත. :

ඔබට පෙනෙන පරිදි, අපි ස්වයංක්‍රීයව පිරවීම සඳහා VBA භාවිතා කළෙමු.Excel හි අවසාන තීරුවට සූත්‍රය.

තවත් කියවන්න: Excel හි තීරුවක් ස්වයංක්‍රීයව පුරවන්නේ කෙසේද

5. අවසාන පේළියේ සිට අනුක්‍රමික අංක ස්වයංක්‍රීයව පුරවන්න Excel හි VBA භාවිතා කරමින්

ඔබට VBA හි ස්වයං පිරවුම භාවිතයෙන් අනුක්‍රමික අංක ස්වයංක්‍රීයව පිරවිය හැක. මෙන්න, ඔබ ස්වයං පිරවුම් වර්ගය තුළ xlFillSeries භාවිතා කළ යුතුය. Excel විසින් රටාව තේරුම් ගෙන ඒවා පුරවනු ඇත.

පහත තිර රුව දෙස බලන්න:

මෙන්න, අපට නම් කිහිපයක් තිබේ. ඒවගේම අපි එයාලට ID එක අනුක්‍රමික විදිහට දෙන්න ඕන. මෙය සිදු කිරීම සඳහා, අපි VBA ස්වයං පිරවුම භාවිතා කරන්නෙමු.

ස්ථිතික පරාසය සහිත අනුක්‍රමික අංක ස්වයංක්‍රීයව පුරවන්න:

3808

කේතය ක්‍රියාත්මක කිරීමෙන් පසු, ඔබට ප්‍රතිදානය පෙනෙනු ඇත:<1

ඔබට ගතික පරාසය භාවිතා කිරීමට අවශ්‍ය නම්, පහත කේතය භාවිතා කරන්න:

1214

last_row = Cells(පේළි. ගණන් කිරීම, 2).අවසන්(xlUp).පේළිය: එය B තීරුවෙන් අවසන් වරට භාවිත කළ පේළිය ලබා දෙයි.

පරාසය(“C5”).AutoFill Destination:=range(“C5 :C” & last_row), Type:=xlFillSeries: එය C5 හි ID රැගෙන C තීරුවේ C අවසන් වරට භාවිත කළ පේළියට ස්වයං පුරවන්න xlFillSeries ,

අවස්ථා දෙකේදීම, ඔබට එකම ප්‍රතිදානය ලැබෙනු ඇත:

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

තව කියවන්න: Excel අනුක්‍රමික අංක පිරවීමට සූත්‍ර සැඟවුණු පේළි මඟ හරින්න

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

✎ ඔබට ස්වයං පිරවීම නැවැත්විය හැක ඔබට එය අවශ්‍ය නැතිනම් විවිධ ක්‍රම .

✎ ඔබට පේළි සහ තීරු කිහිපයක් එකවර ස්වයංක්‍රීයව පිරවිය නොහැක. එය එකින් එක කරන්න.

නිගමනය

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

විවිධ Excel සම්බන්ධ ගැටළු සහ විසඳුම් සඳහා Exceldemy.com අපගේ වෙබ් අඩවිය පරීක්ෂා කිරීමට අමතක නොකරන්න.

නව ක්‍රම ඉගෙන ගෙන දිගටම වර්ධනය වන්න!