3 Mga paraan upang Batch Alisin ang Punan ng Kulay ng Maramihang Mga Hugis sa Iyong Dokumento ng Salita

Sa post na ito, natutuwa kaming ipakita sa iyo ang 3 epektibong paraan upang mabilis na alisin ang fill color ng maraming hugis sa iyong Word document.

Habang pinapasok ang mga hugis sa isang dokumento ng Word, maaari kang mag-apply ng kulay ng punan din sa kanila. Madaling magdagdag o mag-alis ng punan ng kulay ng isang solong hugis. Ngunit pagdating sa pagproseso ng batch, kakailanganin namin ng ilang trick.

Sa oras na ito, nais naming ipakita sa iyo kung paano i-batch ang alisin ang kulay ng pagpuno ng maraming mga hugis sa dokumento. Kaya maaari mong punan muli ang mga ito ng ninanais na mga kulay o iwanan lamang ang mga hugis sa blangko na background. Ang sumusunod ay 3 mga pamamaraan na makakatulong sa iyo sa iba't ibang mga kaso.

Paraan 1: Alisin ang Punan ng Kulay ng Maramihang Mga Hugis sa isang Pahina

1. Una sa lahat, i-click ang tab na "Home" sa Ribbon.
2. Pagkatapos i-click ang utos na "Piliin" sa pangkat na "Pag-edit".
3. Sa drop-down na menu, piliin ang "Seleksyon Pane".
4. Ngayon sa pane na "Pagpili at Makita," maaari mong makita ang lahat ng mga pangalan ng mga hugis sa pahinang ito. Pindutin ang "Ctrl" upang mapili ang mga hugis na kailangan mo.
5. Pagkatapos i-click ang "Format" sa Ribbon.
6. Susunod na pag-click sa "Punan ng Hugis".
7. Piliin ang "Walang Punan" sa drop-down na menu.

Paraan 2: Batch Alisin ang Punan ng Kulay ng Lahat ng Mga Hugis sa isang Dokumento

1. Una sa lahat, kung available ang tab na "Developer", i-click ito at pagkatapos ay i-click ang "Visual Basic" para buksan ang VBA editor. Kung hindi pa na-activate ang "Developer", pindutin na lang ang "Alt+ F11".
2. Ngayon sa editor, i-click ang proyektong "Normal" sa kaliwang bahagi.
3. Pagkatapos i-click ang "Ipasok" sa menu bar.
4. Susunod na piliin ang "Modyul" sa drop-down na menu.
5. Pag-double click sa bagong module upang buksan ito at i-paste ang mga code na ito doon:

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. Panghuli, i-click ang pindutang "Run" o pindutin ang "F5" upang magpatupad ng mga code.

Paraan 3: Alisin ang Punan ng Kulay ng Lahat ng Mga Text Box sa isang Dokumento

Ang mga text box ay nabibilang sa kategorya ng hugis. Kung sakaling nais mong alisin ang kulay ng pagpuno ng lahat ng mga kahon ng teksto ngunit panatilihin ang iba pang mga hugis, maaari mong gamitin sa ganitong paraan.

1. Una, ulitin ang mga hakbang sa pamamaraan 2 upang mai-install at magpatakbo ng isang macro.
2. At sa oras na ito, palitan ang macro na iyon ng isang ito:

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

Narito ang kinalabasan:

Mabilis na Mabawi ang Pinsalang Mga Dokumento

Kung sakaling magkaroon ka ng sira sa dokumento, huwag mag-panic. Tandaan na karamihan sa mga dokumento ay maaaring mabawi. Ang dapat mong gawin ay maglaan ng oras at kumuha ng pag-aayos ng doc kasangkapan Ngayon, ang gayong isang utility ay maaaring maging isang malaking tulong sa pagkuha ng iyong data pabalik.

Panimula ng May-akda:

Si Vera Chen ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang xls ayusin at pdf pagkumpuni ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa