ဤဆောင်းပါးတွင်၊ သင်၏ Word Document တွင် VBA ကုဒ်များမှတစ်ဆင့် အနာဂတ် သို့မဟုတ် အတိတ်ရက်စွဲတစ်ခုကို ထည့်သွင်းရန် စိတ်ဝင်စားဖွယ်လှည့်ကွက်တစ်ခုကို ပြသပါမည်။
ယေဘူယျအားဖြင့်၊ ကျွန်ုပ်တို့၏ Word document တွင် လက်ရှိရက်စွဲကို ထည့်သွင်းရန် အခက်အခဲမရှိပါ။ သို့တိုင်၊ ယခုနှင့်ထိုအခါတွင် ကျွန်ုပ်တို့သည် နောက်အပတ် သို့မဟုတ် လ သို့မဟုတ် နောက်ပိုင်းတွင် လိုအပ်သောစာရွက်စာတမ်းအတွက် ပြင်ဆင်နေနိုင်သည်။ အဲဒီအခါမှာ သင်မကျော်ဖြတ်နိုင်တဲ့ ပြဿနာပါ။ Word ဖိုင်တွင် အနာဂတ်ရက်စွဲကို မည်သို့ထည့်သွင်းနိုင်မည်နည်း။ တခါတရံမှာ အတိတ်က ဘယ်လိုလဲ။
ထို့ကြောင့် သင့်အလုပ်တာဝန်များကို ပိုမိုကောင်းမွန်စွာ ဖြည့်ဆည်းရန် ဤအသုံးဝင်သောနည်းလမ်းကို သင် ဆုပ်ကိုင်ထားသင့်သည်ဟု ကျွန်ုပ်တို့ယူဆပါသည်။
အနာဂတ်ကို ထည့်သွင်းရန် သို့မဟုတ် ရက်စွဲကို ကူးထည့်ရန် VBA ကုဒ်များကို အသုံးပြုပါ။
- စတင်ရန်၊ သင်၏ Word document ကိုဖွင့်ပါ။
- ထို့နောက် "Developer" tab ကိုနှိပ်ပါ။
- VBA တည်းဖြတ်သူကိုဖွင့်ရန် "Visual Basic" ကိုနှိပ်ပါ။ သင့် Word Ribbon တွင် "Developer" တက်ဘ်ကို မရရှိနိုင်ပါက၊ တည်းဖြတ်သူကိုဖွင့်ရန် "Alt+ F11" ကိုနှိပ်နိုင်သည်။
- ယခု တည်းဖြတ်သူတွင် ဘယ်ဘက်ခြမ်းရှိ "Normal" ကိုနှိပ်ပါ။
- ထို့နောက် toolbar ပေါ်ရှိ "Insert" ကိုနှိပ်ပါ။
- ထို့နောက်စာရင်း-မီနူးမှ "Module" ကိုရွေးချယ်ပါ။
- ယခု အသစ်ထည့်သွင်းထားသော module ကို နှစ်ချက်နှိပ်ပြီး တည်းဖြတ်သည့်နေရာကို ညာဘက်ခြမ်းတွင် ရနိုင်မည်ဖြစ်သည်။
- အောက်ပါ ကုဒ်များကို ထိုနေရာတွင် ကူးထည့်လိုက်ပါ ။
Sub InsertFutureOrPastDate()
Dim strNumberOfDays As String
' Input the number of days you want to insert from today to the future or past date.
strNumberOfDays = InputBox("Please input the number of days you want to insert", "future or past date", "Input here.For exemple,input 1 to insert the date of tomorrow")
' Insert the future or past date according to the inputed number of days
If strNumberOfDays <> "" Then
Selection.TypeText Text:=Format(Date + strNumberOfDays, "dddd, MMMM dd, yyyy")
End If
End Sub
- ထို့နောက် "Save" ခလုတ်ကိုနှိပ်ပြီး VBA တည်းဖြတ်သူကိုပိတ်ပါ။
- ယခု Word စာရွက်စာတမ်းစခရင်သို့ ပြန်ပြောင်းပြီး အနာဂတ် သို့မဟုတ် အတိတ်ရက်စွဲသွားသည့်နေရာတွင် သင့်ကာဆာကို ထားလိုက်ပါ။
- ထို့နောက် “Developer” tab ကို ထပ်မံနှိပ်ပါ။
- ပြီးလျှင် "Macros" ဝင်းဒိုးကိုဖွင့်ရန် "ကုဒ်" အုပ်စုရှိ "Macros" ကိုနှိပ်ပါ။ တစ်ဖန် “Developer” တက်ဘ်ကို မပြသပါက၊ သင်သည် “Alt+ F8” ကို နှိပ်ရန် လိုအပ်သည်။
- ယခု “Macros” ဝင်းဒိုးတွင်၊ “InsertFutureOrPastDate” မက်ခရိုကို ရှာပြီး ရွေးချယ်ပါ။
- ထို့နောက် "Run" ကိုနှိပ်ပါ။
- ပြီးရင် မက်ဆေ့ဘောက်စ်ကနေ နှုတ်ဆက်ပါလိမ့်မယ်။ အနာဂတ်ရက်စွဲသို့ ကျန်နေရစ်သည့်နေ့ရက်များကို ကိုယ်စားပြုရန်အတွက် အကွက်အောက်ခြေရှိ စာသားအကွက်တွင် နံပါတ်တစ်ခုကို သင်ထည့်နိုင်သည်။ ဥပမာအားဖြင့်၊ မနက်ဖြန်၏ရက်စွဲကို ထည့်သွင်းလိုပါက၊ ထိုနေရာတွင် “1” ကို ထည့်သွင်းသင့်သည်။ အလားတူပင်၊ သင်သည် အတိတ်ရက်စွဲတစ်ခု လိုအပ်ပါက မနေ့ကအတွက် “-1” ကဲ့သို့သော တန်ဖိုးရှေ့တွင် အနုတ်လက္ခဏာကို ပေါင်းထည့်လိုက်ပါ။
- “OK” ကိုနှိပ်ရန်မမေ့ပါနှင့်။
မှတ်ချက်- “Selection.TypeText Text:=Format(Date + strNumberOfDays, “dddd, MMMM dd, yyyy”)” တွင် “dddd, MMMM dd, yyyy” သည် “M” သည် “လ” ဟူသော ရက်စွဲပုံစံကို ကိုယ်စားပြုသည်။ "ရက်", "y" အတွက် "နှစ်" နှင့် "ရက်သတ္တပတ်" အတွက် "ddd" အတွက် "d"၊ ထို့ကြောင့် သင်သည် ၎င်းကို စိတ်ကြိုက်ပြောင်းလဲနိုင်သည်။
သင်၏တန်ဖိုးရှိသောဖိုင်များကို ပြန်လည်ရယူပါ။
Word သည် ကျွန်ုပ်တို့၏ Word ဖိုင်များကို အန္တရာယ်ကျရောက်စေသည့် ပြိုကျနိုင်ချေရှိသည်။ ယခုဆိုလျှင်၊ ကျွန်ုပ်တို့၏ အဖိုးမဖြတ်နိုင်သော အချက်အလက်အချို့ ပျောက်ကွယ်သွားပါပြီ။ ဒါပေမယ့် ပျောက်တာက လုံးဝ မပျောက်ပါဘူး။ သင်၏ အရေးကြီးသောဖိုင်များ ဆုံးရှုံးခြင်းအတွက် ငိုကြွေးမြည်တမ်းနိုင်သည် သို့မဟုတ် တတ်ကျွမ်းသူအား သင်ရွေးချယ်နိုင်သည်။ ပျက်စီးနေသော Word ပြန်လည်ရယူရေးကိရိယာ သူတို့ကိုပြန်လည်ရယူရန်။
စာရေးသူနိဒါန်း:
Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ Excel xls ဖိုင်ပြဿနာပြုပြင်ခြင်း။ နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com