Tự động điều chỉnh các cột Excel bằng VBScript cho vừa khít

Lưu ý

Các luồng trên máy tính cung cấp hành động Thay đổi kích thước cột/hàng trong trang tính Excel để tạo điều kiện thuận lợi cho việc thay đổi kích thước các cột và hàng Excel. Bài viết này trình bày một cách khác để thay đổi kích thước các cột và hàng Excel bằng cách sử dụng tập lệnh.

Tính năng tự động điều chỉnh trong Excel cho phép người dùng thay đổi kích thước các ô trong bảng tính để chứa dữ liệu có kích thước khác nhau mà không cần thay đổi chiều rộng cột và chiều cao hàng theo cách thủ công.

Để tự động điều chỉnh các cột Excel bằng cách sử dụng tập lệnh trong Power Automate:

1. Sử dụng hành động Đặt biến để tạo một biến mới chứa đường dẫn của tệp Excel mà bạn muốn thao tác. Trong ví dụ này, biến có tên ExcelFile.

   

2. Triển khai hành động Chạy VBScript và điền mã sau đây. Trước khi chạy quy trình, hãy thay thế phần giữ chỗ SheetName bằng tên của trang tính mà bạn muốn tự động điều chỉnh hoặc một biến chứa trang tính đó.

   'Opens the Excel file'
   Set objExcel = CreateObject("Excel.Application")
   Set objWorkbook = objExcel.Workbooks.Open("%ExcelFile%")
   objExcel.Application.Visible = True
   
   'Selects the specified sheet'
   Set objSheet = objWorkbook.Sheets("SheetName")
   
   'Autofits the columns of the sheet'S
   for col=1 to 19
   objSheet.columns(col).AutoFit()
   next
   
   'Saves and closes the Excel file'
   objWorkbook.Save
   objWorkbook.Close SaveChanges = True