2 načina za primjenu istog stila na sve tablice u vašem Word dokumentu

U ovom postu pogledat ćemo 2 korisna načina za primjenu istog stila na sve tablice u vašem Word dokumentu.

S vremena na vrijeme trebamo izraditi tablice u Word dokumentu kako bismo smjestili i rasporedili razne podatke. A ako postoji više tablica, bilo bi bolje na njih primijeniti isti stil kako bi datoteka izgledala profesionalnije. Iz tog razloga, u narednim tekstovima želimo vam predstaviti 2 metode.

Metoda 1: Primijenite isti stil na stol pojedinačno

Nakon što umetnete tablicu u dokument, postavite kursor unutar tablice da biste otvorili karticu "Alati za tablice". Zatim kliknite "Dizajn" i odaberite stil tablice u biblioteci "Stilovi tablica".

Međutim, u slučaju da možda želite novi stil za svoje stolove, možete prilagoditi novi slijedeći korake koji slijede.

1. Najprije kliknite gumb "Više" u grupi "Stilovi tablice".
2. Zatim odaberite "Novi stil tablice".
3. Sada u dijaloškom okviru "Stvori novi stil iz oblikovanja" prvo imenujte novi stil.
4. Zatim postavite formatiranje kao što su font, veličina fonta, obrubi, boja ispune itd.
5. I odaberite opciju "Novi dokumenti na temelju ovog predloška".
6. Na kraju kliknite "OK".

Ako želite oblikovati predložak tablice na jedinstveniji način, bacite pogled na ovaj članak: 2 metode za izmjenu boja redaka ili stupaca u vašoj Word tablici

Metoda 2: Manipulirajte tablicama u skupinama

U metodi 2, imamo makro za odabir svih postojećih tablica u aktivnom dokumentu. Nakon što su tablice odabrane, možete primijeniti bilo koji stil za njih u serijama.

1. Najprije kliknite karticu "Razvojni programer" na vrpci.
2. Zatim kliknite "Visual Basic" da pokrenete VBA editor.
3. Zatim umetnite novi modul klikom na "Normalno", a zatim na "Umetni".
4. Na padajućem izborniku odaberite "Modul".
5. Dvaput kliknite novi modul za otvaranje područja kodiranja i zalijepite kodove:

'Select all tables in a Word document.
Sub SelectAllTables()
  Dim objDoc As Document
  Dim objTable As Table
 
  Application.ScreenUpdating = False
 
  'Initialization
  Set objDoc = ActiveDocument
 
  'Set each table in document as a range editable to everyone.
  With objDoc
  For Each objTable In .Tables
    objTable.Range.Editors.Add wdEditorEveryone
  Next
  objDoc.SelectAllEditableRanges wdEditorEveryone
  objDoc.DeleteAllEditableRanges wdEditorEveryone
  Application.ScreenUpdating = True
  End With
End Sub

6. Na kraju pritisnite gumb "Pokreni".

Sada će svi stolovi već biti odabrani. Možete primijeniti ugrađeni ili novostvoreni stil na sve tablice u trenutnom dokumentu.

Nosite se s gubitkom Word podataka

Gubitak kritičnih podataka može biti propast digitalnog života ljudi. Ono što je sarkastično jest da žalimo tek nakon što je učinjeno ono što je učinjeno. Budući da nema koristi od tugovanja za gubitkom, predlažemo da nabavite alat za to oporaviti grešku Word docx dokumenta čim prije.

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 Excel xls proizvod za oporavak i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com