Word文書の複数の図形の塗りつぶし色をバッチで削除する3つの方法

このpでost、Word文書の複数の図形の塗りつぶし色をバッチで削除する3つの効果的な方法を紹介します。

Word文書に図形を挿入するときに、図形に塗りつぶしの色を適用することもできます。 単一の図形の塗りつぶしの色を簡単に追加または削除できます。 しかし、バッチ処理に関しては、いくつかのトリックが必要になります。

今回は、ドキュメント内の複数の図形の塗りつぶしの色をバッチで削除する方法を紹介します。 したがって、希望の色で塗りつぶしたり、図形を空白の背景のままにしておくことができます。 以下は、さまざまなケースで役立つ3つの方法です。

方法1：ページ上の複数の図形の塗りつぶしの色を削除する

1. まず、リボンの[ホーム]タブをクリックします。
2. 次に、「編集」グループの「選択」コマンドをクリックします。
3. ドロップダウンメニューで、「選択ペイン」を選択します。
4. これで、[選択と表示]ペインに、このページのすべての図形の名前が表示されます。 「Ctrl」を押して、必要な形状を選択します。
5. 次に、リボンの「フォーマット」をクリックします。
6. 次に「ShapeFill」をクリックします。
7. ドロップダウンメニューで[塗りつぶしなし]を選択します。

方法2：ドキュメント内のすべての図形の塗りつぶしの色をバッチで削除する

1. まず第一にost、[開発者]タブが使用可能な場合は、それをクリックし、[VisualBasic]をクリックしてVBAエディターを開きます。 「開発者」がアクティブ化されていない場合は、代わりに「Alt + F11」を押します。
2. エディターで、左側の「通常」プロジェクトをクリックします。
3. 次に、メニューバーの「挿入」をクリックします。
4. 次に、ドロップダウンメニューで「モジュール」を選択します。
5. 新しいモジュールをダブルクリックして開き、次のコードをそこに貼り付けます。

Sub RemoveAllShapeFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    objShape.Fill.Visible = False
    objShape.Line.Visible = msoTrue
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

6. 最後に、「実行」ボタンをクリックするか、「F5」を押してコードを実行します。

方法3：ドキュメント内のすべてのテキストボックスの塗りつぶしの色を削除する

テキストボックスは形状カテゴリに属します。 すべてのテキストボックスの塗りつぶしの色を削除し、他の形状の塗りつぶしの色を保持したい場合は、この方法を利用できます。

1. まず、方法2の手順を繰り返して、マクロをインストールして実行します。
2. そして今回は、そのマクロを次のマクロに置き換えます。

Sub RemoveTextBoxFill()
  Dim objShape As Shape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Fill.Visible = msoFalse
      objShape.Line.Visible = msoTrue
    Else
      Exit For
    End If
  Next objShape
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

結果は次のとおりです。

破損したドキュメントをすばやく回復する

ドキュメントの破損に遭遇した場合でも、慌てる必要はありません。 そのmを覚えておいてくださいost ドキュメントは回復可能です。 あなたがすべきことは時間をつかんで取得することです ドキュメントの修正 ツール。 現在、このようなユーティリティは、データを取得するのに非常に役立ちます。

著者紹介：

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