2 greiti būdai, kaip automatiškai pritaikyti lenteles prie turinio ar puslapio „Word“ dokumente

Šis straipsnis apkarpytas, kad būtų pateikti 2 greiti ir lengvai valdomi būdai, kaip automatiškai pritaikyti lenteles prie turinio arba puslapio „Word“ dokumente.

Lentelės įterpimas duomenims laikyti dabar neišvengiamas naudojant „Word“. Dažniausiai mes neapsiribojame vien lentelės turėjimu, bet stengiamės, kad ji puikiai atrodytų dokumente. Tai reiškia, kad turėsime atitinkamai pakoreguoti stalo dydį.

Dabar pirmiausia pažvelkime į atvejus, kai turime pakeisti lentelės dydį:

1. Gana dažnai reikia įterpti naują puslapį gulsčioje padėtyje. Tada jūsų iš pradžių tobula lentelė naujoje puslapio sąrankoje gali būti per maža.
2. Lentelės langelių dydį ketinama keisti pagal žodžių skaičius. Tai visiškai pakenks dokumento perspektyvai.

Žr. Toliau pateiktą pavyzdį:

Tada pereikime prie šiandienos reikalo ir pristatysime du sprendimus.

1 būdas: keiskite rankiniu būdu

1. Visų pirma, spustelėkite, kad pasirinktumėte visą lentelę.
2. Tada spustelėkite skirtuką „Išdėstymas“, esantį „Lentelės įrankiai“.
3. Tada eikite į grupę „Ląstelės dydis“ ir spustelėkite „AutoFit“.
4. Ir išskleidžiamajame meniu atitinkamai pasirinkite, ko jums reikia, pvz., „Automatiškai pritaikyti turinį“ arba „Automatiškai pritaikyti langą“. Pirmasis reiškia lentelės dydžio keitimą pagal turinio dydį, o antrasis reiškia lentelės dydžio pakeitimą dėl puslapio sąrankos.

Štai ką galite gauti:

Kaip matote, šis metodas geriausiai veikia, kai reikia tvarkyti tik kelias lenteles. Tačiau kai yra daug lentelių, imkimės protingesnio ir greitesnio būdo.

2 būdas: naudokite VBA kodus, kad tai padarytumėte paketu

1. Pirmiausia įsitikinkite, kad juostelėje yra skirtukas „Kūrėjas“, ir spustelėkite jį. Jei ne, spustelėkite čia ir pereikite prie šio straipsnio: Kaip įterpti foninę muziką į savo Word dokumentą
2. Tada spustelėkite „Visual Basic“ grupėje „Kodas“, kad atidarytumėte VBA redaktorių.
3. Kairiojoje srityje „Projektas“ raskite projektą su dokumento pavadinimu. Ir spustelėkite „Šis dokumentas“.
4. Tada įrankių juostoje spustelėkite „Įterpti“.
5. Ir sąraše pasirinkite „Modulis“.
6. Dabar redagavimo sritis išsiplės dešinėje pusėje. Jei norite automatiškai pritaikyti lenteles pagal turinį, įklijuokite šiuos kodus:

Private Sub AutoFitContentsForAllTables()
  If ActiveDocument.Tables.Count > 0 Then
    Dim objTable As Object

    Application.Browser.Target = wdBrowseTable
    For Each objTable In ActiveDocument.Tables
      objTable.AutoFitBehavior (wdAutoFitContent)
    Next
  End If
End Sub

7. Arba jei jums reikia automatiškai pritaikyti lenteles pagal lango plotį, toliau pateikti kodai bus naudingi:

Private Sub AutoFitWindowForAllTables()
  If ActiveDocument.Tables.Count > 0 Then
    Dim objTable As Object

    Application.Browser.Target = wdBrowseTable
    For Each objTable In ActiveDocument.Tables
      objTable.AutoFitBehavior (wdAutoFitWindow)
    Next
  End If
End Sub

8. Baigę ten, tiesiog spustelėkite „Vykdyti“.

Rūpinkitės savo informacija

Paprastai jūsų skaitmeniniuose įrenginiuose saugoma šimtai tūkstančių nepakeičiamos informacijos. Tiesą sakant, tinkamai tvarkyti kiekvieną jų dalį yra gana varginantis procesas. Vienas iš būdų, kaip tai padaryti be didelių išlaidų, yra atsarginių kopijų kūrimas. Tai padeda užtikrinti šių failų saugumą. Tačiau negalima suteikti jokių garantijų. Pavyzdžiui, „Word“, kurį naudojame beveik kasdien, gali staiga nustoti veikti. Tokiu atveju jums reikės įrankio, kuris... atkurti sugadintą Word.

Autoriaus įvadas:

Vera Chen yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant sugadintas Excel taisymo įrankis bei pdf programinės įrangos gaminių taisymas. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com