අන්තර්ගතය
ගැටලුව සකස් කිරීම
අපට සෑම දිනකම “නටන්න” සිදු වන එවැනි මේසයක් ඇතැයි සිතමු.
To whom the table seems small – mentally multiply it twenty times by area, adding a couple more blocks and two dozen large cities.
කාර්යය වන්නේ දැනට වැඩ සඳහා අනවශ්ය වන පේළි සහ තීරු තිරයෙන් තාවකාලිකව ඉවත් කිරීමයි, එනම්,
- මාසයෙන් විස්තර සඟවන්න, කාර්තු පමණක් ඉතිරි
- මුළු එකතුව මාස සහ කාර්තු වලින් සඟවන්න, මුළු එකතුව වසර භාගයක් සඳහා පමණක් ඉතිරි කරන්න
- මේ මොහොතේ අනවශ්ය නගර සඟවන්න (මම මොස්කව්හි වැඩ - මම ශාන්ත පීටර්ස්බර්ග් දැකිය යුත්තේ ඇයි?), ආදිය.
සැබෑ ජීවිතයේ දී, එවැනි වගු සඳහා උදාහරණ මුහුදක් තිබේ.
ක්රමය 1: පේළි සහ තීරු සැඟවීම
ක්රමය, අවංකවම, ප්‍රාථමික හා එතරම් පහසු නැත, නමුත් ඒ ගැන වචන දෙකක් පැවසිය හැකිය. පත්‍රයක කලින් තෝරාගත් පේළි හෝ තීරු තීරුව හෝ පේළි ශීර්ෂය මත දකුණු-ක්ලික් කර සන්දර්භය මෙනුවෙන් විධානය තේරීමෙන් සැඟවිය හැක. සඟවන්න (සඟවන්න):
ප්‍රතිලෝම සංදර්ශකය සඳහා, යාබද පේළි / තීරු තෝරන්න, දකුණු-ක්ලික් කිරීමෙන්, පිළිවෙලින් මෙනුවෙන් තෝරන්න, ප්රදර්ශනය (සඟවන්න).
ගැටළුව වන්නේ ඔබට එක් එක් තීරු සහ පේළිය සමඟ තනි තනිව කටයුතු කිරීමට සිදු වන අතර එය අපහසුතාවයට පත් වේ.
ක්රමය 2. කණ්ඩායම් කිරීම
ඔබ පේළි හෝ තීරු කිහිපයක් තෝරා ඉන්පසු මෙනුවෙන් තෝරන්න දත්ත - කණ්ඩායම සහ ව්යුහය - කණ්ඩායම (දත්ත - සමූහ සහ දළ සටහන - සමූහය), එවිට ඒවා හතරැස් වරහනක (කණ්ඩායම්) කොටු කරනු ලැබේ. එපමනක් නොව, කණ්ඩායම් එකිනෙක කැදලි කළ හැක (කැදලි මට්ටම් 8 දක්වා ඉඩ දෙනු ලැබේ):
වඩාත් පහසු සහ වේගවත් ක්‍රමයක් නම් කලින් තෝරාගත් පේළි හෝ තීරු සමූහ කිරීමට යතුරුපුවරු කෙටිමඟක් භාවිතා කිරීමයි. Alt+Shift+දකුණු ඊතලය, සහ කණ්ඩායම් ඉවත් කිරීම සඳහා Alt+Shift+වම් ඊතලයපිළිවෙළින්.
අනවශ්ය දත්ත සැඟවීමේ මෙම ක්රමය වඩාත් පහසු වේ - ඔබට "" සමඟ ඇති බොත්තම ක්ලික් කළ හැකිය.+" හෝ "-“, හෝ පත්‍රයේ ඉහළ වම් කෙළවරේ සංඛ්‍යාත්මක කණ්ඩායම් මට්ටමක් සහිත බොත්තම් මත - එවිට අපේක්ෂිත මට්ටමේ සියලුම කණ්ඩායම් එකවර කඩා වැටේ හෝ පුළුල් වනු ඇත.
තවද, ඔබගේ වගුවේ අසල්වැසි සෛල සාරාංශ කිරීමේ කාර්යය සහිත සාරාංශ පේළි හෝ තීරු තිබේ නම්, එනම් එක්සෙල් එක අවස්ථාවක් (100% සත්‍ය නොවේ). ඔහු අවශ්ය සියලු කණ්ඩායම් නිර්මාණය කරනු ඇත එක් ව්යාපාරයක් සමඟ මේසය තුළ - මෙනුව හරහා දත්ත - කණ්ඩායම් සහ ව්යුහය - ව්යුහය සාදන්න (දත්ත - සමූහ සහ දළ සටහන - දළ සටහන සාදන්න). අවාසනාවකට මෙන්, එවැනි කාර්යයක් ඉතා අනපේක්ෂිත ලෙස ක්රියා කරන අතර සමහර විට සංකීර්ණ වගු මත සම්පූර්ණ විකාරයක් සිදු කරයි. නමුත් ඔබට උත්සාහ කළ හැකිය.
Excel 2007 සහ නව ඒවා තුළ, මෙම සියලු ප්‍රීති පටිත්තෙහි ඇත දත්ත (දිනය) කණ්ඩායම තුළ ව්යුහය (ලුහුඬු සටහන්):
ක්රමය 3. සලකුණු කළ පේළි/තීරු මැක්‍රෝ එකක් සමඟ සැඟවීම
මෙම ක්රමය සමහර විට වඩාත්ම බහුකාර්ය වේ. අපගේ පත්‍රයේ ආරම්භයට හිස් පේළියක් සහ හිස් තීරුවක් එකතු කර අපට සැඟවීමට අවශ්ය පේළි සහ තීරු ඕනෑම අයිකනයකින් සලකුණු කරමු:
දැන් අපි Visual Basic Editor එක විවෘත කරමු (ALT + F11), අපගේ පොතට නව හිස් මොඩියුලයක් ඇතුල් කරන්න (මෙනුව ඇතුල් කරන්න - මොඩියුලය) සහ සරල මැක්‍රෝ දෙකක පෙළ එහි පිටපත් කරන්න:
Sub Hide() Dim cell as Range Application.ScreenUpdating = False 'ActiveSheet හි එක් එක් කොටුව සඳහා වේගවත් කිරීමට තිරය යාවත්කාලීන කිරීම අක්‍රීය කරන්න.UsedRange.Rows(1).Cells 'පළමු පේළියේ ඇති සියලුම කොටු මත පුනරාවර්තනය වේ නම් cell.Value = "x " එවිට සෛලය .EntireColumn.Hidden = True 'කොටුවෙහි නම් x - ඊළඟට තීරුව සඟවන්න ActiveSheet හි එක් එක් කොටුව සඳහා.UsedRange.Columns(1).Cells 'පළමු තීරුවේ සියලුම කොටු හරහා යනවා නම් cell.Value = "x" එවිට සෛලය
ඔබ අනුමාන කළ හැකි පරිදි, සාර්ව සඟවන්න සැඟවීම් සහ සාර්ව ප්රදර්ශනය - ලේබල් කළ පේළි සහ තීරු ආපසු පෙන්වයි. අවශ්ය නම්, මැක්‍රෝවලට හොට්කී පැවරිය හැක (Alt + F8 සහ බොත්තම පරාමිතීන්), හෝ ටැබ් එකෙන් දියත් කිරීමට පත්‍රය මත කෙලින්ම බොත්තම් සාදන්න සංවර්ධක - ඇතුල් කරන්න - බොත්තම (සංවර්ධක - ඇතුළු කරන්න - බොත්තම).
ක්රමය 4. දී ඇති වර්ණයක් සහිත පේළි/තීරු සැඟවීම
ඉහත උදාහරණයේ දී, අපි ඊට පටහැනිව, සමස්තයන්, එනම් දම් සහ කළු පේළි සහ කහ සහ කොළ තීරු සැඟවීමට අවශ්ය බව කියමු. එවිට අපගේ පෙර මැක්‍රෝව “x” තිබේදැයි පරීක්ෂා කරනවා වෙනුවට අහඹු ලෙස තෝරාගත් නියැදි සෛල සමඟ පිරවුම් වර්ණය ගැලපීම සඳහා චෙක්පතක් එකතු කිරීමෙන් තරමක් වෙනස් කිරීමට සිදුවේ.
Sub HideByColor() Dim cell as Range Application.ScreenUpdating = ActiveSheet.UsedRange.Rows(2).Cells නම් cell.Interior.Color = Range("F2").Interior.Color ඉන්පසු cell.EntireColumn.Hidden. = සත්‍ය නම් cell.Interior.Color = Range("K2").Interior.වර්ණ ඉන්පසු cell.EntireColumn.Hidden = True Next ActiveSheet හි එක් එක් කොටුව සඳහා.UsedRange.Columns(2).Cells if cell.Interior.Color = පරාසය ("D6").Interior.Color එවිට cell.EntireRow.Hidden = True නම් cell.Interior.Color = Range("B11").Interior.Color ඉන්පසු cell.EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub කෙසේ වෙතත්, එක් අවවාදයක් ගැන අප අමතක නොකළ යුතුය: මෙම සාර්ව ක්රියා කරන්නේ ප්‍රභව වගුවේ සෛල අතින් වර්ණ පුරවා ඇත්නම් සහ කොන්දේසි සහිත හැඩතල ගැන්වීම භාවිතා නොකරන්නේ නම් (මෙය අභ්‍යන්තර. වර්ණ දේපලෙහි සීමාවකි). එබැවින්, උදාහරණයක් ලෙස, ඔබ කොන්දේසි සහිත හැඩතල ගැන්වීම් භාවිතයෙන් අංක 10 ට වඩා අඩු ඔබේ වගුවේ සියලුම ගනුදෙනු ස්වයංක්‍රීයව උද්දීපනය කළේ නම්:
… සහ ඔබට ඒවා එක චලිතයකින් සැඟවීමට අවශ්ය වේ, එවිට පෙර මැක්‍රෝව "අවසන්" කිරීමට සිදුවේ. ඔබට Excel 2010-2013 තිබේ නම්, එවිට ඔබට දේපල වෙනුවට භාවිතා කළ හැක අභ්යන්තරය දේපල DisplayFormat.Interior, එය සකසා ඇති ආකාරය නොසලකා සෛලයේ වර්ණය ප්‍රතිදානය කරයි. නිල් රේඛා සැඟවීමට මැක්‍රෝව මෙසේ විය හැක:
Sub HideByConditionalFormattingColor() Dim cell as Range Application.ScreenUpdating = ActiveSheet හි එක් එක් කොටුව සඳහා අසත්‍ය.UsedRange.Columns(1).Cells if cell.DisplayFormat.Interior.Color = Range("G2").InterplayiFormat.InterplayFormat. .EntireRow.Hidden = True Next Application.ScreenUpdating = True End Sub සෛල G2 වර්ණ සංසන්දනය සඳහා නියැදියක් ලෙස ගනු ලැබේ. අවාසනාවන්ත ලෙස දේපල සංදර්ශක ආකෘතිය Excel හි දර්ශනය වූයේ 2010 අනුවාදයෙන් පමණි, එබැවින් ඔබට Excel 2007 හෝ ඊට වඩා පැරණි නම්, ඔබට වෙනත් ක්‍රම ඉදිරිපත් කිරීමට සිදුවේ.
- මැක්‍රෝ යනු කුමක්ද, මැක්‍රෝ කේත ඇතුළත් කළ යුතු ස්ථානය, ඒවා භාවිතා කරන්නේ කෙසේද
- බහු මට්ටමේ ලැයිස්තු වල ස්වයංක්‍රීය සමූහගත කිරීම