背景色や画像を使用せずに Word 文書を印刷する 3 つの賢い方法

今日の記事では、背景色や画像なしでWord文書を印刷する3つの賢い方法を紹介することにしました。

適切で素敵な背景色または画像は、ドキュメントをより目を引くものにすることができます。 したがって、時々、美的目的からドキュメントの背景色または画像を設定することになります。

その場合、背景色や画像なしでドキュメントを印刷したい場合があります。

1. まず、インクを保存してcにすることができますost 効果的。
2. 第二に、前述のように、背景色は読者の目を楽しませるためだけにあります。 したがって、文書の内容に影響を与えることはありません。
3. 第三に、背景にいくつかの追加の単語があると、混乱を招きやすくなります。

このようなシナリオでは、背景色や画像のないドキュメントの方が適しています。 これを実現するには、次の方法を試してください。

方法1：「単語オプション」を変更する

1. まず、Wordの「ファイル」タブをクリックします。
2. 次に「オプション」をクリックして「単語オプション」ボックスを開きます。
3. 左側の「表示」をクリックします。
4. 次に、右側の[印刷オプション]セクションで、[背景色または画像を印刷する]ボックスをオフにします。
5. 最後に「OK」をクリックします。

方法2：VBAを介して背景色なしでドキュメントを印刷する

1. まず第一にost、「Alt + F11」を押して、WordでVBAエディターをトリガーします。
2. 次に、左側の「通常」をクリックします。
3. 次に、「挿入」をクリックします。
4. そして、ドロップダウンメニューから「モジュール」を選択します。
5. ダブルクリックしてモジュールを開きます。
6. 次に、これらのコードをコーディング領域に貼り付けます。

Sub PrintOneDocWithoutBackgroundColor()
  Dim objDoc As Document
  Dim nBackgroundFill As Boolean
 
  Set objDoc = ActiveDocument
 
  With objDoc
    '  Save the current page color.
    nBackgroundFill = .Background.Fill.Visible
 
    '  Hide the page color from printing.
    .Background.Fill.Visible = msoFalse
  End With
 
  Dialogs(wdDialogFilePrint).Show
 
  With objDoc
    '  Restore the page color to original setting on screen.
    .Background.Fill.Visible = nBackgroundFill
  End With
End Sub

7. 最後になりましたが、「実行」をクリックしてください。

このマクロを使用すると、背景色や画像なしでドキュメントを印刷できます。 一方、コンピュータ上のドキュメントは、背景色または画像がそのままである必要があります。

方法3：VBAを介して背景色なしで複数のドキュメントを印刷する

このマクロは、背景色なしでドキュメントのバッチを印刷することを目的としています。

1. まず、starすべてをアレンジしてt tarXNUMXつのフォルダにドキュメントを取得します。
2. 次に、方法2の手順に従って、マクロをインストールして実行します。
3. 今回のみ、マクロを次のマクロに置き換えます。

Sub PrintMultiDocWithoutBackgroundColor()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "No folder is selected! Please select the target folder."
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
    Set objDoc = ActiveDocument
 
    With objDoc
      .Background.Fill.Visible = msoFalse
      .PrintOut
      .Close SaveChanges:=wdDoNotSaveChanges
    End With
    strFile = Dir()
  Wend
 
End Sub

マクロは「参照」ウィンドウを呼び出します。 すべてのドキュメントが含まれているフォルダを選択して、[OK]をクリックするだけです。

同様に、ドキュメントのデジタルバージョンは変更されません。

あなたのWord文書に目を離さない

自分のコンピュータに多数のドキュメントを保存することは一般的で合理的です。 しかし、時間が経つにつれて、ドキュメントは古くなり、私たちに忘れられてしまいます。 そのため、ある日、特定のドキュメントを検索しようとすると、そのドキュメントにアクセスできなくなるだけです。 そのような欲求不満は、私たち全員が遭遇するのを嫌うものです。 ただし、データを取得する唯一の方法は、修復ツールを利用して ドキュメントを修正。 だから、すべてが手遅れになる前に、できるだけ早く入手してください。

著者紹介：

Vera Chenは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 Excelの修正 and pdf ソフトウェア製品を修理します。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com