Kur hartoni një email që përmban shumë tabela në trupin e mesazhit, nëse dëshironi të ndryshoni madhësinë e të gjitha tabelave në grup për t'iu përshtatur përmbajtjes ose dritares aktuale, mund të përdorni metodat e përbashkëta në këtë artikull.
Pas krijimit të disa tabelave në një email, në mënyrë që përmbajtja e email-it të jetë në linjë dhe e rregullt, mund të shpresoni të ndryshoni madhësinë e të gjitha tabelave për t'iu përshtatur përmbajtjes ose dritares aktuale të mesazhit. Në këtë rast, nëse ka vetëm dy ose tre tabela, mund të përdorni veçorinë e integruar të tabelës "AutoFit" për t'i ndryshuar madhësinë e tyre një nga një, siç paraqitet në Metoda 1 në vijim. Por, nëse ka shumë tabela, ju do të ishte më mirë të përdorni Metodën 2, e cila përdor kodin VBA për të realizuar lehtësisht "Resize Batch".
Metoda 1: Ndryshimi i madhësisë së tabelave një nga një nëpërmjet funksionit "AutoFit".
- Para së gjithash, në emailin e hapur, vendoseni kursorin mbi një tabelë.
- Pastaj, klikoni ikonën kryq në këndin e sipërm të majtë të tabelës për ta zgjedhur atë.
- Më pas, hyni në skedën "Layout" në shiritin "Mjetet e tabelës".
- Këtu, gjeni dhe zgjidhni opsionin "AutoFit".
- Tani, zgjidhni "Përmbajtja AutoFit" ose "Dritarja AutoFit" sipas nevojave tuaja. Pamja e mëposhtme e ekranit tregon rezultatin e shembullit - "Dritarja AutoFit".

- Menjëherë, tabela e zgjedhur përshtatet në dritare.
- Pas kësaj, mund ta përdorni këtë mënyrë për të ndryshuar madhësinë e tabelave të tjera një nga një.
Metoda 2: Ndryshimi i madhësisë së grupit me Outlook VBA
- Në fillim, mbajeni emailin të hapur.
- Më pas, aktivizoni redaktorin VBA të Outlook përmes "Alt + F11".
- Më pas, vendosni kodin e mëposhtëm VBA në një modul ose projekt.
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
- Pastaj, shtypni drejtpërdrejt butonin "F5" për të ekzekutuar këtë makro.
- Kur makro të përfundojë, kthehu në email. Do të zbuloni se të gjitha tabelat janë ndryshuar përmasat që të përshtaten automatikisht me dritaren e mesazhit.
Trajto problemet e Outlook me shkathtësi
Dihet që përdoruesit mund të përjetojnë probleme të ndryshme në Outlook, si mesazhet e zakonshme të gabimit, ngecjet e papritura dhe përgjigjet automatike të paprituratarting, korrupsioni katastrofik i skedarëve të të dhënave dhe kështu me radhë. Zgjidhjet përkatëse duhet të ndryshojnë sipas llojit të çështjeve. Për shembull, për të rregulluar gabime të vogla, thjesht mund të përdorni mjetin e riparimit të kutisë hyrëse. Por, në rast të problemeve serioze, siç janë problemet me skedarët PST, duhet të përdorni një mjet riparimi të jashtëm të fuqishëm dhe të mirë-provuar, si p.sh. DataNumen Outlook Repair në rregulloni PST fotografi.
Hyrje e autorit:
Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë rregullim sql dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com


