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


ပေးထားသောစာကြောင်း၏အချိန်တန်ဖိုးကိုပြန်ပေးရန် VBA ရှိ TimeValue လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်သည်။

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

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

ဤအထူးမက်ခရိုသည် A2:A7 အကွာအဝေးရှိ ရက်စွဲများနှင့် အချိန်တန်ဖိုးကို ထုတ်ယူပြီး သက်ဆိုင်သည့်အကွာအဝေး B2:B7 တွင် ထိုအချိန်တန်ဖိုးကို ပြန်ပေးပါမည်။

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

ဥပမာ- VBA တွင် TimeValue လုပ်ဆောင်ချက်ကို အသုံးပြုနည်း

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

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

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

 Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range(" B " & i) = TimeValue(Range(" A " & i))
Next i
    
End Sub

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

ကော်လံ B သည် ကော်လံ A ရှိ ရက်စွဲ/အချိန်တစ်ခုစီအတွက် အချိန်တန်ဖိုးကို ပြသသည်။

ဥပမာအားဖြင့်:

  • TimeValue လုပ်ဆောင်ချက်သည် 10:15:34 တွင် 01/01/2023 10:15:34 တွင် ပြန်တက်လာသည်
  • TimeValue လုပ်ဆောင်ချက်သည် 12:34:18 PM မှ 03/01/2023 12:34:18 PM သို့ ပြန်လည်ရောက်ရှိသည်
  • TimeValue လုပ်ဆောင်ချက်သည် 01/05/2023 မှ 8:23:00 တွင် ပြန်တက်လာသည်

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

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

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

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

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

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

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