Vba ကို အသုံးပြု၍ ဖောင့်ကို ခပ်ထူထူပြုလုပ်နည်း (ဥပမာနှင့်အတူ)


Excel ရှိ သီးခြားဆဲလ်များတွင် ရဲရင့်သောဖောင့်တစ်ခုဖန်တီးရန် VBA ရှိ Font.Bold ပိုင်ဆိုင်မှုကို သင်အသုံးပြုနိုင်သည်။

ဥပမာအားဖြင့်၊ စာရွက်ပေါ်တွင် ဆဲလ် A1 တွင် ဖောင့်ကို ရဲရင့်စေရန် အောက်ပါ macro ကို ဖန်တီးနိုင်သည်။

 SubMakeFontBold ()
Range(" A1 ").Font.Bold = True
End Sub

A1:C1 အကွာအဝေးရှိ ဆဲလ်တစ်ခုစီ၏ ဖောင့်ကို ရဲရင့်စေရန် အောက်ပါ macro ကို ဖန်တီးနိုင်သည်။

 SubMakeFontBold ()
Range(" A1:C1 ").Font.Bold = True
End Sub

အောက်ပါဥပမာသည် VBA ကိုအသုံးပြု၍ ရဲရင့်သောဖောင့်ကို လက်တွေ့ကျင့်သုံးပုံကို ပြသထားသည်။

ဥပမာ- VBA သုံးပြီး ဖောင့်ကို ရဲရင့်အောင်လုပ်ပါ။

ကျွန်ုပ်တို့တွင် မတူညီသောအသင်းများမှ ဘတ်စကက်ဘောကစားသမားများအကြောင်း အချက်အလက်ပါရှိသော Excel တွင် အောက်ပါဒေတာအစုံရှိသည်ဆိုပါစို့။

ဆဲလ် A1 တွင် ဖောင့်ကိုသာ ရဲရင့်စေရန် အောက်ပါ မက်ခရိုကို ဖန်တီးနိုင်သည်။

 SubMakeFontBold ()
Range(" A1 ").Font.Bold = True
End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

ဆဲလ် A1 ၏ ဖောင့်ကို အခြားဆဲလ်များအားလုံး မပြောင်းလဲဘဲ စာလုံးကြီးအဖြစ် ပြောင်းလဲထားသည်ကို သတိပြုပါ။

အကွာအဝေး A1:C1 အတွင်းရှိ ဆဲလ်တစ်ခုစီကို ကျွန်ုပ်တို့ ရဲတင်းလိုပါက၊ အောက်ပါ မက်ခရိုကို ဖန်တီးနိုင်သည်-

 SubMakeFontBold ()
Range(" A1:C1 ").Font.Bold = True
End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

A1:C1 အကွာအဝေးရှိ ဆဲလ်တစ်ခုစီရှိ ဖောင့်သည် ယခုအခါ ရဲရင့်ကြောင်း သတိပြုပါ။

မှတ်ချက် – VBA Font.Bold ပိုင်ဆိုင်မှုအတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာနိုင်သည်။

ထပ်လောင်းအရင်းအမြစ်များ

အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-

VBA- ဖောင့်အရောင်ပြောင်းနည်း
VBA- စာကြောင်းတစ်ခုရှိ ဇာတ်ကောင်များကို အစားထိုးနည်း
VBA- ဖော်မတ်ချခြင်းဖြင့် လိုင်းတစ်ခုကို ထည့်သွင်းနည်း

မှတ်ချက်တစ်ခုထည့်ပါ။

သင့် email လိပ်စာကို ဖော်ပြမည် မဟုတ်ပါ။ လိုအပ်သော ကွက်လပ်များကို * ဖြင့်မှတ်သားထားသည်