သင့် Word Documents များကို အမြန်ပြောင်းရန် Macro နည်းလမ်း ၃ ခု PDF files တွေကို

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

Word 2003 တွင် မီနူးဘားတွင် အိုင်ကွန်တစ်ခု ရှိသည်။ တစ်ချက်နှိပ်ရုံဖြင့် သုံးစွဲသူများသည် “Save As” ဝင်းဒိုးကို ချက်ချင်းစတင်နိုင်ပြီး စာရွက်စာတမ်းကို သိမ်းဆည်းနိုင်မည်ဖြစ်သည်။ pdf format နဲ့။

သို့သော် သင်သတိပြုမိသည့်အတိုင်း Word 2010 ၏ အပြင်အဆင်သည် များစွာပြောင်းလဲသွားသည်။ အသုံးပြုသူများသည် "File" tab ကိုနှိပ်ပြီး "Save As" ဟူသောအမိန့်ကို "Save As" ဝင်းဒိုးကိုစတင်ရန်ဖြစ်သည်။ ထို့အပြင်၊ “Save” ခလုတ်ကိုမနှိပ်မီ သိမ်းဆည်းမှုအမျိုးအစားကို ကိုယ်တိုင်ရွေးချယ်ရမည်ဖြစ်သည်။

ဤကလစ်များအားလုံးဖြင့်၊ ၎င်းသည် မမြန်ဆန်ပါ။ ထို့ကြောင့် ဤပစ္စယောostအဲဒါကိုလုပ်ဖို့ မက်ခရိုနည်းလမ်းကို ပြသချင်ပါတယ်။

Macro 1- "Save As" Window ကို အမြန်စတင်ပါ။

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

Sub TriggerSaveAsWindow()
  Dim dlgSaveAs As Dialog
 
  Set dlgSaveAs = Dialogs(wdDialogFileSaveAs)
  With dlgSaveAs
    .Format = wdFormatPDF
    .Show
    .Execute
  End With
End Sub

6. ထို့နောက် "Run" ကိုနှိပ်ပါ။

ယခုတွင် "Save As" ဝင်းဒိုးရှိသည်။ save type ပါပြီးသားပါ။ pdf. လုပ်ရန်ကျန်သည်မှာ "Save" ခလုတ်ကိုနှိပ်ပါ။ ဤ macro သည် လိုအပ်ပါက ဖိုင်အမည်ကို ပြောင်းလဲနိုင်သည်။

Macro 2- Word Files သို့ တိုက်ရိုက် သိမ်းဆည်းပါ။ PDF

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

1. ပထမဆုံးအနေနဲ့ အပေါ်က ပထမအဆင့် 4 ခုကို ပြန်လုပ်ပါ။
2. ထို့နောက်၊ ၎င်းအစား အောက်ပါကုဒ်များကို ကူးထည့်ပါ-

'Directly save Word file as Pdf and aumatically open it.
Sub DirectlySaveDocxToPdf()
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
  objDoc.ExportAsFixedFormat _
    OutputFileName:=Replace(objDoc.FullName, ".docx", ".pdf"), _
    ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, OptimizeFor:=wdExportOptimizeForPrint, _
    Range:=wdExportAllDocument, Item:=wdExportDocumentContent
End Sub

3. အလားတူ “Run” ကိုနှိပ်ပါ။

Macro 3- Batch မှ Word Docx ဖိုင်များကို ပြောင်းပါ။ PDFs

1. docx ဖိုင်အားလုံးကို ဖိုဒါတစ်ခုတွင် ဦးစွာထားပါ။
2. တည်းဖြတ်ဧရိယာဖွင့်ရန် အထက်ဖော်ပြပါအဆင့်များကို လိုက်နာပါ။
3. ထို့နောက် အောက်ပါ macro ကို ကူးထည့်ပါ

Sub BatchConvertDocxToPDF()
  Dim objDoc As Document
  Dim strFile As String, strFolder As String
 
  'Initialization
  strFolder = "C:\Users\Test\Desktop\Test Files\"
  strFile = Dir(strFolder & "*.docx", vbNormal)
 
  'Precess each file in the file folder and convert them to pdf.
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & strFile)
 
    objDoc.ExportAsFixedFormat _
      OutputFileName:=Replace(objDoc.FullName, ".docx", ".pdf"), _
      ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, _
      Range:=wdExportAllDocument, Item:=wdExportDocumentContent
 
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. "Run" ခလုတ်ကိုနှိပ်ရန်မမေ့ပါနှင့်။

မှတ်စုကုဒ်များတွင် “strFolder = “C:\Users\Test\Desktop\Test Files\”"the"“C:\Users\Test\Desktop\Test Files\”” ဖိုဒါ၏ ဖိုင်လမ်းကြောင်းဖြစ်သည်။ အလိုက်သင့်ပြောင်းဖို့ မမေ့ပါနဲ့။

ဒီ macro ကို run ပြီးရင်၊ pdfs ကို Word စာရွက်စာတမ်းများတည်ရှိသည့်တူညီသောဖိုင်တွဲတွင်သိမ်းဆည်းမည်ဖြစ်သည်။

ဖိုင်များကို တတ်နိုင်သမျှ လုံခြုံအောင်ထားပါ။

ကြိုတင်ကာကွယ်မှုတွေလည်း post- ပျက်စီးနေသောဖိုင်များကိုပြန်လည်ကယ်တင်ရန်ဘေးအန္တရာယ်ဆိုင်ရာလုပ်ဆောင်ချက်များ။ သင့်ဖိုင်များကို ပုံမှန်အရန်သိမ်းဆည်းထားပါက မူရင်းဖိုင်ကို ပြန်လည်ရရှိရန်မှာ ကိတ်မုန့်တစ်ပိုင်းမျှသာဖြစ်သည်။ အမှန်မှာ လူအနည်းငယ်သည် ၎င်းတို့၏ အရန်အစီအစဉ်ကို မှီဝဲနိုင်သောကြောင့် အဖိုးတန်ဒေတာများ ဆုံးရှုံးနိုင်ခြေကို တိုးမြင့်စေပါသည်။ ဒီလိုအခြေအနေမျိုးမှာ အဆင့်မြင့်ကို အားကိုးရမယ့်အချိန်ပါပဲ။ Word document အဂတိလိုက်စားမှုဖြေရှင်းရေးကိရိယာ.

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

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