Dans cet article, nous sommes heureux de vous présenter 3 méthodes efficaces pour supprimer par lots la couleur de remplissage de plusieurs formes dans votre document Word.
Lors de l'insertion de formes dans un document Word, vous pouvez également leur appliquer une couleur de remplissage. Il est facile d'ajouter ou de supprimer la couleur de remplissage d'une seule forme. Mais en ce qui concerne le traitement par lots, nous aurons besoin d'une astuce.
Cette fois, nous voulons vous montrer comment supprimer par lots la couleur de remplissage de plusieurs formes dans un document. Ainsi, vous pouvez les remplir avec les couleurs souhaitées ou simplement laisser des formes sur fond blanc. Voici 3 méthodes qui peuvent vous aider dans différents cas.
Méthode 1 : supprimer la couleur de remplissage de plusieurs formes sur une page
- Tout d'abord, cliquez sur l'onglet "Accueil" dans le ruban.
- Cliquez ensuite sur la commande « Sélectionner » dans le groupe « Édition ».
- Dans le menu déroulant, choisissez "Volet de sélection".
- Maintenant, dans le volet "Sélection et visibilité", vous pouvez voir tous les noms de formes sur cette page. Appuyez sur "Ctrl" pour sélectionner les formes dont vous avez besoin.
- Cliquez ensuite sur "Formater" dans le ruban.
- Cliquez ensuite sur "Remplir la forme".
- Choisissez "Pas de remplissage" dans le menu déroulant.
Méthode 2 : supprimer par lots la couleur de remplissage de toutes les formes d'un document
- Avant toute chose, si l'onglet « Développeur » est disponible, cliquez dessus, puis sur « Visual Basic » pour ouvrir l'éditeur VBA. Si l'onglet « Développeur » n'est pas activé, appuyez plutôt sur « Alt + F11 ».
- Maintenant, dans l'éditeur, cliquez sur le projet "Normal" sur le côté gauche.
- Cliquez ensuite sur "Insérer" dans la barre de menu.
- Choisissez ensuite "Module" dans le menu déroulant.
- Double-cliquez sur le nouveau module pour l'ouvrir et collez-y ces codes :
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
- Enfin, cliquez sur le bouton "Exécuter" ou appuyez sur "F5" pour exécuter les codes.
Méthode 3 : supprimer la couleur de remplissage de toutes les zones de texte d'un document
Les zones de texte appartiennent à la catégorie des formes. Si vous souhaitez supprimer la couleur de remplissage de toutes les zones de texte mais conserver celle des autres formes, vous pouvez utiliser cette méthode.
- Tout d'abord, répétez les étapes de la méthode 2 pour installer et exécuter une macro.
- Et cette fois, remplacez cette macro par celle-ci :
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
Voici le résultat:
Récupérer rapidement les documents endommagés
Si vous rencontrez un problème de corruption de documents, ne paniquez pas. Sachez que la plupart des documents sont récupérables. L'important est d'agir rapidement et de vous procurer une copie de sauvegarde. correction de doc outil. De nos jours, un tel utilitaire peut être d'une grande aide pour récupérer vos données.
Introduction de l'auteur:
Vera Chen est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris correction xls et pdf réparer les produits logiciels. Pour plus d'informations, visitez www.datanumen.com




