V tomto článku by sme vám radi predstavili 2 spôsoby centrovania všetkých obrázkov a textových polí v dokumente Word.
Obrázky a tvary, ako napríklad textové polia, zohrávajú kľúčovú úlohu pri vytváraní skvelého dokumentu. S rastúcim počtom vkladaných obrázkov a tvarov sa začína objavovať potreba integrovať ich formátovanie, napríklad ich vycentrovať.
Mali by ste vedieť, že všetky obrázky vložené do dokumentu sú nastavené v rozložení „V súlade s textom“, zatiaľ čo textové polia majú plynulé tvary. Podľa potreby môžete zmeniť rozloženie obrázka, ale pri jeho zarovnávaní na stred budete musieť zvážiť zalomenie textu. Pretože s formátovaním textu sa dá ľahko manipulovať, vďaka čomu získate rozloženie, ktoré sa vám nepáči.
Preto sa zameriame na 2 spôsoby, ako vycentrovať obrázky a textové polia v súlade s textom.
Metóda 1: Ručné vycentrovanie jedného obrázka alebo textového poľa
Ak chcete vycentrovať obrázok „V súlade s textom“, postupujte takto:
- Najskôr kliknite na obrázok a vyberte ho.
- Po druhé, kliknite na „Stred“ v skupine „Odsek“ na karte „Domov“. Alebo môžete namiesto toho použiť skratky „Ctrl + E“.
Potom vycentrujte textové pole podľa týchto pokynov:
- Podobne kliknite na textové pole, aby ste ho mali pri výbere.
- Potom kliknite na kartu „Formátovať“ v časti „Nástroje na kreslenie“.
- Ďalej kliknite na „Zarovnať“ v skupine „Usporiadať“.
- V rozbaľovacej ponuke zvoľte možnosť „Zarovnať na stred“.
Metóda 2: Dávkové vycentrovanie viacerých obrázkov alebo textových polí automaticky
Väčšina z nás by uprednostnila automatický proces, aby sa ušetrilo úsilie. Nech sa páči.
- Najskôr stlačte klávesy „Alt + F11“, aby ste otvorili editor VBA.
- Ďalej kliknite na „Normálny“ projekt.
- Kliknite na kartu „Vložiť“ a zvoľte „Modul“.
- Potom dvakrát kliknite na modul, čím sa uvoľní priestor na úpravy na pravej strane.
- Vedľa obrázkov na stred umiestnite nasledujúce kódy:
Sub CenterInLinePictures()
Dim objInLineShape As InlineShape
Dim objDoc As Document
Set objDoc = ActiveDocument
For Each objInLineShape In objDoc.InlineShapes
objInLineShape.Select
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Next objInLineShape
End Sub
Na vycentrovanie všetkých textových polí potrebujete nasledujúce makro:
Sub CenterTextBoxes()
Dim objDoc As Document
Dim objTextBox As Shape
Set objDoc = ActiveDocument
For Each objTextBox In objDoc.Shapes
If objTextBox.Type = msoTextBox Then
objTextBox.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
objTextBox.Left = wdShapeCenter
End If
Next objTextBox
End Sub
Ak chcete vycentrovať obrázky aj textové polia, budete musieť použiť tento:
Sub CenterInLinePicturesAndTextBoxes()
Dim objInLineShape As InlineShape
Dim objShape As Shape
Dim objDoc As Document
Set objDoc = ActiveDocument
For Each objInLineShape In objDoc.InlineShapes
objInLineShape.Select
Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
Next objInLineShape
For Each objShape In objDoc.Shapes
If objShape.Type = msoTextBox Then
objShape.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
objShape.Left = wdShapeCenter
End If
Next objShape
End Sub
- Nakoniec kliknite na tlačidlo „Spustiť“ alebo stlačte kláves „F5“.
Riešte problémy s dokumentom
Bez ohľadu na to, ako neochotne musíme pripustiť, že Word nie je spoľahlivý. Jeho rozpad môže viesť k poškodeniu dokumentov pri zdedení a poškodený docx môže byť pre nás zlomené srdce. Na zmiernenie tejto úzkosti je vhodné sa vopred zmocniť nástroja na obnovenie dokumentu. Potom sa nebudete musieť obávať straty údajov.
Úvod autora:
Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane xlsx korupcia a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S





