3 manieren om te batchen Verwijder de opvulkleur van meerdere vormen in uw Word-document

In dit bericht laten we je graag 3 effectieve methoden zien om in één keer de opvulkleur van meerdere vormen in je Word-document te verwijderen.

Terwijl u vormen in een Word-document invoegt, kunt u er ook vulkleur op toepassen. Het is gemakkelijk om de vulkleur van een enkele vorm toe te voegen of te verwijderen. Maar als het gaat om batchverwerking, hebben we een truc nodig.

Deze keer willen we u laten zien hoe u batchgewijs de vulkleur van meerdere vormen in een document kunt verwijderen. U kunt ze dus opnieuw vullen met de gewenste kleuren of vormen gewoon op een lege achtergrond laten. Hieronder volgen drie methoden die u in verschillende gevallen kunnen helpen.

Methode 1: Verwijder de opvulkleur van meerdere vormen op een pagina

1. Klik eerst op het tabblad "Home" in het lint.
2. Klik vervolgens op de opdracht "Selecteren" in de groep "Bewerken".
3. Kies "Selectiedeelvenster" in het vervolgkeuzemenu.
4. Nu kunt u in het deelvenster "Selectie en zichtbaarheid" alle namen van vormen op deze pagina zien. Druk op "Ctrl" om de vormen te selecteren die u nodig heeft.
5. Klik vervolgens op "Formaat" in het lint.
6. Klik vervolgens op “Vormvulling”.
7. Kies "Geen opvulling" in het vervolgkeuzemenu.

Methode 2: Batch Verwijder de opvulkleur van alle vormen in een document

1. Allereerst, als het tabblad "Ontwikkelaar" beschikbaar is, klik er dan op en vervolgens op "Visual Basic" om de VBA-editor te openen. Als "Ontwikkelaar" niet is geactiveerd, druk dan op "Alt + F11".
2. Klik nu in de editor op het "Normaal" project aan de linkerkant.
3. Klik vervolgens op "Invoegen" in de menubalk.
4. Kies vervolgens "Module" in het drop-down menu.
5. Dubbelklik op een nieuwe module om deze te openen en plak deze codes daar:

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. Klik ten slotte op de knop "Uitvoeren" of druk op "F5" om codes uit te voeren.

Methode 3: verwijder de opvulkleur van alle tekstvakken in een document

Tekstvakken behoren tot de vormcategorie. Als u de vulkleur van alle tekstvakken wilt verwijderen, maar die van andere vormen wilt behouden, kunt u op deze manier gebruikmaken.

1. Herhaal eerst de stappen in methode 2 om een ​​macro te installeren en uit te voeren.
2. En vervang deze keer die macro door deze:

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

Hier is het resultaat:

Herstel snel beschadigde documenten

Mocht u ooit te maken krijgen met beschadigde documenten, raak dan niet in paniek. Houd er rekening mee dat de meeste documenten te herstellen zijn. Wat u wel moet doen, is de tijd nemen en een back-up maken. doc-oplossing gereedschap. Tegenwoordig kan zo'n hulpprogramma een grote hulp zijn bij het terughalen van uw gegevens.

Auteur Introductie:

Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder xls repareren en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com