2 Mijloace de a redimensiona în lot toate tabelele pentru a se potrivi conținutului sau ferestrei din e-mailul Outlook

Când compuneți un e-mail care conține multe tabele în corpul mesajului, dacă doriți să redimensionați în lot toate tabelele pentru a se potrivi conținutului sau ferestrei curente, puteți utiliza metodele partajate în acest articol.

După ce ați creat mai multe tabele într-un e-mail, pentru a face conținutul e-mailului aliniat și ordonat, puteți spera să redimensionați toate tabelele pentru a se potrivi cu conținutul sau fereastra curentă a mesajului. În acest caz, dacă există doar două sau trei tabele, puteți utiliza doar funcția încorporată „AutoFit” pentru a le redimensiona unul câte unul, așa cum este introdus în următoarea Metodă 1. Dar, dacă există mai multe tabele, ar fi mai bine să folosiți Metoda 2, care folosește codul VBA pentru a realiza cu ușurință „Redimensionarea lotului”.

Metoda 1: Redimensionați tabelele unul câte unul prin funcția „AutoFit”.

1. În primul rând, în e-mailul deschis, plasați cursorul peste un tabel.
2. Apoi, faceți clic pe pictograma cruce din colțul din stânga sus al tabelului pentru a o selecta.
3. Apoi, accesați fila „Aspect” din panglica „Instrumente pentru tabel”.
4. Aici, găsiți și selectați opțiunea „AutoFit”.
5. Acum, selectați „AutoFit Contents” sau „AutoFit Window” în funcție de nevoile dvs. Următoarea captură de ecran arată rezultatul exemplului – „AutoFit Window”.
6. Imediat, tabelul selectat este potrivit pentru fereastră.
7. După aceea, puteți utiliza acest mod pentru a redimensiona celelalte tabele unul câte unul.

Metoda 2: Redimensionarea lotului cu Outlook VBA

1. La început, păstrați e-mailul deschis.
2. Ulterior, declanșați editorul Outlook VBA prin „Alt + F11”.
3. Apoi, introduceți următorul cod VBA într-un modul sau proiect.

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. Apoi, apăsați direct butonul „F5” pentru a rula această macrocomandă.
5. Când macrocomanda se termină, reveniți la e-mail. Veți descoperi că toate tabelele au fost redimensionate pentru a se potrivi automat în fereastra de mesaje.

Gestionați problemele Outlook cu agilitate

Se știe că utilizatorii pot întâmpina diverse probleme în Outlook, cum ar fi mesaje de eroare comune, blocaje bruște și reporniri automate bruște, coruperea catastrofală a fișierelor de date și așa mai departe. Soluțiile corespunzătoare ar trebui să varieze în funcție de tipul de probleme. De exemplu, pentru a remedia erori minore, puteți utiliza pur și simplu instrumentul de reparare a inbox-ului. Dar, în cazul unor probleme grave, cum ar fi problemele cu fișierele PST, ar trebui să apelați la un instrument extern de reparare robust și bine testat, cum ar fi DataNumen Outlook Repair la reparați PST fișier.

Introducerea autorului:

Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv remediere sql și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com