မာတိကာ
ဤသင်ခန်းစာတွင်၊ Excel တွင်ရွေးချယ်ထားသောဆဲလ်တစ်ခု၏အတန်းနှင့်ကော်လံကို ဒိုင်နမစ်ကျကျမီးမောင်းထိုးပြရန် မတူညီသောနည်းလမ်း 3 ခုကို သင်လေ့လာရပါမည်။
ကြီးမားသောအလုပ်စာရွက်ကိုအချိန်အကြာကြီးကြည့်ရှုသောအခါ၊ နောက်ဆုံးတွင် သင့် cursor သည် မည်သည့်နေရာနှင့် သင်ကြည့်နေသည့် ဒေတာကို ခြေရာခံနိုင်မည်နည်း။ မင်းဘယ်မှာရောက်နေတယ်ဆိုတာ အတိအကျသိဖို့ Excel ကို ရယူပြီး သင့်အတွက် တက်ကြွတဲ့ အတန်းနဲ့ ကော်လံကို အလိုအလျောက် မီးမောင်းထိုးပြလိုက်ပါ။ ထုံးစံအတိုင်း၊ မီးမောင်းထိုးပြခြင်းသည် တက်ကြွပြီး အခြားဆဲလ်တစ်ခုကို သင်ရွေးချယ်သည့်အခါတိုင်း ပြောင်းလဲသင့်သည်။ အဓိကအားဖြင့်၊ ဤအရာသည် ကျွန်ုပ်တို့ရရှိရန် ရည်မှန်းထားသည်-
VBA
ဤအရာဖြင့် ရွေးချယ်ထားသောဆဲလ်များ၏ အတန်းနှင့်ကော်လံကို အလိုအလျောက်မီးမောင်းထိုးပြပါ ဥပမာအားဖြင့် VBA ဖြင့် ပရိုဂရမ်စနစ်ဖြင့် အသက်ဝင်နေသော ကော်လံနှင့် အတန်းအား သင်မည်ကဲ့သို့ မီးမောင်းထိုးပြနိုင်သည်ကို ပြသသည်။ ယင်းအတွက်၊ ကျွန်ုပ်တို့သည် Worksheet object ၏ SelectionChange event ကို အသုံးပြုပါမည်။
ပထမ၊ သင်သည် <သတ်မှတ်ခြင်းဖြင့် စာရွက်ပေါ်ရှိ ဆဲလ်အားလုံး၏ နောက်ခံအရောင်ကို ရှင်းလင်းပါ။ 1>ColorIndex ကို 0 သို့ ဖြည့်သွင်းသည်။ ထို့နောက်၊ သင်သည် ၎င်းတို့၏ ColorIndex ပိုင်ဆိုင်မှုကို အလိုရှိသော အရောင်အတွက် အညွှန်းနံပါတ်သို့ သတ်မှတ်ခြင်းဖြင့် တက်ကြွသောဆဲလ်၏ အတန်းနှင့်ကော်လံတစ်ခုလုံးကို မီးမောင်းထိုးပြပါမည်။
Private Sub Worksheet_SelectionChange ( ByVal Target As Range) အကယ်၍ Target.Cells.Count > 1 ထို့နောက် Exit Sub Application.ScreenUpdating = False 'ဆဲလ်အားလုံး၏အရောင်ကို ရှင်းပါ Cells.Interior.ColorIndex = 0 With Target' ရွေးချယ်ထားသောဆဲလ်၏ အတန်းနှင့်ကော်လံကို မီးမောင်းထိုးပြပါ။EntireRow.Interior.ColorIndex = 38.EntireColumn.Interior.ColorIndex = 24 End With Application.ScreenUpdating = True End Subကုဒ်ကို စိတ်ကြိုက်ပြင်ဆင်ခြင်း
သင့်လိုအပ်ချက်အတွက် ကုဒ်ကို စိတ်ကြိုက်ပြင်ဆင်လိုပါက၊ ဤအကြံပြုချက်လေးများသည် အဆင်ပြေနိုင်ပါသည်-
- ကျွန်ုပ်တို့၏နမူနာကုဒ်သည် အထက်ဖော်ပြပါ gif တွင်ပြသထားသည့် မတူညီသောအရောင်နှစ်မျိုးကို အသုံးပြုသည် - အတန်းအတွက် အရောင်အညွှန်း 38 နှင့် ကော်လံအတွက် 24 ။ မီးမောင်းထိုးပြသောအရောင်ကိုပြောင်းရန် ၊ သင်ရွေးချယ်သည့် မည်သည့် ColorIndex ကုဒ်များကိုမဆို အစားထိုးလိုက်ပါ။
- အတန်းနှင့်ကော်လံကို ထိုနည်းအတိုင်း အရောင်ခြယ်ရန် တူညီသောပုံစံကို အသုံးပြုပါ။ နှစ်ခုလုံးအတွက် အရောင်အညွှန်းနံပါတ်။
- တက်ကြွသောအတန်း ကိုသာ မီးမောင်းထိုးပြရန်၊ ဤစာကြောင်းကို ဖယ်ရှားပါ သို့မဟုတ် မှတ်ချက်ပေးသည်- .EntireColumn.Interior.ColorIndex = 24
- တက်ကြွသောကော်လံ ကိုသာ မီးမောင်းထိုးပြရန်၊ ဤစာကြောင်းကို ဖယ်ရှားပါ သို့မဟုတ် မှတ်ချက်ပေးသည်- .EntireRow.Interior.ColorIndex = 38
ကုဒ်ထည့်နည်း သင့်အလုပ်စာရွက်သို့
တိကျသောအလုပ်စာရွက်၏နောက်ခံတွင် ကုဒ်ကို တိတ်တဆိတ်လုပ်ဆောင်ရန်၊ ပုံမှန် module တွင်မဟုတ်ဘဲ ထိုအလုပ်စာရွက်ပိုင်ကုဒ်ဝင်းဒိုးတွင် ၎င်းကိုထည့်သွင်းရန်လိုအပ်သည်။ ၎င်းကိုလုပ်ဆောင်ရန်၊ ဤအဆင့်များကိုလုပ်ဆောင်ပါ-
- သင်၏အလုပ်စာအုပ်တွင်၊ VBA တည်းဖြတ်သူထံရောက်ရှိရန် Alt + F11 ကိုနှိပ်ပါ။
- ဘယ်ဘက်ရှိ Project Explorer တွင်၊ သင်သည် ဖွင့်ထားသော workbooks များအားလုံးနှင့် ၎င်းတို့၏ worksheets စာရင်းကို တွေ့ရပါမည်။ မတွေ့ပါက၊ Project Explorer ဝင်းဒိုးကို ကြည့်ရှုရန် Ctrl + R ဖြတ်လမ်းကို အသုံးပြုပါ။
- ပစ်မှတ် အလုပ်စာအုပ်ကို ရှာပါ။ ၎င်း၏ Microsoft Excel တွင်အရာဝတ္ထုများ ဖိုင်တွဲ၊ သင် အသားပေးဖော်ပြလိုသော စာရွက်ပေါ်တွင် နှစ်ချက်နှိပ်ပါ။ ဤဥပမာတွင်၊ ၎င်းသည် Sheet 1 ဖြစ်သည်။
- ညာဘက်ရှိ ကုဒ်ဝင်းဒိုးတွင်၊ အထက်ပါကုဒ်ကို ကူးထည့်ပါ။
- သင့်ဖိုင်ကို Macro-Enabled Workbook အဖြစ် သိမ်းဆည်းပါ (.xlsm)။
အားသာချက်များ - အရာအားလုံးကို backend တွင် လုပ်ဆောင်ပါသည်။ အသုံးပြုသူဘက်မှ ပြုပြင်ပြောင်းလဲမှုများ/စိတ်ကြိုက်ပြင်ဆင်မှုများ မလိုအပ်ပါ။ Excel ဗားရှင်းအားလုံးတွင် အလုပ်လုပ်ပါသည်။
အားနည်းချက်များ - အချို့သောအခြေအနေများတွင် ဤနည်းပညာကို အသုံးမပြုနိုင်စေရန်အတွက် မရှိမဖြစ် အားနည်းချက်နှစ်ခုရှိသည်-
- ကုဒ် နောက်ခံကို ရှင်းပေးသည်။ အလုပ်စာရွက်ရှိ ဆဲလ်အားလုံး၏ အရောင် ။ သင့်တွင် ရောင်စုံဆဲလ်များရှိပါက၊ သင်၏စိတ်ကြိုက်ဖော်မတ်ချခြင်းကို ဆုံးရှုံးသွားသောကြောင့် ဤဖြေရှင်းချက်ကို မသုံးပါနှင့်။
- ဤကုဒ်ကိုလုပ်ဆောင်ခြင်းဖြင့် ပိတ်ဆို့ခြင်း စာရွက်ပေါ်ရှိ နောက်ပြန်လုပ်ဆောင်နိုင်စွမ်း နှင့် Ctrl + Z ကိုနှိပ်ခြင်းဖြင့် မှားယွင်းသောလုပ်ဆောင်ချက်ကို သင်ပြန်ပြင်နိုင်မည်မဟုတ်ပေ။
VBA မပါဘဲ အတန်းနှင့်ကော်လံကို မီးမောင်းထိုးပြပါ
ရွေးချယ်ထားသောအတန်းကို မီးမောင်းထိုးပြရန် အကောင်းဆုံးနှင့် သင်ရနိုင်သည် / သို့မဟုတ် VBA မပါဘဲ ကော်လံသည် Excel ၏ အခြေအနေအရ ဖော်မတ်ချခြင်း ဖြစ်သည်။ ၎င်းကို စနစ်ထည့်သွင်းရန်၊ ဤအဆင့်များကို လုပ်ဆောင်ပါ-
- မီးမောင်းထိုးပြရန် သင့်ဒေတာအတွဲကို ရွေးပါ။
- ပင်မ တက်ဘ်ပေါ်ရှိ ပုံစံများ အုပ်စု၊ စည်းမျဉ်းသစ် ကိုနှိပ်ပါ။
- ဖော်မတ်ချနည်းဥပဒေသစ် ဒိုင်ယာလော့အကွက်တွင်၊ မည်သည့်ဆဲလ်များကို ဆုံးဖြတ်ရန် ဖော်မြူလာကိုသုံးပါ ကိုရွေးချယ်ပါ။ ဖော်မတ် ။
- ဤဖော်မြူလာရှိရာ တန်ဖိုးများ ဖော်မတ်မှန်ပါသည် အကွက်၊ ဤဖော်မြူလာများထဲမှ တစ်ခုကို ထည့်ပါ-
တက်ကြွသော အတန်း ကို မီးမောင်းထိုးပြရန်၊
=CELL("row")=ROW()
တက်ကြွသော ကော်လံ ကို မီးမောင်းထိုးပြရန်၊ :
=CELL("col")=COLUMN()
တက်ကြွသောအတန်းနှင့်ကော်လံ ကိုမီးမောင်းထိုးပြရန်-
=OR(CELL("row")=ROW(), CELL("col")= COLUMN())
ဖော်မြူလာအားလုံးသည် CELL လုပ်ဆောင်ချက်ကိုအသုံးပြုသည် ရွေးချယ်ထားသောဆဲလ်၏ အတန်း/ကော်လံနံပါတ်ကို ပြန်ပေးပါ။
- ဖော်မတ် ခလုတ်ကို နှိပ်ပါ၊ ဖြည့်စွက်ရန် တက်ဘ်သို့ ပြောင်းကာ သင်နှစ်သက်သော အရောင်ကို ရွေးချယ်ပါ။
- ပိတ်ရန် OK ကို နှစ်ကြိမ်နှိပ်ပါ။ ဒိုင်ယာလော့ခ် ဝင်းဒိုးနှစ်ခုလုံး။
သင်ပိုမိုအသေးစိတ် ညွှန်ကြားချက်များ လိုအပ်သည်ဟု ခံစားရပါက၊ ဖော်မြူလာအခြေခံသည့် အခြေအနေပေးပုံစံချခြင်း စည်းမျဉ်းကို ဖန်တီးနည်းကို ကြည့်ပါ။
ဤဥပမာအတွက်၊ ကျွန်ုပ်တို့သည် OR ကို ရွေးချယ်ထားပါသည်။ ကော်လံနှင့် အတန်း နှစ်ခုလုံးကို တစ်ရောင်တည်း အရိပ်ပေးရန် ဖော်မြူလာ။ ၎င်းသည် အလုပ်နည်းပြီး ကိစ္စအများစုအတွက် သင့်လျော်ပါသည်။
ကံမကောင်းစွာဖြင့်၊ ဤဖြေရှင်းချက်သည် စာရွက်ကို ကိုယ်တိုင်ပြန်လည်တွက်ချက်ရန် လိုအပ်သောကြောင့် VBA ကဲ့သို့ ကောင်းမွန်ခြင်းမရှိပါ။> (F9 ခလုတ်ကိုနှိပ်ခြင်းဖြင့်)။ မူရင်းအတိုင်း၊ Excel သည် ဒေတာအသစ်ထည့်ခြင်း သို့မဟုတ် ရှိပြီးသားတစ်ခုကို တည်းဖြတ်ပြီးနောက်မှသာ အလုပ်စာရွက်တစ်ခုကို ပြန်လည်တွက်ချက်ပေးသည်၊ သို့သော် ရွေးချယ်မှုပြောင်းလဲသည့်အခါတွင် မဟုတ်ပါ။ ထို့ကြောင့် သင်သည် အခြားဆဲလ်တစ်ခုကို ရွေးပါ - ဘာမှမဖြစ်ပါ။ F9 ကိုနှိပ်ပါ - စာရွက်ကို ပြန်လည်ဆန်းသစ်ပြီး ဖော်မြူလာကို ပြန်လည်တွက်ချက်ပြီး အသားပေးဖော်ပြမှုကို အပ်ဒိတ်လုပ်ထားပါသည်။
SelectionChange ပွဲဖြစ်သည့်အခါတိုင်း အလိုအလျောက် ပြန်လည်တွက်ချက်ရယူရန်၊ ဖြစ်ပေါ်လာသည်၊ သင်သည် ဤရိုးရှင်းသော VBA ကုဒ်ကို ရှင်းပြထားသည့်အတိုင်း သင်၏ပစ်မှတ်စာရွက်၏ ကုဒ် module တွင် ထားနိုင်သည်။ယခင်ဥပမာ-
Private Sub Worksheet_SelectionChange( ByVal Target As Range) Target. End Sub ကိုတွက်ချက်ပါကုဒ်သည် ရွေးချယ်ထားသော အကွာအဝေး/ဆဲလ်အား ပြန်လည်တွက်ချက်ရန် တွန်းအားပေးသည်၊ ၎င်းသည် CELL လုပ်ဆောင်ချက်ကို အပ်ဒိတ်လုပ်ရန်နှင့် အခြေအနေဆိုင်ရာ ဖော်မတ်ကို ထင်ဟပ်စေပါသည်။ ပြောင်းလဲမှု။
အားသာချက်များ - ယခင်နည်းလမ်းနှင့်မတူဘဲ၊ ဤအရာသည် သင်ကိုယ်တိုင်အသုံးပြုထားသော လက်ရှိဖော်မတ်ကို သက်ရောက်မှုမရှိပါ။
အားနည်းချက်များ - ဖြစ်နိုင်သည်။ Excel ၏ စွမ်းဆောင်ရည်ကို ဆိုးရွားစေသည်။
- အခြေအနေအလိုက် ဖော်မတ်လုပ်ဆောင်ရန်အတွက်၊ ရွေးချယ်မှုပြောင်းလဲမှုတိုင်းတွင် ဖော်မြူလာကို Excel ကို ပြန်လည်တွက်ချက်ရန် (F9 သော့ဖြင့် ကိုယ်တိုင်ဖြစ်စေ သို့မဟုတ် VBA ဖြင့် အလိုအလျောက်ဖြစ်စေ) ကို တွန်းအားပေးရန် လိုအပ်သည်။ အတင်းအကြပ် တွက်ချက်မှုများသည် သင်၏ Excel ကို နှေးကွေးစေနိုင်သည်။ ကျွန်ုပ်တို့၏ကုဒ်သည် စာရွက်တစ်ခုလုံးထက် ရွေးချယ်မှုကို ပြန်လည်တွက်ချက်သောကြောင့်၊ အမှန်တကယ်ကြီးမားပြီး ရှုပ်ထွေးသောအလုပ်စာအုပ်များတွင်သာ အပျက်သဘောဆောင်သည့်အကျိုးသက်ရောက်မှုကို အများအားဖြင့် သိသာနိုင်မည်ဖြစ်သည်။
- CELL လုပ်ဆောင်ချက်ကို Excel 2007 နှင့်အထက်တွင် ရနိုင်သောကြောင့်၊ နည်းလမ်းသည် အသုံးပြုနိုင်မည်မဟုတ်ပေ။ အစောပိုင်းဗားရှင်းများတွင် အလုပ်မလုပ်ပါ။
အခြေအနေအရ ဖော်မတ်ချခြင်းနှင့် VBA ကိုအသုံးပြု၍ ရွေးချယ်ထားသော အတန်းနှင့်ကော်လံကို မီးမောင်းထိုးပြပါ
ယခင်နည်းလမ်းသည် သင့်အလုပ်စာအုပ်ကို သိသိသာသာနှေးကွေးစေပါက၊ အလုပ်အား ကွဲပြားစွာချဉ်းကပ်နိုင်သည် - အသုံးပြုသူရွေ့လျားမှုတိုင်းတွင် အလုပ်စာရွက်တစ်ခုအား ပြန်လည်တွက်ချက်ခြင်း၊ VBA ၏အကူအညီဖြင့် လက်ရှိ အတန်း/ကော်လံနံပါတ်ကို ရယူပြီးနောက် ၎င်းနံပါတ်အား ROW() သို့မဟုတ် COLUMN() လုပ်ဆောင်ချက်တွင် သတ်မှတ်ပုံစံဖော်မတ်ချခြင်းဖော်မြူလာများကို အသုံးပြု၍ လုပ်ဆောင်ခြင်းဖြစ်သည်။
သို့ ဒါကို ပြီးမြောက်အောင်၊ဤသည်မှာ သင်လိုက်နာရမည့် အဆင့်များဖြစ်သည်-
- ဗလာစာရွက်အသစ်တစ်ခုကို သင့်အလုပ်စာအုပ်တွင် ထည့်ပြီး Helper Sheet ဟု အမည်ပေးလိုက်ပါ။ ဤစာရွက်၏ တစ်ခုတည်းသောရည်ရွယ်ချက်မှာ ရွေးချယ်ထားသောဆဲလ်တစ်ခုပါရှိသော အတန်းနှင့်ကော်လံကိုကိုယ်စားပြုသည့် နံပါတ်နှစ်ခုကို သိမ်းဆည်းထားရန်ဖြစ်ပြီး နောက်ပိုင်းတွင် စာရွက်ကို ဘေးကင်းစွာ ဝှက်ထားနိုင်သည်။
- အောက်ပါ VBA ကို အလုပ်စာရွက်၏ကုဒ်ဝင်းဒိုးတွင် ထည့်သွင်းပါ။ မီးမောင်းထိုးပြလိုသောနေရာတွင်။ အသေးစိတ်ညွှန်ကြားချက်များအတွက် ကျွန်ုပ်တို့၏ပထမဥပမာကို ဖတ်ရှုပါ။ Private Sub Worksheet_SelectionChange( ByVal Target As Range) Application.ScreenUpdating = False Worksheets( "Helper Sheet" .Cells(2, 1) = Target.Row Worksheets( "Helper Sheet" .Cells(2, 2) = Target.Column Application.ScreenUpdating = True End Sub
အထက်ကုဒ်သည် လက်ရှိ အတန်းနှင့် ကော်လံ၏ သြဒီနိတ်များကို "Helper Sheet" ဟု အမည်ပေးထားသည့် စာရွက်တွင် နေရာချပေးသည်။ အဆင့် 1 တွင် သင့်စာရွက်ကို ကွဲပြားစွာအမည်ပေးပါက၊ ကုဒ်ရှိ အလုပ်စာရွက်အမည်ကို လိုက်လျောညီထွေပြောင်းပါ။ အတန်းနံပါတ်ကို A2 သို့ ရေးပြီး ကော်လံနံပါတ်ကို B2 သို့ ရေးထားသည်။
- သင်၏ပစ်မှတ်အလုပ်စာရွက်တွင်၊ ဒေတာအတွဲတစ်ခုလုံးကိုရွေးချယ်ပြီး အောက်ပါဖော်မြူလာများဖြင့် သတ်မှတ်ပုံစံချခြင်းစည်းမျဉ်းကို ဖန်တီးပါ။ အဆင့်ဆင့် လမ်းညွှန်ချက်ကို အထက်ပါ ဥပမာတွင် ပေးထားပါသည်။
ယခုအခါ၊ အဓိက အသုံးပြုမှု ကိစ္စသုံးခုကို အသေးစိတ် ခြုံငုံကြည့်ကြပါစို့။
တက်ကြွသော အတန်းကို မီးမောင်းထိုးပြနည်း
ယခုအချိန်တွင် သင့် cursor ချထားသည့် အတန်းကို မီးမောင်းထိုးပြရန်၊ ဤအရာဖြင့် အခြေအနေဆိုင်ရာ ဖော်မတ်သတ်မှတ်ခြင်း စည်းမျဉ်းကို သတ်မှတ်ပါဖော်မြူလာ-
=ROW()='Helper Sheet'!$A$2
ရလဒ်အနေဖြင့်၊ အသုံးပြုသူသည် လက်ရှိရွေးချယ်ထားသည့်အတန်းကို ရှင်းရှင်းလင်းလင်းမြင်နိုင်သည်-
တက်ကြွသောကော်လံကို မီးမောင်းထိုးပြနည်း
ရွေးချယ်ထားသောကော်လံကို မီးမောင်းထိုးပြရန်၊ ဤဖော်မြူလာကို အသုံးပြု၍ ကော်လံနံပါတ်ကို ကော်လံနံပါတ်ကို ဖိသွင်းပါ-
=COLUMN()='Helper Sheet'!$B$2
ယခု၊ မီးမောင်းထိုးပြထားသော ကော်လံတစ်ခုသည် ၎င်းအပေါ် လုံးလုံးလျားလျားအာရုံစိုက်ထားသည့် ဒေါင်လိုက်ဒေတာကို သက်တောင့်သက်သာနှင့် အားစိုက်ထုတ်ဖတ်နိုင်စေပါသည်။
တက်ကြွသောအတန်းနှင့် ကော်လံကို မီးမောင်းထိုးပြနည်း
ရွေးချယ်ထားသော အတန်းနှင့် ကော်လံ နှစ်ခုလုံးကို တစ်ရောင်တည်း အလိုအလျောက် အရိပ်ရစေရန်၊ ROW() နှင့် COLUMN() လုပ်ဆောင်ချက်များကို ဖော်မြူလာတစ်ခုအဖြစ် ပေါင်းစပ်ပါ-
=OR(ROW()='Helper Sheet'!$A$2, COLUMN()='Helper Sheet'!$B$2)
သက်ဆိုင်ရာဒေတာကို ချက်ချင်းအာရုံစူးစိုက်ထားသောကြောင့် ၎င်းကို လွဲမှားစွာဖတ်ရှုခြင်းမှ ရှောင်ရှားနိုင်မည်ဖြစ်သည်။
အားသာချက်များ - အကောင်းဆုံးလုပ်ဆောင်နိုင်မှု; Excel ဗားရှင်းအားလုံးတွင် အလုပ်လုပ်သည်
အားနည်းချက်များ - အရှည်ဆုံးတပ်ဆင်မှု
၎င်းသည် Excel ရှိ ရွေးချယ်ထားသောဆဲလ်တစ်ခု၏ ကော်လံနှင့်အတန်းကို မီးမောင်းထိုးပြသည့်ပုံဖြစ်သည်။ ကျွန်ုပ်တို့၏ဘလော့ဂ်တွင် ဖတ်ရှုပြီး နောက်အပတ်တွင် ဆုံတွေ့ရန် စောင့်မျှော်ပေးသည့်အတွက် ကျေးဇူးတင်ပါသည်။
ဒေါင်းလုဒ်အတွက် လေ့ကျင့်ခန်းစာအုပ်
တက်ကြွသောအတန်းနှင့် ကော်လံကို မီးမောင်းထိုးပြခြင်း (.xlsm ဖိုင်)