ဤဆောင်းပါးတွင်၊ သင့် Word document ရှိ အပိုင်းခွဲအမျိုးအစားကို ပြောင်းလဲရန် အမြန်နည်းလမ်း 2 ခုရှိပါမည်။
Word မှာ အသုံးအများဆုံး အပိုင်းခွဲခြင်း အမျိုးအစားတွေကတော့ “Next Page” နဲ့ “Continuous” တို့ပဲ ဖြစ်ပါတယ်။ ပထမတစ်ခုကို ထည့်သွင်းဖို့ဆိုတာ အပိုင်းအသစ်အတွက် စာမျက်နှာအသစ်တစ်ခု စတင်ခြင်းပဲ ဖြစ်ပါတယ်။ ဒါက အပိုင်းတွေကို ရှင်းရှင်းလင်းလင်း ပိုင်းခြားပေးပါတယ်။ ဒါပေမယ့် ပရင့်ထုတ်တဲ့အခါမှာတော့ စာရွက်တွေကို ထုတ်ယူဖို့ လိုအပ်ပါလိမ့်မယ်။ သေချာတာကတော့ ဒါဟာ ပတ်ဝန်းကျင်နဲ့ သဟဇာတဖြစ်တဲ့ နည်းလမ်းတစ်ခု မဟုတ်ပါဘူး။ ဒါဆိုရင် “Continuous” အပိုင်းခွဲခြင်းကို အသုံးပြုဖို့ စဉ်းစားနိုင်ပါတယ်။ ဒါက စာရွက်အများကြီးကို သက်သာစေနိုင်ပေမယ့် ခွဲထုတ်မှု လိုအပ်ချက်ကို ဖြည့်ဆည်းပေးနိုင်မှာ မဟုတ်ပါဘူး။
ထို့ကြောင့် သတ်မှတ်ထားသော လိုအပ်ချက်အလိုက် ရွေးချယ်နိုင်သော နည်းလမ်းများကို မိတ်ဆက်ပေးလိုပါသည်။
နည်းလမ်း 1- စာမျက်နှာတည်ဆောက်မှုအား ပြောင်းလဲပါ။
- ပထမဦးစွာ cursor ကို target section ထဲမှာထားပြီး Ribbon မှာရှိတဲ့ “Page Layout” tab ကိုနှိပ်ပါ။
- တူညီသောအမည် dialog box ကိုဖွင့်ရန် "Page Setup" အုပ်စုရှိ မြှားခလုတ်ကို နှိပ်ပါ။
- ထို့နောက် အကွက်အတွင်းရှိ "Layout" tab ကိုနှိပ်ပါ။
- ထို့နောက် “Section start” ၏ combo box မှ လိုချင်သော section break အမျိုးအစားကို ရွေးချယ်ပါ။
- နောက်တစ်ခု "အသုံးချရန်" ပေါင်းစပ်အကွက်တွင်၊ အသုံးချသည့်အပိုင်းကို ရွေးပါ။ အပိုင်းခွဲတစ်ခု (သို့) အပိုင်းများစွာကိုလည်း ပြောင်းလဲရန် သင်ရွေးချယ်နိုင်သည်။
ဤသည်မှာ ရလဒ်ဖြစ်သည်။
နည်းလမ်း 2- စာရွက်စာတမ်းတစ်ခုရှိ အပိုင်းခွဲအားလုံး၏ အမျိုးအစားကိုပြောင်းလဲရန် Word Macro ကိုဖွင့်ပါ။
- အစပိုင်းမှာ Word မှာ VBA editor ကိုဖွင့်ဖို့ “Alt+ F11” ကိုနှိပ်ပါ။
- ထို့နောက် “Normal” ပရောဂျက်ကို နှိပ်ပြီး မီနူးဘားရှိ “ထည့်သွင်းရန်” တက်ဘ်ကို နှိပ်ပါ။
- ထို့နောက် drop-down menu တွင် "Module" ကိုရွေးချယ်ပါ။
- ထို့နောက် ၎င်းကိုဖွင့်ရန် မော်ဂျူးအသစ်ကို နှစ်ချက်နှိပ်ပါ။
- ယခု တည်းဖြတ်သည့်နေရာ၌ ဤကုဒ်များကို ကူးထည့်လိုက်ပါ-
Sub ChangeNextPageBreakToContinuous()
Dim nSectionNum As Integer
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
nSectionNum = objDoc.Sections.Count
For nSectionNum = nSectionNum To 1 Step -1
With objDoc.Sections(nSectionNum).Range.PageSetup
If .SectionStart = wdSectionNewPage Then
.SectionStart = wdSectionContinuous
End If
End With
Next nSectionNum
Application.ScreenUpdating = True
End Sub
- Macro ကို run ရန် "F5" ကိုနှိပ်ပါ။
ဤ macro သည် "Next Page" အမျိုးအစားရှိ အပိုင်းခွဲအားလုံးကို "Continuous" သို့ ပြောင်းပေးမည်ဖြစ်သည်။ ရလဒ်ကတော့ method 1 နဲ့အတူတူပါပဲ။
ယခု သင် စဉ်ဆက်မပြတ် အပိုင်းခွဲခြင်းအားလုံးကို "Next Page" အမျိုးအစားသို့ ပြောင်းလဲရန် လိုအပ်ပါက၊ အောက်ပါ မက်ခရိုကို အသုံးပြုပါ။
Sub ChangeContinuousBreakToNextPageBreak()
Dim nSectionNum As Integer
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
nSectionNum = objDoc.Sections.Count
For nSectionNum = nSectionNum To 1 Step -1
With objDoc.Sections(nSectionNum).Range.PageSetup
If .SectionStart = wdSectionContinuous Then
.SectionStart = wdSectionNewPage
End If
End With
Next nSectionNum
Application.ScreenUpdating = True
End Sub
စာရွက်စာတမ်းများကို ပြုပြင်ရန် ကိရိယာ
Word ပြသနာတွေ ကြုံပြီး အဆုံးသတ်ဖို့ မဖြစ်နိုင်ပါဘူး။ ပျက်စီးနေသော docx. ထို့ကြောင့် ချက်ချင်းအရေးယူဆောင်ရွက်ရမည်။ သင့်ဒေတာကို ပြန်လည်ရယူရန် အမြန်ဆုံးနည်းလမ်းမှာ အရည်အချင်းပြည့်မီသော ပြုပြင်ရေးကိရိယာကို ရွေးချယ်ခြင်းဖြစ်သည်။
စာရေးသူနိဒါန်း:
Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ xls ပြုပြင်ပါ။ နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com



