Tự động Wrap text và Fixed Row height

[Vo Duy Minh]

Chào các bạn
Nhờ các bạn giúp giùm một lệnh VBA để có thể tự động fixed row height với các merged cells
Tôi có làm Add-in cho nó như trong file đính kèm (sheet 3) khi trích xuất dữ liệu từ sheet "Source". Nhưng với các merged cells thì chịu thua (sheet 2).
Tôi gửi kèm file để các bạn dễ nắm vấn đề.
Từ source ở sheet "Source", tôi muốn khi dữ liệu trích xuất sang sheet khác (theo hảm Index - Match) thì vẫn tự động Wrap text và Autofixed Row height cho dù cell được merged như trong sheet 2 của file đính kèm.
Xin cám ơn các bạn trước.

 

[tam888]

Chào các bạn
Nhờ các bạn giúp giùm một lệnh VBA để có thể tự động fixed row height với các merged cells
Tôi có làm Add-in cho nó như trong file đính kèm (sheet 3) khi trích xuất dữ liệu từ sheet "Source". Nhưng với các merged cells thì chịu thua (sheet 2).
Tôi gửi kèm file để các bạn dễ nắm vấn đề.
Từ source ở sheet "Source", tôi muốn khi dữ liệu trích xuất sang sheet khác (theo hảm Index - Match) thì vẫn tự động Wrap text và Autofixed Row height cho dù cell được merged như trong sheet 2 của file đính kèm.
Xin cám ơn các bạn trước.

Không nên merged cells , đó là điều nên tránh khi trình bày bảng tính (nếu ta muốn tránh rắc rối sau này)
Trừ phi đó là bảng tính báo cáo (report) cuối cùng, xuất ra máy in - và cũng chỉ nên merged ở 1 hàng/cột tiêu đề

vì bạn đã biết code và sử dụng addins, nên lời khuyên là : xem lại code, code nên tổng quát quét chọn toàn vùng và xét toàn diện hơn đến nội dung ô và format của nó. Cũng như nghĩ tới phương án bấm shortcut keys (phím tắt) nào đó để được bảng tính như ý, thay vì cứ yêu cầu tự động.

song, nên tránh merged và hạn chế wraptext

 

[Vo Duy Minh]

Rất cám ơn bạn "tam88" đã phản hồi.
Vụ merged cells thì cũng đã lỡ rồi, bây giờ soạn lại thì mất nhiều thời gian quá. Tuy nhiên tôi cũng tìm được cách giải quyết là mở thêm một cột phụ, sau đó chuyển dữ liệu qua cột chính rồi dấu đi cột phụ. Tôi thấy cũng ổn, đỡ công hơn là viết lại quá nhiều.