අන්තර්ගත වගුව
මෙය ඔබේ Excel වැඩපොතට VBA කේතය (යෙදුම් කේතය සඳහා දෘශ්ය මූලික) එකතු කර ඔබේ පැතුරුම්පත් කාර්යයන් විසඳීමට මෙම මැක්රෝව ධාවනය කරන්නේ කෙසේද යන්න පෙන්වන ආරම්භකයින් සඳහා වන කෙටි පියවරෙන් පියවර නිබන්ධනයකි.
මා සහ ඔබ වැනි බොහෝ අය සැබෑ Microsoft Office ගුරුවරුන් නොවේ. එබැවින්, මෙම හෝ එම විකල්පය ඇමතීමේ සියලු විශේෂතා අප නොදන්නා අතර, විවිධ Excel අනුවාදවල VBA ක්රියාත්මක කිරීමේ වේගය අතර වෙනස අපට පැවසිය නොහැක. අපි අපේ යෙදූ දත්ත සැකසීම සඳහා මෙවලමක් ලෙස Excel භාවිතා කරමු.
ඔබට ඔබේ දත්ත යම් ආකාරයකින් වෙනස් කිරීමට අවශ්ය යැයි සිතමු. ඔබ බොහෝ දේ ගූගල් කර ඔබේ කාර්යය විසඳන VBA මැක්රෝ එකක් සොයා ගත්තා. කෙසේ වෙතත්, VBA පිළිබඳ ඔබේ දැනුම අපේක්ෂා කිරීමට බොහෝ දේ ඉතිරි කරයි. ඔබ සොයාගත් කේතය භාවිතා කිරීමට මෙම පියවරෙන් පියවර මාර්ගෝපදේශය අධ්යයනය කිරීමට නිදහස් වන්න:
VBA කේතය Excel Workbook වෙත ඇතුළු කරන්න
මෙම උදාහරණය සඳහා, අපි වත්මන් වැඩ පත්රිකාවෙන් රේඛා බිඳීම් ඉවත් කිරීමට VBA මැක්රෝ එකක් භාවිත කිරීමට නියමිතය.
- ඔබේ වැඩපොත Excel හි විවෘත කරන්න.
- Alt + F11 ඔබා Visual Basic Editor<විවෘත කිරීමට 2> (VBE).
- " Project-VBAProject " කවුළුවෙහි (ඉහළ වම් කෙළවරේ) ඔබගේ වැඩපොතේ නම මත දකුණු-ක්ලික් කරන්න. සංස්කාරක කවුළුව) සහ ඇතුළු කරන්න -> මොඩියුලය සන්දර්භය මෙනුවෙන්.
- VBA කේතය (වෙබ් පිටුවකින් ආදිය) පිටපත් කර එය VBA සංස්කාරකයේ දකුණු කවුළුවට අලවන්න (" මොඩියුලය1 " කවුළුව).
- ඉඟිය: සාර්ව ක්රියාත්මක කිරීම වේගවත් කරන්න
ඔබගේ කේතය නම්VBA macro හි ආරම්භයේ පහත රේඛා අඩංගු නොවේ:
යෙදුම.ScreenUpdating = False
Application.Calculation = xlCalculationManual
ඉන්පසු පහත දෑ එක් කරන්න ඔබේ මැක්රෝව වේගයෙන් ක්රියා කිරීමට රේඛා (ඉහළ තිරපිටපත් බලන්න):
- කේතයේ ආරම්භය දක්වා, ඩිම් සමඟ ආරම්භ වන සියලුම කේත රේඛාවලට පසුව (තිබේ නම් " Dim " පේළි නැත, පසුව උප පේළියට පසුව ඒවා එක් කරන්න):
Application.ScreenUpdating = False
යෙදුම.Calculation = xlCalculationManual
- කේතයේ මුලට, අවසන් උප :
Application.ScreenUpdating = True
යෙදුම. ගණනය කිරීම = xlCalculationAutomatic
මෙම රේඛා, ලෙස ඔවුන්ගේ නම් යෝජනා කරන්නේ, තිරය නැවුම් කිරීම අක්රිය කර මැක්රෝ ධාවනය කිරීමට පෙර වැඩපොතේ සූත්ර නැවත ගණනය කිරීම ය.
කේතය ක්රියාත්මක වූ පසු, සියල්ල නැවත ක්රියාත්මක වේ. ප්රතිඵලයක් වශයෙන්, කාර්ය සාධනය 10% සිට 500% දක්වා වැඩි වේ (ආහා, සෛලවල අන්තර්ගතය අඛණ්ඩව හසුරුවන්නේ නම් මැක්රෝව 5 ගුණයකින් වේගයෙන් ක්රියා කරයි).
- කේතයේ ආරම්භය දක්වා, ඩිම් සමඟ ආරම්භ වන සියලුම කේත රේඛාවලට පසුව (තිබේ නම් " Dim " පේළි නැත, පසුව උප පේළියට පසුව ඒවා එක් කරන්න):
- ඔබගේ වැඩපොත " Excel macro-Enabled workbook " ලෙස සුරකින්න.
Crl + S ඔබන්න, ඉන්පසු " නැත " බොත්තම ක්ලික් කරන්න " පහත විශේෂාංග සාර්ව-නිදහස් වැඩපොත " අනතුරු ඇඟවීමේ සංවාදයේ සුරැකිය නොහැක.
" Save as " සංවාද කොටුව විවෘත වේ. " Save as type " පතන ලැයිස්තුවෙන් " Excel macro-Enabled workbook " තෝරන්න සහ Save බොත්තම ක්ලික් කරන්න.
- වසා ගැනීමට Alt + Q ඔබන්නසංස්කාරක කවුළුව සහ ඔබේ වැඩපොත වෙත ආපසු යන්න.
Excel හි VBA මැක්රෝස් ධාවනය කරන්නේ කෙසේද
ඉහත කොටසේ විස්තර කර ඇති පරිදි ඔබ එක් කළ VBA කේතය ධාවනය කිරීමට ඔබට අවශ්ය වූ විට: ඔබන්න " Macro " සංවාදය විවෘත කිරීමට Alt+F8.
ඉන්පසු "මැක්රෝ නම" ලැයිස්තුවෙන් අවශ්ය මැක්රෝ එක තෝරා "ධාවනය" බොත්තම ක්ලික් කරන්න.