2 phương tiện thay đổi kích thước hàng loạt tất cả các bảng để vừa với nội dung hoặc cửa sổ trong email Outlook của bạn

Chia sẻ ngay bây giờ:

Khi soạn một email chứa nhiều bảng trong nội dung thư, nếu bạn muốn thay đổi kích thước hàng loạt tất cả các bảng để vừa với nội dung hoặc cửa sổ hiện tại, bạn có thể sử dụng các phương pháp được chia sẻ trong bài viết này.

Sau khi tạo một số bảng trong email, để làm cho nội dung email được căn chỉnh và có trật tự, bạn có thể hy vọng thay đổi kích thước tất cả các bảng để vừa với nội dung hoặc cửa sổ thư hiện tại. Trong trường hợp này, nếu chỉ có hai hoặc ba bảng, bạn chỉ cần sử dụng tính năng bảng “AutoFit” dựng sẵn để thay đổi kích thước từng bảng một, như được giới thiệu trong Phương pháp 1 sau đây. Tuy nhiên, nếu có nhiều bảng, bạn tốt hơn nên sử dụng Phương pháp 2, sử dụng mã VBA để dễ dàng nhận ra “Thay đổi kích thước hàng loạt”.

Phương pháp 1: Thay đổi kích thước từng bảng thông qua tính năng “AutoFit”

  1. Trước hết, trong email đang mở, hãy đặt con trỏ lên một bảng.
  2. Sau đó, nhấp vào biểu tượng chữ thập ở góc trên bên trái của bảng để chọn.
  3. Tiếp theo, truy cập tab “Bố cục” trong dải băng “Công cụ bảng”.
  4. Tại đây, tìm và chọn tùy chọn “AutoFit”.
  5. Bây giờ, hãy chọn “Nội dung tự động khớp” hoặc “Cửa sổ tự động khớp” theo nhu cầu của bạn. Ảnh chụp màn hình sau đây hiển thị kết quả của ví dụ – “Cửa sổ AutoFit”.Cửa sổ AutoFit
  6. Ngay lập tức, bảng đã chọn vừa khít với cửa sổ.Thay đổi kích thước bảng để vừa với cửa sổ
  7. Sau đó, bạn có thể sử dụng cách này để thay đổi kích thước từng bảng khác.

Phương pháp 2: Thay đổi kích thước hàng loạt bằng Outlook VBA

  1. Lúc đầu, hãy giữ email mở.
  2. Sau đó, kích hoạt trình soạn thảo Outlook VBA thông qua “Alt + F11”.
  3. Tiếp theo, đặt mã VBA sau vào mô-đun hoặc dự án.
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

Mã VBA - Thay đổi kích thước hàng loạt tất cả các bảng để vừa với nội dung hoặc cửa sổ

  1. Sau đó, nhấn trực tiếp nút phím “F5” để chạy macro này.
  2. Khi macro kết thúc, hãy quay lại email. Bạn sẽ thấy rằng tất cả các bảng đã được thay đổi kích thước để tự động vừa với cửa sổ thông báo.Tất cả các bảng được thay đổi kích thước để vừa với cửa sổ

Xử lý các sự cố về Outlook một cách linh hoạt

Ai cũng biết rằng người dùng có thể gặp phải nhiều vấn đề khác nhau trong Outlook, chẳng hạn như các thông báo lỗi thường gặp, bị treo đột ngột và tự động khởi động lại, lỗi nghiêm trọng về dữ liệu, v.v. Các giải pháp tương ứng sẽ khác nhau tùy thuộc vào loại sự cố. Ví dụ, để khắc phục các lỗi nhỏ, bạn chỉ cần sử dụng công cụ sửa chữa hộp thư đến. Nhưng, trong trường hợp các sự cố nghiêm trọng, chẳng hạn như sự cố với các tệp PST, bạn nên sử dụng một công cụ sửa chữa bên ngoài mạnh mẽ và đã được kiểm chứng, chẳng hạn như... DataNumen Outlook Repair đến sửa PST tập tin.

Giới thiệu tác giả:

Shirley Zhang là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm sửa lỗi sql và các sản phẩm phần mềm sửa chữa triển vọng. Để biết thêm thông tin, hãy truy cập www.datanumennăm

Chia sẻ ngay bây giờ:

Được đóng lại.