Vba ကို အသုံးပြု၍ စာသားကို ထုပ်နည်း (ဥပမာဖြင့်)

Excel အလုပ်စာရွက်ရှိ သီးခြားဆဲလ်များတွင် စာသားများကို ထုပ်ရန် VBA ရှိ WrapText ပိုင်ဆိုင်မှုကို သင်သုံးနိုင်သည်။

ဤပိုင်ဆိုင်မှုကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းသုံးမျိုးရှိသည်။

နည်းလမ်း 1- သီးခြားဆဲလ်တစ်ခု၏ စာသားကို ခြုံပါ။

 Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub

နည်းလမ်း 2- သတ်မှတ်ထားသော အကွာအဝေးတွင် ဆဲလ်စာသားကို ခြုံပါ။

 SubUseWrapText ()
Range(" B2:B11 ").WrapText = True
End Sub

နည်းလမ်း 3- အလုပ်စာရွက်တွင် ဆဲလ်အားလုံး၏ စာသားကို ခြုံပါ။

 Sub UseWrapText()
Cells.WrapText = True
End Sub

အောက်ဖော်ပြပါ ဥပမာများသည် Excel တွင် အောက်ပါဒေတာအစုံဖြင့် နည်းလမ်းတစ်ခုစီကို လက်တွေ့အသုံးပြုနည်းကို ပြသသည်-

သွားကြရအောင်!

ဥပမာ 1- VBA ကို အသုံးပြု၍ သီးခြားဆဲလ်တစ်ခု၏ စာသားကို ခြုံပါ။

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

 Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါ၊ ဆဲလ် B2 ကိုနှိပ်ပြီး Wrap Text ကို အပေါ်ဘက် ribbon တစ်လျှောက်ရှိ Home တက်ဘ်ရှိ Alignment အုပ်စုတွင် ဖွင့်ထားသည်ကို တွေ့နိုင်ပါသည်။

သို့သော်၊ ကျွန်ုပ်တို့သည် ကော်လံ B ၏ အရှည်ကို အတိုချုံ့ပြီး ထုပ်ထားသော စာသားကို အမှန်တကယ် မြင်နိုင်ရန် အတန်း 2 ၏ အမြင့်ကို တိုးရန် လိုအပ်သည်-

ကော်လံ B အတွင်းရှိ အခြားဆဲလ်အားလုံးရှိ စာသားများကို ထုပ်ပိုးမထားသော်လည်း ဆဲလ် B2 မှ စာသားကို လွယ်လွယ်ကူကူ မြင်နိုင်ပါပြီ။

ဥပမာ 2- VBA ကို အသုံးပြု၍ သီးခြားအကွာအဝေးတစ်ခုတွင် ဆဲလ်စာသားကို ခြုံပါ။

B2:B11 အကွာအဝေးရှိ ဆဲလ်တစ်ခုစီရှိ စာသားကို ခြုံရန် အောက်ပါ မက်ခရိုကို ဖန်တီးနိုင်သည်။

 Sub UseWrapText()
Range(" B2:B11 ").WrapText = True
End Sub

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

အပိုင်းအခြား B2:B11 အတွင်းရှိ ဆဲလ်တစ်ခုစီတွင် ယခု ထုပ်ပိုးထားသော စာသားပါရှိသည်ကို ကျွန်ုပ်တို့ တွေ့နိုင်ပါသည်။

ဥပမာ 3- VBA ကို အသုံးပြု၍ အလုပ်စာရွက်တွင် ဆဲလ်အားလုံး၏ စာသားကို ခြုံပါ။

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

 Sub UseWrapText()
Cells.WrapText = True
End Sub

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

ယခု အလုပ်စာရွက်ရှိ ဆဲလ်တိုင်းတွင် ထုပ်ပိုးထားသော စာသားပါရှိသည်ကို ကျွန်ုပ်တို့ တွေ့နိုင်ပါသည်။

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

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

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

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