သင့် Word Document မှ တစ်ဦးချင်း စာမျက်နှာများကို ထုတ်ယူရန် အမြန်နည်းလမ်း 2 ခု

ဒီနေ့ပို့စ်မှာ သင့်ရဲ့ Word စာရွက်စာတမ်းကနေ စာမျက်နှာတစ်ခုချင်းစီကို ထုတ်ယူနိုင်တဲ့ မြန်ဆန်တဲ့နည်းလမ်း ၂ ခုကို မျှဝေပေးချင်ပါတယ်။

တစ်ခါတစ်ရံတွင် Word စာရွက်စာတမ်းတစ်ခုစီတွင် စာမျက်နှာတစ်ခုစီတွင် ဇယားတစ်ခုကဲ့သို့သော လွတ်လပ်သောအကြောင်းအရာများ ပါဝင်နိုင်သည်။ ပြီးတော့ သင်ဟာ မတူညီတဲ့ စားပွဲတွေကို မတူညီတဲ့လူဆီ ပို့ပေးဖို့ လိုအပ်ပါလိမ့်မယ်။ ထို့နောက် စာမျက်နှာတစ်ခုစီရှိ ဇယားတစ်ခုစီကို သီးခြားဖိုင်အဖြစ် သိမ်းဆည်းရမည်ဖြစ်ပါသည်။

ကျွန်ုပ်တို့၏စိတ်တွင် ပထမဆုံးပေါ်လာသောစိတ်ကူးသည် ဂန္ထဝင်ကော်ပီကူးထည့်သင့်သည်။ သို့သော်၊ ရွေးချယ်ခြင်းနှင့်ပတ်သက်သည့် မည်သည့်အရာမဆို တစ်ခါတစ်ရံ စိတ်အနှောက်အယှက်ဖြစ်စေနိုင်သည်၊ အကြောင်းမှာ ဆွဲယူခြင်းနှင့် ရွေးချယ်ခြင်းမှာ ရွေးချယ်မှုလုံးဝမရှိဘဲ လွယ်ကူစွာ အဆုံးသတ်နိုင်သည်။ ဤအကြောင်းကြောင့်၊ အလုပ်ကိုလုပ်ဆောင်ရန် macro ကို အသုံးပြု၍ အမြန်နည်းလမ်း ၂ ခုကို သင့်အား အကြံပြုအပ်ပါသည်။

နည်းလမ်း 1- လက်ရှိစာမျက်နှာကို ထုတ်ယူပြီး စာရွက်စာတမ်းအသစ်အဖြစ် သိမ်းဆည်းပါ။

1. ပထမဦးစွာနှင့် အဓိကအားဖြင့် သင်ထုတ်ယူလိုသော စာမျက်နှာပေါ်တွင် သင့် cursor ကို ထားပါ။
2. "Developer" tab ကိုနှိပ်ပြီး "Visual Basic" ကိုနှိပ်ပြီး VBA တည်းဖြတ်သူကိုခေါ်ပါ။ “Developer” ကို အသက်မသွင်းပါက၊ ၎င်းအစား “Alt+ F11” ကို နှိပ်ပါ။
3. ဒုတိယအနေဖြင့်၊ ၎င်းကိုနှိပ်ခြင်းဖြင့် "Normal" ပရောဂျက်သို့သွားပါ။
4. ထို့နောက် "Insert" tab ကိုနှိပ်ပြီး "Module" ကိုရွေးချယ်ပါ။
5. တည်းဖြတ်ဧရိယာကိုဖွင့်ရန် module အသစ်ပေါ်တွင်နှစ်ချက်နှိပ်ပါ။
6. ထို့နောက် အောက်ပါကုဒ်များကို ထိုနေရာတွင် ကူးထည့်ပါ။

Sub SaveCurrentPageAsANewDoc()
  Dim objNewDoc As Document
  Dim objDoc As Document
  Dim strFileName As String
  Dim strFolder As String
 
  '  Initialization
  Set objDoc = ActiveDocument
 
  strFolder = InputBox("Enter folder path here: ")
  strFileName = InputBox("Enter file name here: ")
 
  '  Copy current page.
  objDoc.Bookmarks("\Page").Range.Select
  Selection.Copy
 
  '  Open a new document to paste the selection.
  Set objNewDoc = Documents.Add
  Selection.Paste
 
  objNewDoc.SaveAs FileName:=strFolder & "\" & strFileName & ".docx"
  objNewDoc.Close
End Sub

7. နောက်ဆုံးအနေနဲ့ "Run" ခလုတ်ကိုနှိပ်ပါ။

ယခုတွင် input box 2 ခုရှိလိမ့်မည်။ စာရွက်စာတမ်းအသစ်ကို ပထမဆုံးထည့်သွင်းသည့်အကွက်တွင် သင်သိမ်းဆည်းလိုသည့်လမ်းကြောင်းကို ထည့်သွင်းပါ။ ဒုတိယတစ်ခုတွင် စာရွက်စာတမ်းအမည်အသစ်ကို ထည့်သွင်းပါ။

နည်းလမ်း 2- စာမျက်နှာတစ်ခုစီကို ထုတ်ယူပြီး စာရွက်စာတမ်းအသစ်အဖြစ် သိမ်းဆည်းပါ။

အောက်ပါ မက်ခရိုသည် သင့်အား စာရွက်စာတမ်းတစ်ခုစီ၏ စာမျက်နှာတစ်ခုစီကို ထုတ်ယူနိုင်စေမည်ဖြစ်သည်။

1. ပထမဦးစွာ၊ သင်၏စာရွက်စာတမ်း၏အစသို့သွားရန် "Ctrl+ Home" ကိုနှိပ်ပါ။
2. ထို့နောက် macro ကိုထည့်သွင်းပြီး run ရန် method 1 တွင် အလားတူအဆင့်များကို လိုက်နာပါ။
3. ဤတစ်ကြိမ်တွင် မက်ခရိုကို ဤအရာဖြင့် အစားထိုးပါ။

Sub SaveEachPageAsADoc()
  Dim objNewDoc As Document
  Dim objDoc As Document
  Dim nPageNumber As Integer
  Dim strFolder As String
  Dim objFileName As Range
 
  '  Initialization
  Set objDoc = ActiveDocument
 
  strFolder = InputBox("Enter folder path here: ")
 
  '  Copy each page in the document to paste it into a new one.
  For nPageNumber = 1 To ActiveDocument.ComputeStatistics(wdStatisticPages)
    Application.Browser.Target = wdBrowsePage
    ActiveDocument.Bookmarks("\page").Range.Select
    Selection.Copy
 
    Set objNewDoc = Documents.Add
    Selection.Paste
 
    '  Save new doc with the name of "Page" & nPageNumber and get the first 20 characters of the new doc as part of the file name.
    Set objFileName = objNewDoc.Range(Start:=0, End:=20)
    objNewDoc.SaveAs FileName:=strFolder & "\" & "Page " & nPageNumber & " " & objFileName & ".docx"
    objNewDoc.Close
    Application.Browser.Next
  Next nPageNumber
End Sub

စကားလုံးပြဿနာများကို ကိုင်တွယ်ဖြေရှင်းပါ။

Word ပြဿနာအမျိုးမျိုး ရှိနေမှာဖြစ်ပြီး အမြဲတမ်း ရှိနေမှာပါ။ အဓိကကတော့ ၎င်းတို့ကို စနစ်တကျ ပြုပြင်နည်းကို သင်ယူဖို့ပါပဲ။ အကြံပြုထားတဲ့ နည်းလမ်းကတော့ ရှုပ်ထွေးတဲ့ စကားဝှက်တစ်ခု ရယူဖို့ပါပဲ။ စကားလုံးပြန်လည်ရယူခြင်း။ ကိရိယာ။ အချိန်မနှောင်းမီ သင့်ဒေတာကို ပြန်လည်ရယူရန် မိနစ်တိုင်း သိမ်းထားသင့်သည်။

စာရေးသူနိဒါန်း:

Vera Chen သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ အကျင့်ပျက် xlsx နှင့် pdf ဆော့ဖ်ဝဲ ထုတ်ကုန်များကို ပြုပြင်ခြင်း။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com