Blog

cách cho chữ tự xuống dòng trong excel | RoadKill Wiki

24
cách cho chữ tự xuống dòng trong excel | RoadKill Wiki

Trong quá trình làm việc với file Excel khi bạn gõ nội dung cho 1 ô có nội dung dài thường các chữ sẽ không tự động xuống dòng mà bị viết tràn sang cột bên cạnh. Bài viết dưới đây hướng dẫn tới các bạn cách để chữ tự động xuống dòng trong Excel – Tự động xuống dòng khi hết chiều rộng của cột trong Excel.

Ví dụ khi gõ dòng chữ vào ô C3 vượt quá độ rộng của cột do vậy chữ bị che lấp và không được hiển thị:

Bạn đang xem: cách cho chữ tự xuống dòng trong excel

Khi gõ dòng chữ vào ô C3 vượt quá độ rộng của cột

1. Với ô là 1 ô nguyên bản (không hòa nhập các ô của cột hoặc dòng khác làm 1) thực hiện rất đơn giản:

– Lựa chọn ô muốn chữ tự động xuống dòng khi hết chiều rộng của cột -> vào thẻ Home -> Alignment -> lựa chọn tính năng Wrap Text:

Vào thẻ Home - Alignment - lựa chọn tính năng Wrap Text

Xem thêm: [BẬT MÍ] Cách vẽ sơ đồ trong Word đơn giản và nhanh gọn

– Sau khi lựa chọn xong Wrap Text -> nội dung chữ trong ô tự động xuống dòng khi hết chiều rộng của cột:

Nội dung chữ trong ô tự động xuống dòng khi hết chiều rộng của cột

2. Với ô dữ liệu được gộp từ nhiều ô

– Trường hợp với ô Excel được gộp từ nhiều ô khác nếu sử dụng tính năng Wrap Text nội dung chữ có xuống dòng khi hết độ rộng cột nhưng chiều cao của ô không thay đổi do vậy chữ vẫn bị che lấp. Ví dụ khi gộp ô B4 và ô C4 thành 1 ô sau khi nhập xong nội dung lựa chọn tính năng Wrap Text chữ không tự động xuống dòng khi hết chiều rộng của cột:

Trường hợp với ô Excel được gộp từ nhiều ô khác nếu sử dụng tính năng Wrap Text

– Với trường hợp này (các ô được gộp từ nhiều ô khác) bạn cần phải sử dụng thêm mã lệnh sau khi lựa chọn tính năng Wrap Text:

Xem thêm: mơ thấy số 10 đánh con gì | RoadKill Wiki

+ Lựa chọn file Excel muốn chữ tự động xuống dòng khi hết chiều rộng của cột -> nhấn tổ hợp phím Alt + F11 để vào cửa sổ lệnh -> copy đoạn mã sau cho sự kiện Change của worksheet:

Private Sub Worksheet_Change(ByVal Target As Range) Dim NewRwHt As Single Dim cWdth As Single, MrgeWdth As Single Dim c As Range, cc As Range Dim ma As Range With Target If .MergeCells And .WrapText Then Set c = roadkillwiki.orgs(1, 1) cWdth = c.ColumnWidth Set ma = c.MergeArea For Each cc In ma.Cells MrgeWdth = MrgeWdth + cc.ColumnWidth Next roadkillwiki.orgenUpdating = False ma.MergeCells = False c.ColumnWidth = MrgeWdth roadkillwiki.orgFit NewRwHt = c.RowHeight c.ColumnWidth = cWdth ma.MergeCells = True ma.RowHeight = NewRwHt cWdth = 0: MrgeWdth = 0 roadkillwiki.orgenUpdating = True End If End With End Sub Nhấn tổ hợp phím Alt + F11 để vào cửa sổ lệnh

+ Sau khi gõ đoạn mã lệnh trên thực hiện lưu và thoát khỏi VBA, quay trở lại file Excel nhập lại nội dung cho ô vừa tạo nội dung chữ tự động xuống dòng khi hết chiều rộng của cột và chiều cao của ô được thay đổi, nội dung chữ không bị che lấp:

Nội dung chữ tự động xuống dòng khi hết chiều rộng của cột

Trên đây là hướng dẫn chi tiết cách để chữ tự động xuống dòng trong Excel – Tự động xuống dòng khi hết chiều rộng của cột trong Excel phiên bản 2016. Chúc các bạn thành công!

Danh mục: Blog
Nguồn: https://roadkillwiki.org

0 ( 0 votes )

RoadKill Wiki

https://roadkillwiki.org
RoadKill Wiki là Cẩm Nang Wiki Blog Tổng Hợp Thông Tin Đầy Đủ Chính Xác Nhất

Readers' opinions (0)

Leave a Reply

Your email address will not be published. Required fields are marked *

Bài Viết Liên Quan