Word文書で画像をバッチで非表示または表示する4つの簡単な方法

今すぐ共有:

この記事では、Word文書で画像をバッチで非表示または表示する4つの方法を紹介することに焦点を当てます。

時々、あなたは大量の写真を含む文書を継承する可能性があります。 それでも、おそらくあなたはそれらがかなり気を散らすものだと思うでしょう。 彼らは実際にあなたを説明するのではなく効率的に読むことからあなたをつまずかせます。 または、写真がテキストやデータの撮影である場合、写真とドキュメントの内容を区別するのは困難です。

写真をバッチ非表示

混乱を減らし、ナビゲート速度を上げるために、次の方法を利用して、それらを一度だけ非表示にすることができます。

方法1:Wordの設定で変更する

これは2枚の写真を含むファイルの例です。 XNUMXつ目は「テキストに沿った」折り返しスタイルで、もうXNUMXつは「タイト」です。      写真付きファイル

  1. まず、Wordを開いて「ファイル」タブをクリックします。
  2. 次に、[オプション]をクリックして、[Wordのオプション]ダイアログボックスを表示します。「ファイル」をクリック->「オプション」をクリック
  3. 「詳細」をクリックします。
  4. 次に、「ドキュメントコンテンツの表示」の部分まで下にスクロールします。 [画像のプレースホルダーを表示する]チェックボックスをオンにし、[画面に図面とテキストボックスを表示する]チェックボックスをオフにします。
  5. 最後に「OK」をクリックします。[詳細設定]-> [画像プレースホルダーを表示]チェックボックスをオン-> [画面に図面とテキストボックスを表示]ボックスをオフにする-> [OK]をクリック

これで、「テキストに沿った」スタイルの画像がフレームボックスに変換され、XNUMX番目の画像が完全に非表示になっていることがわかります。写真を隠す効果

方法2:マクロを実行する

  1. まず、「開発」タブをクリックし、「Visual Basic」を選択してVBAエディターを開きます。または、「Alt + F11」キーを押しても開きます。「開発者」をクリック->「VisualBasic」をクリック
  2. 次に、「通常」プロジェクトをクリックしてから、「挿入」をクリックします。
  3. 次に、「モジュール」を選択して新しいモジュールを取得します。「通常」をクリック->「挿入」をクリック->「モジュール」をクリック
  4. それをダブルクリックして、次のコードを貼り付けます。
Sub HideAllPictures()
  Dim nResponse As Integer
 
  nResponse = MsgBox("Do you want to hide all pictures?", 4, "Hide pictures")
 
  If nResponse = 6 Then
    With ActiveWindow.View
      If .ShowPicturePlaceHolders = False Or .ShowDrawings = True Then
        .ShowPicturePlaceHolders = True
        .ShowDrawings = False
      Else
        MsgBox ("All pictures have been hided.")
      End If
    End With
  End If
End Sub
  1. 「実行」をクリックすることを忘れないでください。HidePicturesコードを実行する
  2. これで、メッセージボックスが表示されます。 「はい」をクリックして、すべての画像をバッチで非表示にします。写真を非表示にするには「はい」をクリックします

複数の画像を含むドキュメントを定期的に受け取る場合は、「Sub HideAllPictures()」を「SubAutoOpen」に変更することを検討してください。 その後、画像を含むファイルを開くと、マクロが自動的に実行されます。

バッチショーの写真

方法1:Wordの変更を元に戻す

  1. 同じ方法で、最初に[Wordのオプション]ダイアログボックスを開きます。
  2. 同様に、「詳細」をクリックします。 今回のみ、[画像のプレースホルダーを表示する]チェックボックスをオフにし、[画面に図面とテキストボックスを表示する]チェックボックスをオンにします。
  3. 最後に「OK」をクリックします。

方法2:VBAコードを実行する

  1. 上記の「マクロの実行」の最初の4つの手順を繰り返します。
  2. ただし、コードを次のように置き換えます。
Sub ShowAllPictures()
  Dim nResponse As Integer
 
  nResponse = MsgBox("Do you want to show all pictures?", 4, "Show pictures")
 
  If nResponse = 6 Then
    With ActiveWindow.View
      If .ShowPicturePlaceHolders = True Or .ShowDrawings = False Then
      .ShowPicturePlaceHolders = False
      .ShowDrawings = True
      Else
        MsgBox ("No picture is hided.")
      End If
    End With
 End If
End Sub
  1. 「実行」ボタンを押します。コードの貼り付け-> [実行]をクリックします
  2. 表示されるメッセージボックスで「はい」をクリックすると、すべての画像が表示されます。

すべての画像アクションを非表示にすると、将来のすべてのファイルに影響を与える可能性があるため、「SubShowAlPictures()」を「SubAutoClose()」に変更できます。 次に、ドキュメントを閉じるたびに、非表示の画像を表示することを思い出させる必要があります。

文章題を扱う

完璧なソフトウェアなど存在しません。そして、私たちのほとんどが毎日使っているWordでさえ、エラーが発生し、ファイルが破損する可能性があります。もちろん、定期的にバックアップを取っていれば、どれも問題になりません。一方、バックアップを取っていない場合は、 単語の破損修正ツール 助けになるものです。

著者紹介:

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

今すぐ共有:

コメントは締め切りました。