Vba ကို အသုံးပြု၍ strings များကို စာလုံးအကြီးသို့ ဘယ်လိုပြောင်းမလဲ။

strings များကို စာလုံးအကြီးအဖြစ်ပြောင်းရန် VBA ရှိ UCase လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်သည်။

သင်သည် စာကြောင်းများပါရှိသော ဆဲလ်အကွာအဝေးကို စာလုံးကြီးအဖြစ်သို့ ပြောင်းရန် အောက်ပါ syntax ကို အသုံးပြုနိုင်သည်။

 Sub ConvertToUpperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = UCase(Range(" A " & i))
    Next i
    
End Sub

ဤဥပမာသည် A2:A10 အကွာအဝေးရှိ စာကြောင်းတစ်ခုစီကို စာလုံးအကြီးအဖြစ်သို့ ပြောင်းလဲမည်ဖြစ်ပြီး အပိုင်းအခြား B2:B10 တွင် ရလဒ်များကို ပြသမည်ဖြစ်သည်။

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

ဥပမာ- VBA ကို အသုံးပြု၍ Strings များကို အကြီးအဖြစ်သို့ ပြောင်းပါ။

ကျွန်ုပ်တို့တွင် Excel တွင် အောက်ပါ စာကြောင်းများ ရှိသည် ဆိုပါစို့။

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

ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။

 Sub ConvertToUpperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range(" B " & i) = UCase(Range(" A " & i))
    Next i
    
End Sub

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

ကော်လံ B သည် ကော်လံ A ရှိ စာကြောင်းတစ်ခုစီကို စာလုံးကြီးဖြင့် ပြသည်။

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

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

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

VBA တွင် စာကြောင်းများကို နှိုင်းယှဉ်နည်း
VBA ရှိ စာကြောင်းတစ်ခုမှ space များကိုမည်သို့ဖယ်ရှားနည်း
VBA တွင် string တစ်ခုရှိ စာလုံးများကို အစားထိုးနည်း