3 วิธีด่วนในการพิมพ์เอกสาร Word ของคุณโดยไม่ต้องมาร์กอัป

ในบทความหน้า เราจะเน้นที่การแนะนำ 3 วิธีที่รวดเร็วในการพิมพ์เอกสาร Word ของคุณโดยไม่มีมาร์กอัป

หากเอกสารของคุณต้องมีการแก้ไข คุณจะได้รับมาร์กอัปทุกประเภทในเอกสารของคุณอย่างแน่นอน มีวิธีที่จะไม่แสดงบนหน้าจอ แล้วจะไม่พิมพ์ออกมาล่ะ?

คำตอบเป็นบวก และหัวข้อของเราในวันนี้มีไว้เพื่อให้คุณมี 3 วิธีที่รวดเร็วและมีประสิทธิภาพเพื่อให้บรรลุวัตถุประสงค์

วิธีที่ 1: แก้ไขตัวเลือกการพิมพ์

1. ขั้นแรกให้คลิกแท็บ "ไฟล์" ใน Ribbon
2. จากนั้นคลิกคำสั่ง "พิมพ์"
3. จากนั้นไปที่ส่วน "การตั้งค่า" และคลิกที่ช่องแบบเลื่อนลงช่องแรก
4. ในเมนู ให้ยกเลิกการเลือกตัวเลือก "พิมพ์มาร์กอัป" คุณจะเห็นมาร์กอัปใดๆ เลยในหน้าตัวอย่างทางด้านขวา ซึ่งเป็นผลลัพธ์ที่แน่นอนที่คุณจะได้รับ
5. สุดท้าย เลือกเครื่องพิมพ์และตั้งค่าการจัดรูปแบบอื่น แล้วคลิก "พิมพ์"

วิธีที่ 2: ใช้รหัส VBA

ในกรณีที่คุณต้องการการประมวลผลแบบอัตโนมัติ การเรียกใช้มาโครคือตัวเลือกอันดับต้นๆ ของคุณ

1. ก่อนอื่น กด “Alt+ F11” เพื่อทริกเกอร์โปรแกรมแก้ไข VBA ใน Word
2. จากนั้นคลิก "ปกติ"
3. จากนั้นคลิกแท็บ "แทรก" แล้วเลือก "โมดูล" ในเมนู
4. จากนั้นดับเบิลคลิกเพื่อเปิดโมดูลและวางโค้ดต่อไปนี้:

Sub PrintDocWithoutComments()
  Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
    wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
    Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
    PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub

5. สุดท้ายคลิก“ เรียกใช้”

บรรทัดโค้ด “Copies:=1” ตั้งค่าสำเนาการพิมพ์เป็น 1 คุณสามารถเปลี่ยนหมายเลขสำเนาได้ตามต้องการ

วิธีที่ 3: พิมพ์เอกสารหลายชุดโดยไม่มีมาร์กอัป

ตอนนี้ หากคุณมีไฟล์จำนวนมากที่ต้องพิมพ์โดยไม่มีมาร์กอัป มาโครต่อไปนี้จะช่วยคุณประหยัดเวลาได้

1. ขั้นแรก ให้รวบรวมเอกสารเป้าหมายทั้งหมดไว้ในโฟลเดอร์เดียวกัน
2. จากนั้นติดตั้งและเรียกใช้แมโครโดยทำตามขั้นตอนในวิธีที่ 2
3. แทนที่มาโครด้วยอันนี้:

Sub BatchPrintDocsWithoutComments()
  Dim objDoc As Document
  Dim strFile As String, strFolder As String
 
  '  Initialization
  strFolder = InputBox("Enter folder path:")
  strFile = Dir(strFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=strFolder & strFile)
    Set objDoc = ActiveDocument
 
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
      wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
      Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
      PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. ตอนนี้จะมีช่องป้อนข้อมูล ให้ป้อนเส้นทางโฟลเดอร์ที่คุณจัดเก็บเอกสารเป้าหมายทั้งหมด แล้วคลิก “ตกลง” อย่าลืมใส่เครื่องหมาย “\” ตัวสุดท้ายในสตริงเส้นทางด้วย

รับมือกับการทุจริตด้านเอกสาร

ความเสียหายของเอกสารเป็นประเด็นที่เกิดขึ้นบ่อยครั้ง เป็นผลให้, การกู้คืนเอกสาร ได้ขึ้นมาบนเวทีแล้ว มีฟังก์ชันในตัวใน Word ที่ช่วยคุณกู้คืนไฟล์ที่เสียหายได้ น่าเสียดายที่บางครั้งมันก็ใช้งานไม่ได้ดีนัก ดังนั้นคุณต้องมีเครื่องมือที่มีคุณสมบัติเหมาะสมกว่าจึงจะทำงานได้

บทนำผู้เขียน:

Vera Chen เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ การกู้คืน Excel และ pdf ซ่อมแซมผลิตภัณฑ์ซอฟต์แวร์ ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.