2 Priemonės, kaip pakeisti visų lentelių dydį, kad jos atitiktų turinį arba langą jūsų Outlook el.

Kurdami el. laišką, kuriame yra daug lentelių pranešimo tekste, jei norite pakeisti visų lentelių dydį, kad jos atitiktų turinį arba dabartinį langą, galite naudoti šiame straipsnyje bendrinamus metodus.

El. laiške sukūrę kelias lenteles, kad el. laiškų turinys būtų suderintas ir tvarkingas, galite tikėtis pakeisti visų lentelių dydį, kad jos atitiktų turinį arba dabartinį pranešimo langą. Tokiu atveju, jei yra tik dvi ar trys lentelės, galite tiesiog naudoti įmontuotą „AutoFit“ lentelių funkciją, kad po vieną pakeistumėte jų dydį, kaip nurodyta toliau pateiktame 1 metode. Bet jei yra kelios lentelės, geriau naudoti 2 metodą, kuris naudoja VBA kodą, kad lengvai įgyvendintų partijos dydžio keitimą.

1 būdas: pakeiskite lentelių dydį po vieną naudodami „AutoFit“ funkciją

1. Pirmiausia atidarytame el. laiške užveskite žymeklį virš lentelės.
2. Tada spustelėkite kryžiaus piktogramą kairiajame viršutiniame lentelės kampe, kad ją pasirinktumėte.
3. Tada eikite į skirtuką „Išdėstymas“, esantį juostelėje „Lentelės įrankiai“.
4. Čia raskite ir pasirinkite parinktį „AutoFit“.
5. Dabar pagal savo poreikius pasirinkite „AutoFit Contents“ arba „AutoFit Window“. Toliau pateiktoje ekrano kopijoje parodytas pavyzdžio rezultatas – „Automatinis pritaikymas langui“.
6. Iš karto pasirinkta lentelė pritaikoma prie lango.
7. Po to galite naudoti šį būdą, norėdami pakeisti kitų lentelių dydį po vieną.

2 būdas: paketinio dydžio keitimas naudojant Outlook VBA

1. Iš pradžių laikykite el. laišką atidarytą.
2. Tada suaktyvinkite „Outlook VBA“ redaktorių naudodami „Alt + F11“.
3. Tada į modulį arba projektą įdėkite šį VBA kodą.

Sub ResizeAllTables_FitContentsOrWindow()
    Dim objMail As Outlook.MailItem
    Dim objMailDocument As Word.Document
    Dim objTables As Word.Tables
    Dim i As Integer
    Dim objTable As Word.Table
 
    Set objMail = Outlook.Application.ActiveInspector.CurrentItem
    Set objMailDocument = objMail.GetInspector.WordEditor
    Set objTables = objMailDocument.Tables
 
    If objTables.Count > 0 Then
       For i = 1 To objTables.Count
           Set objTable = objTables.Item(i)
 
           'Fit the window
           objTable.AutoFitBehavior wdAutoFitWindow
 
           'Fit the contents, use the following line instead
           'objTable.AutoFitBehavior wdAutoFitContent
       Next
    End If
End Sub

4. Tada tiesiogiai paspauskite „F5“ klavišą, kad paleistumėte šią makrokomandą.
5. Baigę makrokomandą, grįžkite į el. laišką. Pamatysite, kad visų lentelių dydis buvo pakeistas, kad automatiškai tilptų pranešimų lange.

Išspręskite „Outlook“ problemas naudodami „Agility“.

Yra žinoma, kad vartotojai gali susidurti su įvairiomis „Outlook“ problemomis, tokiomis kaip dažni klaidų pranešimai, staigus įstrigimas ir staigus automatinis atkūrimas.tartingų, katastrofiškų duomenų failų sugadinimo ir pan. Atitinkami sprendimai turėtų skirtis priklausomai nuo problemų rūšies. Pavyzdžiui, norėdami ištaisyti mažas klaidas, galite tiesiog panaudoti gautųjų taisymo įrankį. Tačiau iškilus rimtoms problemoms, pvz., problemoms su PST failais, turėtumėte kreiptis į patikimą ir gerai patikrintą išorinį taisymo įrankį, pvz. DataNumen Outlook Repair į pataisyti PST failas.

Autoriaus įvadas:

Shirley Zhang yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant sql taisymas ir „Outlook“ taisymo programinės įrangos produktai. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com