3 učinkovita načina za uklanjanje neželjenih razmaka u ćelijama tablice u vašem Word dokumentu

U sljedećem članku želimo vam ponuditi 3 učinkovita načina za uklanjanje neželjenih razmaka u ćelijama tablice u vašem Word dokumentu.

S vremena na vrijeme moramo umetnuti tablicu za držanje tekstova i podataka. Ali često moramo prilagoditi veličinu tablice nakon unosa teksta i podataka. Ponekad ćemo nakon podešavanja veličine dobiti tablicu s neželjenim razmacima u ćelijama, kao što je prikazano u nastavku:

U gornjem primjeru ispod teksta u svakoj ćeliji postoji prazan redak. Ali ne možemo ga se riješiti jednostavnim pritiskom na "Delete". Umjesto toga, moramo koristiti druga rješenja.

Metoda 1: Ručno suzite visinu retka

1. Prvo i najvažnije, provjerite ima li u ćelijama praznih redaka koje je moguće ukloniti. Ako ih ima, prvo ih izbrišite.
2. Zatim postavite pokazivač iznad donje linije reda tablice. Pričekajte dok se kursor ne promijeni u znak dvostrukih vodoravnih linija s 2 strelice.
3. Zatim kliknite i povucite donji red prema gore dok neželjeni prostor ne nestane.
4. Ponovite korake 2 i 3 za druge retke u tablici čijoj visini treba promijeniti veličinu.

Evo rezultata:

Metoda 2: Onemogućite funkciju "Navedite visinu".

1. Najprije kliknite na križić u gornjem lijevom kutu kako biste odabrali cijelu tablicu.
2. Zatim desnom tipkom miša kliknite i odaberite "Svojstva tablice".
3. U okviru "Svojstva tablice". Prvo kliknite karticu "Red".
4. Zatim poništite okvir "Navedite visinu".
5. Na kraju kliknite "OK".

Učinak je isti kao u metodi 1.

Metoda 3: Koristite Word Macro

1. Za početak kliknite "Programer", a zatim "Visual Basic" da biste otvorili VBA editor. Ako kartica "Programer" nije dostupna na vrpci, umjesto nje pritisnite "Alt+ F11".
2. Zatim idite na stvaranje novog modula. Kliknite "Normalno" u lijevom stupcu.
3. Zatim kliknite "Umetni" na traci izbornika.
4. Na padajućem izborniku odaberite "Modul".
5. Zatim dvaput kliknite na modul da biste ga otvorili.
6. Sada zalijepite sljedeće kodove na područje kodiranja:

Sub RemoveSpacesInTables()
  Dim objTable As Table
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  With objDoc
    If .Tables.Count > 0 Then
      For Each objTable In .Tables
        objTable.Select
        Selection.Rows.HeightRule = wdRowHeightAuto
        Selection.Rows.Height = InchesToPoints(0)
      Next objTable
    Else
      MsgBox ("This document contains no table.")
    End If
  End With
End Sub

7. Na kraju kliknite "Pokreni" ili izvršite kodove pritiskom na "F5".

Ova će makronaredba raditi na svim tablicama u dokumentu i uklanjati nepotrebne razmake.

Usporedba 3 metoda

Jednom se dokument kvari

Nije rijetkost da se s vremena na vrijeme dokument ošteti. Međutim, u trenutku kada je vaš dokument oštećen, to je ujedno i vrijeme kada se javlja strah. Stoga, za svaki slučaj, najbrži postupak je nabaviti alat za popravak kako biste popraviti docx kako bi se spriječilo daljnje oštećenje.

Uvod za autora:

Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popraviti Excel i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com