2014-06-05 29 views
5

Tôi có một bảng Excel trống được lưu làm mẫu mà tôi sao chép dữ liệu từ khay nhớ tạm (bắt nguồn từ trang web).Excel/VBA: tự động điều chỉnh chiều rộng cột sau khi dán dữ liệu

Có cách nào sử dụng VBA để tự động điều chỉnh chiều rộng của mỗi cột thành nội dung của nó sau khi dữ liệu (văn bản) đã được dán không?

Chỉnh sửa: Dữ liệu tôi dán sẽ luôn được chèn bắt đầu từ A1 và sẽ luôn điền cùng một số cột.

Rất cám ơn trước, Tim.

+1

Có bạn có thể. Hãy thử ghi lại một macro trong khi thực hiện nó sẽ cho bạn một ví dụ. – Gareth

+0

Cảm ơn. Chỉ cần tìm ra nó là tốt. :) Làm cách nào để kích hoạt macro để macro chạy sau khi tôi dán dữ liệu của mình? – user2571510

Trả lời

14

Bạn có thể làm điều đó bằng tính năng Tự động điền. Như thế này

Columns("A:B").Select 

Selection.EntireColumn.AutoFit 
+0

Cảm ơn! Vâng, đó là những gì tôi vừa thấy. :) Làm cách nào để kích hoạt macro để macro chạy sau khi tôi dán dữ liệu của mình? – user2571510

+0

Có, không vấn đề gì nhưng ý tôi là, có cách nào để tự động chạy macro sau khi dán bằng cách sử dụng một cái gì đó như sự kiện onchange hoặc onpaste? – user2571510

+1

@ user2571510 Bạn có thể tạo nút và luôn luôn nếu bạn nhấn nút, macro sẽ bắt đầu. Đây là một ví dụ: http://www.mrexcel.com/tip068.shtml Đó có phải là những gì bạn cần không? :) – InformatikBabo

6

Bạn có thể thực hiện như sau:

Columns("A").Autofit 
+0

Tốt hơn câu trả lời được chấp nhận vì nó không liên quan đến việc sử dụng (hiệu suất giết chết) Chọn –

Các vấn đề liên quan