У наступній статті ми зосередимося на тому, щоб представити вам 3 швидкі способи друку документа Word без розміток.
Якщо ваш документ вимагає перегляду, то ви точно отримаєте всі види націнок у своєму документі. Є способи не показувати їх на екрані. А як не роздрукувати їх?
Відповідь позитивна. І наша сьогоднішня тема присвячена тому, щоб надати вам 3 швидкі та ефективні методи досягнення мети.
Спосіб 1: Змінення параметрів друку
- Для початку натисніть на стрічці вкладку «Файл».
- Далі натисніть команду «Друк».
- Потім перейдіть до розділу «Налаштування» та клацніть на першому спадному вікні.
- У меню зніміть прапорець біля опції «Друкувати розмітку». Ви ніде не побачите розмітки в попередньому перегляді праворуч, саме такий результат ви отримаєте.
- Нарешті, виберіть принтер та встановіть інше форматування та натисніть «Друк».
Спосіб 2: Використовуйте коди VBA
Якщо ви віддаєте перевагу автоматичній обробці, тоді запуск макросу - ваш найкращий вибір.
- Спочатку натисніть «Alt + F11», щоб запустити редактор VBA у програмі Word.
- Потім натисніть «Звичайний».
- Далі натисніть вкладку “Вставити” та виберіть “Модуль” у її меню.
- Потім двічі клацніть, щоб відкрити модуль, і вставте такі коди:
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
- Нарешті, натисніть «Виконати».
Рядок коду “Копії: = 1” встановлює для друкованої копії значення 1. Ви можете змінити номер копії за необхідності.
Спосіб 3: Пакетний друк кількох документів без розміток
Тепер, якщо у вас є велика кількість файлів, які потрібно надрукувати без розміток, такий макрос заощадить ваш час.
- Спочатку помістіть усі цільові документи в одну папку.
- Потім встановіть і запустіть макрос, дотримуючись кроків у способі 2.
- Замініть макрос таким:
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
- Тепер є поле введення. Введіть шлях до папки, де зберігаються всі цільові документи, і натисніть «OK». Не забудьте останній символ «\» у рядку шляху.
Справлятися з корупцією документів
Корупція в документах є часто повторюваною темою. Як наслідок, відновлення документа вийшов на сцену. У програмі Word є вбудована функція, яка допомагає відновити зламані файли. На жаль, це іноді не працює добре. Таким чином, вам потрібен більш придатний інструмент для виконання роботи.
Вступ автора:
Віра Чень є експертом з відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі Відновлення Excel та pdf ремонт програмних продуктів. Для отримання додаткової інформації відвідайте WWW.datanumen.com



