Kolme tapaa erän poistamiseksi useiden muotojen täyttöväri Word-asiakirjastasi

Tässä viestissä näytämme mielellämme 3 tehokasta tapaa poistaa useiden muotojen täyttöväri eränä Word-asiakirjassasi.

Kun lisäät muotoja Word-asiakirjaan, voit käyttää niihin myös täyteväriä. Yksittäisen muodon täyteväri on helppo lisätä tai poistaa. Mutta kun kyseessä on eräkäsittely, tarvitsemme jonkin temppun.

Tällä kertaa haluamme näyttää, kuinka erän poistaminen useiden muotojen täyttöväri dokumentissa. Joten voit täyttää ne haluamillasi väreillä tai vain jättää muodot tyhjälle taustalle. Seuraavassa on 3 menetelmää, jotka voivat auttaa sinua eri tapauksissa.

Tapa 1: Poista useiden muotojen täyttöväri sivulta

1. Napsauta ensin valintanauhan ”Koti” -välilehteä.
2. Napsauta sitten Muokkaa-ryhmän Muokkaa-komentoa.
3. Valitse avattavasta valikosta ”Valintaruutu”.
4. Nyt Valinta ja näkyvyys -ruudussa näet kaikki tällä sivulla olevien muotojen nimet. Paina "Ctrl" valitaksesi tarvitsemasi muodot.
5. Napsauta sitten "Format" valintanauhassa.
6. Napsauta sitten "Shape Fill".
7. Valitse avattavasta valikosta Ei täyttöä.

Tapa 2: Erä Poista asiakirjan kaikkien muotojen täyttöväri

1. Ensinnäkin, jos ”Kehittäjä”-välilehti on käytettävissä, napsauta sitä ja sitten ”Visual Basic” avataksesi VBA-editorin. Jos ”Kehittäjä”-välilehteä ei ole aktivoitu, paina sen sijaan ”Alt+F11”.
2. Napsauta editorissa vasemmalla puolella olevaa Normal-projektia.
3. Napsauta sitten valikkorivillä “Lisää”.
4. Valitse seuraavaksi avattavasta valikosta Moduuli.
5. Kaksoisnapsauta uutta moduulia avataksesi sen ja liitä nämä koodit sinne:

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. Napsauta lopuksi Suorita-painiketta tai paina "F5" suorittaaksesi koodit.

Tapa 3: Poista asiakirjan kaikkien tekstiruutujen täyttöväri

Tekstiruudut kuuluvat muodoluokkaan. Jos haluat poistaa kaikkien tekstiruutujen täyttövärin mutta säilyttää muiden muotojen väri, voit käyttää tätä tapaa.

1. Toista ensin menetelmän 2 vaiheet makron asentamiseksi ja suorittamiseksi.
2. Korvaa makro tällä kertaa tällä:

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

Tässä on tulos:

Palauta vaurioituneet asiakirjat nopeasti

Jos kohtaat joskus asiakirjojen vioittumista, älä panikoi. Muista, että useimmat asiakirjat ovat palautettavissa. Sinun kannattaa kuitenkin käyttää aika hyväksesi ja hankkia doc korjaus työkalu. Nykyään tällainen apuohjelma voi olla suuri apu tietojen palauttamisessa.

Tekijän esittely:

Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien xls korjata ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com