3 tapaa muuttaa upotetut kuvat kelluviksi Word-asiakirjassasi

Tässä artikkelissa esittelemme sinulle kolme tapaa muuttaa upotetut kuvat kelluviksi Word-asiakirjassasi.

Kuten ehkä tiedät, aina kun lisäämme kuvan Word-asiakirjaan, se käyttää oletusarvoisesti tekstin mukaista rivitystyyliä. Tällä tavalla kuvaa pidetään suurena hahmona, minkä vuoksi meidän on vaikea siirtää sitä yksinkertaisesti napsauttamalla ja vetämällä. Siksi meidän on vaihdettava nämä rivikuvat kelluviin kuviin, jotta niiden sijaintia voidaan helposti säätää.

Kuten aina, meillä on 3 tapaa noutaa.

Tapa 1: Muuta yhden kuvan rivitystyyliä manuaalisesti

1. Napsauta ensin kuvaa hiiren kakkospainikkeella ja siirrä kohdistin kontekstivalikon "Wrap Text" -vaihtoehdon päälle.
2. Valitse seuraavaksi mikä tahansa muu tyyli kuin tekstin mukainen. Sitten voit vetää kuvan minne haluat.

Tapa 2: Muuta oletustyyliä

Kuten edellä mainittiin, oletusarvoinen rivitystyyli on asetettu tekstin mukaiseksi. Voit kuitenkin muokata määritystä ennen kuvien lisäämistä seuraavien vaiheiden avulla.

1. Aloita napsauttamalla "Tiedosto"-välilehteä ja sitten "Asetukset"-komentoa avataksesi "Word-asetukset"-valintaikkunan.
2. Napsauta sitten vasemmassa sarakkeessa "Lisäasetukset".
3. Vieritä "Leikkaa, kopioi ja liitä" -osaan ja etsi "Lisää/liitä kuva nimellä" -vaihtoehto.
4. Napsauta avattavaa painiketta valitaksesi kääreen tyylin.
5. Viimeisenä mutta ei vähäisimpänä, napsauta "OK" tallentaaksesi uuden asetuksen.

Kaikki jatkossa lisätyt kuvat ovat kelluvaa kääritystä.

Tapa 3: Muuta useiden kuvien rivitystyyliä VBA:n kautta

1. Aloita painamalla "Alt + F11" käynnistääksesi VBA-editorin.
2. Siirry seuraavaksi "Normaali" -projektiin napsauttamalla "Normaali".
3. Napsauta sitten valikkorivin "Lisää" -välilehteä ja valitse avattavasta valikosta "Moduuli".
4. Kaksoisnapsauta nyt uutta moduulia tuodaksesi esiin koodaustilan editorin oikealla puolella.
5. Liitä sinne alla oleva 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. Napsauta lopuksi "Suorita" tai paina "F5".

Huomautuksia:

Tämä makro muuttaa kaikki aktiivisen asiakirjan upotetut kuvat kelluviksi ja asettaa ne "tekstin takana" -tyyliin. Jos haluat muotoilla ne toisella tyylillä, muuta vain vakio koodirivillä "Selection.ShapeRange.WrapFormat.Type = wdWrapBehind". Tarkemman luettelon löydät tästä linkistä: https://docs.microsoft.com/en-us/office/vba/api/Word.WdWrapType

Varmuuskopiot ovat tärkeitä

Kuten sanottu, unssi ehkäisyä on kilon parannuskeino arvoinen. Vaikka voimme löytää tapoja pelastaa tiedostoja sen jälkeen Sanan korruptio, se tuntuu aina liian myöhäiseltä. Ihanteellisinta on tietenkin tehdä ennaltaehkäiseviä toimenpiteitä, kuten ottaa varmuuskopioita. Niiden avulla voit suorittaa toimia mukavammin murehtimatta tietojen menettämisestä.

Tekijän esittely:

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