3 viisi, kuidas Wordi dokumendis tekstisisesed pildid ujuvateks muuta

Selles artiklis tutvustame teile 3 võimalust, kuidas Wordi dokumendis tekstisiseseid pilte ujuvateks muuta.

Võib-olla teate, et iga kord, kui sisestame Wordi dokumenti pildi, kasutatakse vaikimisi mähkimisstiili "Koos tekstiga". Sel viisil peetakse pilti suureks tähemärgiks, mistõttu on meil raske seda lihtsalt klõpsates ja lohistades liigutada. Seetõttu peame need tekstisisesed pildid muutma ujuvateks, et nende asukohti hõlpsalt kohandada.

Nagu alati, on meil 3 meetodit, mida saate kätte saada.

1. meetod: muutke ühe pildi pakkimisstiili käsitsi

1. Esiteks paremklõpsake pilti ja liigutage kursor kontekstimenüüs valiku "Mähkida tekst" kohale.
2. Järgmiseks valige mõni muu stiil peale „Tekstiga kooskõlas”. Seejärel saate pildi lohistada kuhu iganes soovite.

2. meetod: muutke vaikestiili

Nagu eespool mainitud, on vaikemähkimisstiil seatud valikule „Koos tekstiga”. Siiski saate konfiguratsiooni muuta enne piltide sisestamist järgmiste sammudega.

1. Alustamiseks klõpsake vahekaarti „Fail“ ja seejärel käsku „Valikud“, et avada dialoogiboks „Wordi valikud“.
2. Järgmisena klõpsake vasakpoolses veerus "Täpsemalt".
3. Kerige üles jaotiseni "Lõika, kopeeri ja kleepige" ja leidke valik "Lisa/kleebi pilt kui".
4. Mähkimisstiili valimiseks klõpsake rippmenüü nuppu.
5. Viimaseks, kuid mitte vähemtähtsaks, klõpsake uue sätte salvestamiseks nuppu "OK".

Kõik tulevikus sisestatavad pildid on ujuva ümbrisega.

3. meetod: muutke VBA kaudu mitme pildi mähkimisstiili

1. Alustamiseks vajutage VBA redaktori käivitamiseks klahvikombinatsiooni „Alt + F11”.
2. Järgmisena minge projekti "Tavaline", klõpsates "Tavaline".
3. Seejärel klõpsake menüüribal vahekaarti "Sisesta" ja valige rippmenüüst "Moodul".
4. Nüüd topeltklõpsake uuel moodulil, et tuua esile redaktori paremas servas olev kodeerimisruum.
5. Kleepige sinna järgmine makro:

Sub ChangeInLineWithTextPicToFloatingPic()
  Dim objDoc As Document
  Dim objInLineShape As InlineShape
  Dim objShape As Shape
 
  Set objDoc = ActiveDocument
 
  With objDoc
    For Each objInLineShape In .InlineShapes
      objInLineShape.ConvertToShape
    Next objInLineShape
 
    For Each objShape In .Shapes
      objShape.Select
      Selection.ShapeRange.WrapFormat.Type = wdWrapBehind
    Next objShape
  End With
End Sub

6. Lõpuks klõpsake "Käivita" või vajutage "F5".

märkused:

See makro muudab kõik aktiivse dokumendi tekstisisesed pildid ujuvateks ja seab need stiilis "Teksti taga". Kui teil on vaja vormindada need muus stiilis, muutke lihtsalt konstanti koodireal "Selection.ShapeRange.WrapFormat.Type = wdWrapBehind". Üksikasjaliku loendi saamiseks külastage seda linki: https://docs.microsoft.com/en-us/office/vba/api/Word.WdWrapType

Varukoopiad on olulised

Nagu öeldud, on unts ennetustöö väärt terve naela. Kuigi leiame viise failide päästmiseks pärast seda Sõnade korruptsioon, tundub alati liiga hilja. Kõige ideaalsem on muidugi võtta ennetavaid meetmeid, näiteks teha varukoopiaid. Nendega käepärast tunned end mugavamalt toiminguid tehes, ilma et peaksid muretsema andmete kaotamise pärast.

Autori sissejuhatus:

Vera Chen on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas rikutud xls ja pdf tarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom