Vba တွင် floor function ကိုအသုံးပြုနည်း (ဥပမာများနှင့်အတူ)

ဆဲလ်တစ်ခုရှိ နံပါတ်များကို အနီးဆုံး သိသာထင်ရှားသော မျိုးစုံသို့ ပတ်ရန် VBA တွင် Floor method ကို သင်သုံးနိုင်သည်။

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

 SubToFloor ()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i

End Sub

ဤထူးခြားသော မက်ခရိုသည် အပိုင်းအခြား A2:A10 အတွင်းရှိ တန်ဖိုးတစ်ခုစီကို အပိုင်းအခြား B2:B10 တွင် သတ်မှတ်ထားသော အနီးဆုံး သိသာထင်ရှားသော မျိုးစုံသို့ ပတ်ပြီး အပိုင်းအခြား C2:C10 တွင် ရလဒ်များကို ပြသပါမည်။

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

ဥပမာ- VBA မှာ Floor function ကို ဘယ်လိုသုံးမလဲ။

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

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

 SubToFloor ()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.Floor(Range("A" & i), Range("B" & i))
Next i

End Sub

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

ကော်လံ C သည် ကော်လံ A ရှိ တန်ဖိုးတစ်ခုစီတွင် Floor method ကို အသုံးပြုခြင်း၏ ရလဒ်ကို ပြသသည်။

ဥပမာအားဖြင့်၊ ကျွန်ုပ်တို့ မြင်နိုင်သည်-

• 12.2452 ကို 0.001 ၏ အနီးဆုံး တိုးကိန်းသို့ ဆင်းကာ 12.245 ဖြစ်သည်။
• 14.927 သည် 0.01 ၏ အနီးဆုံးတိုးကိန်းသို့ ဆင်းကာ 14.92 ဖြစ်သည်။
• -5.23 သည် 0.1 ၏ အနီးဆုံး ဆတိုးကိန်းသို့ ဆင်းကာ -5.3 ဖြစ်သည်။

နောက် … ပြီးတော့။

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

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

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

VBA မှာ တန်ဖိုးတွေကို ဘယ်လိုဝိုင်းမလဲ။
VBA မှာ တန်ဖိုးတွေကို ဘယ်လိုဝိုင်းမလဲ။
VBA တွင် တန်ဖိုးများကို ဒဿမ 2 နေရာသို့ လှည့်နည်း