3 moduri de a elimina în lot culoarea de umplere a mai multor forme din documentul Word

În această postare, suntem încântați să vă arătăm 3 metode eficiente pentru a elimina în lot culoarea de umplere a mai multor forme din documentul Word.

În timp ce inserați forme într-un document Word, le puteți aplica și culoarea de umplere. Este ușor să adăugați sau să eliminați culoarea de umplere a unei singure forme. Dar când vine vorba de procesarea în loturi, vom avea nevoie de un truc.

De data aceasta, vrem să vă arătăm cum să eliminați în loturi culoarea de umplere a mai multor forme din document. Deci, le puteți reumple cu culorile dorite sau pur și simplu lăsați forme pe fundal gol. Mai jos sunt 3 metode care vă pot ajuta în diferite cazuri.

Metoda 1: Eliminați culoarea de umplere a formelor multiple de pe o pagină

1. În primul rând, faceți clic pe fila „Acasă” din Panglică.
2. Apoi faceți clic pe comanda „Selectați” din grupul „Editare”.
3. În meniul drop-down, alegeți „Panoul de selecție”.
4. Acum, în panoul „Selectare și vizibilitate”, puteți vedea toate numele formelor pe această pagină. Apăsați „Ctrl” pentru a selecta formele de care aveți nevoie.
5. Apoi faceți clic pe „Format” în Panglică.
6. Apoi faceți clic pe „Umplere formă”.
7. Alegeți „Fără completare” din meniul derulant.

Metoda 2: Eliminați în lot culoarea de umplere a tuturor formelor dintr-un document

1. În primul rând, dacă este disponibilă fila „Developer”, faceți clic pe ea și apoi faceți clic pe „Visual Basic” pentru a deschide editorul VBA. Dacă „Developer” nu a fost activat, apăsați în schimb „Alt+ F11”.
2. Acum, în editor, faceți clic pe proiectul „Normal” din partea stângă.
3. Apoi faceți clic pe „Insert” din bara de meniu.
4. Apoi alegeți „Modul” din meniul derulant.
5. Faceți dublu clic pe modulul nou pentru a-l deschide și lipiți aceste coduri acolo:

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. În cele din urmă, faceți clic pe butonul „Run” sau apăsați „F5” pentru a executa coduri.

Metoda 3: Eliminați culoarea de umplere a tuturor casetelor de text dintr-un document

Casetele de text aparțin categoriei forme. În cazul în care doriți să eliminați culoarea de umplere a tuturor casetelor de text, dar o păstrați pe cea a altor forme, puteți utiliza acest mod.

1. În primul rând, repetați pașii din metoda 2 pentru a instala și a rula o macrocomandă.
2. Și de data aceasta, înlocuiți macrocomanda cu aceasta:

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

Iată rezultatul:

Recuperați rapid documentele deteriorate

Dacă întâlniți vreodată documente corupte, nu intrați în panică. Rețineți că majoritatea documentelor pot fi recuperate. Ceea ce ar trebui să faceți este să profitați de timp și să obțineți o soluție... doc fix instrument. În zilele noastre, un astfel de utilitar poate fi de mare ajutor în recuperarea datelor.

Introducerea autorului:

Vera Chen este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv xls fix și pdf repararea produselor software. Pentru mai multe informații vizitați www.datanumen.com