Cách giãn dòng trong Excel thủ công, tự động và bằng mã VBA

» Microsoft Office » Cách giãn dòng trong Excel thủ công, tự động và bằng mã VBA

Cách giãn dòng trong Excel, giãn dòng trong Excel là gì, cách giãn dòng trong Excel thủ công, cách giãn dòng trong Excel tự động, cách giãn dòng trong Excel với code.

Contents

Giãn dòng trong Excel là gì?

Nếu thường xuyên làm việc trong Excel, bạn chắc chắn không thể tránh khỏi những trường hợp các dòng trong Excel to nhỏ không đều, từ đó khiến bảng tính vừa không đẹp mắt vừa khó theo dõi. Bên cạnh đó, một số dòng có thể quá nhỏ nên không thể hiển thị đủ dữ liệu, trong khi một số dòng lại quá to so với những dữ liệu cần hiển thị. 

Giãn dòng trong Excel thực chất chính là điều chỉnh lại kích thước của các dòng cho đều nhau hoặc phù hợp với nội dung trong đó để bảng tính trở nên dễ dàng hơn, tạo nên sự chuyên nghiệp nếu bạn cần làm báo cáo.

Trong các phần dưới đây, hãy cùng tìm hiểu về các cách giãn dòng trong Excel hiệu quả nhất hiện nay.

Cách giãn dòng trong Excel thủ công

Cách giãn dòng trong Excel bằng thao tác kéo Row Height

Khi sử dụng Word, chúng ta thường điều chỉnh dòng bằng công cụ Paragraph. Còn đối với Excel, chúng ta sẽ dùng Row Height để căn chỉnh lại.

Bước 1: Trước hết hãy bôi đen toàn bộ các dòng cần điều chỉnh giãn cách bằng cách nhấn giữ chuột vào số thứ tự của những dòng này.

Bước 2: Đặt con trỏ chuột tại vị trí dòng kẻ line cuối cùng trong bảng này, sau đó bạn sẽ thấy xuất hiện mũi tên 2 chiều ở cột ô số thứ tự như trong hình dưới đây.

Bước 3: Click và giữ chuột trái, đồng thời thực hiện di chuyển chuột lên trên hoặc xuống dưới để để tiến hành điều chỉnh lại kích thước của các dòng cho đúng với yêu cầu.

Cách giãn dòng trong Excel bằng cách nhập kích thước Row Height

Ngoài cách giãn dòng trong Excel bằng thao tác với chuột như trên, bạn cũng có thể chủ động nhập vào kích thước muốn thiết lập cho dòng theo hướng dẫn dưới đây:

Bước 1: Trước hết hãy bôi đen toàn bộ các dòng cần điều chỉnh giãn cách bằng cách nhấn giữ chuột vào số thứ tự của những dòng này.

Bước 2: Bấm chuột phải rồi chọn Row Height. Hoặc bạn cũng có thể chuyển sang tab Home trên thanh công cụ.

Bước 3: Trong tab Home, bấm chọn mục Format => chọn Row Height trong bảng bên dưới.

Bước 4: Trong hộp thoại Row Height vừa hiện lên, hãy nhập vào kích thước giãn dòng Excel bạn muốn => cuối cùng chọn OK để áp dụng thiết lập.

Cách giãn dòng trong Excel tự động

Không giống với thao tác giãn dòng bằng Spacing, Line Spacing trong Word, cách giãn dòng trong Excel có thể được thực hiện một cách tự động như sau:

Bước 1: Trước hết hãy bôi đen toàn bộ các dòng cần điều chỉnh giãn cách bằng cách nhấn giữ chuột vào số thứ tự của những dòng này.

Bước 2: Bấm chuyển sang tab Home trên thanh công cụ.

Bước 3: Trong tab Home, tìm và bấm chọn mục Format => chọn mục AutoFit Row Height trong bảng vừa hiện ra ở bên dưới.

Sau bước trên, hệ thống Excel sẽ tự động căn chỉnh giãn dòng để đảm bảo sự phù hợp về bố cục cũng như kích thước cho từng dòng. Cách giãn dòng trong Excel này rất nhanh chóng và hiệu quả, từ đó tiết kiệm thời gian và được người dùng rất ưa thích.

Cách giãn dòng trong Excel với code

Như bạn có thể thấy, các cách giãn dòng trong Excel chúng mình giới thiệu ở trên đều rất đơn giản, tuy nhiên chúng lại có một nhược điểm đó là ngay lập tự bị “vô hiệu hoá” nếu bạn cần điều chỉnh những dòng đã được hợp nhất (merged cells). Trong những trường hợp này, chúng ta cần đến sự trợ giúp của phương pháp code giãn dòng VBA.

Lấy ví dụ chúng ta có các ô đã được hợp nhất và cần điều chỉnh lại kích thước của các dòng + cột để hiển thị được trọn vẹn nội dung.

Cách thực hiện chi tiết như sau:

Bước 1: Sử dụng tổ hợp phím ALT + F11 để mở ra cửa sổ Microsoft Visual Basic for Applications.

Bước 2: Bấm vào Sheet bạn đang cần giãn dòng, cột => trong cửa sổ Module vừa hiện lên, hãy đoạn mã sau vào:

(Đây chính là mã VBA giúp hỗ trợ điều chỉnh chiều cao hàng và dòng của nhiều ô đã được hợp nhất một cách tự động)

Option Explicit

Public Sub AutoFitAll()

Call AutoFitMergedCells(Range(“a1:b2”))

Call AutoFitMergedCells(Range(“c4:d6”))

Call AutoFitMergedCells(Range(“e1:e3”))

End Sub

Public Sub AutoFitMergedCells(oRange As Range)

Dim tHeight As Integer

Dim iPtr As Integer

Dim oldWidth As Single

Dim oldZZWidth As Single

Dim newWidth As Single

Dim newHeight As Single

With Sheets(“Sheet4”)

oldWidth = 0

For iPtr = 1 To oRange.Columns.Count

oldWidth = oldWidth + .Cells(1, oRange.Column + iPtr – 1).ColumnWidth

Next iPtr

oldWidth = .Cells(1, oRange.Column).ColumnWidth + .Cells(1, oRange.Column + 1).ColumnWidth

oRange.MergeCells = False

newWidth = Len(.Cells(oRange.Row, oRange.Column).Value)

oldZZWidth = .Range(“ZZ1”).ColumnWidth

.Range(“ZZ1”) = Left(.Cells(oRange.Row, oRange.Column).Value, newWidth)

.Range(“ZZ1”).WrapText = True

.Columns(“ZZ”).ColumnWidth = oldWidth

.Rows(“1”).EntireRow.AutoFit

newHeight = .Rows(“1”).RowHeight / oRange.Rows.Count

.Rows(CStr(oRange.Row) & “:” & CStr(oRange.Row + oRange.Rows.Count – 1)).RowHeight = newHeight

oRange.MergeCells = True

oRange.WrapText = True

.Range(“ZZ1”).ClearContents

.Range(“ZZ1”).ColumnWidth = oldZZWidth

End With

End Sub

Một số lưu ý:

  1.     Khi sử dụng đoạn mã trên, bạn cần điều chỉnh lại các phạm vi mới nằm trong lệnh Call AutoFitMergedCells (Range (“a1: b2”)) với a1, b2 được điều chỉnh theo dòng cột thực tế. (dòng 3-5 trong code)
  2.     Đừng quên thay đổi tên trang tính Sheet 4 trong mã code (dòng 14) thành tên của trang tính mà bạn đang cần điều chỉnh.

Bước 3: Cuối cùng, nhấn phím F5 để khởi chạy đoạn mã và nhận được kết quả là các ô được hợp nhất đã có thể hiển thị được toàn bộ nội dung trong đó.

Vậy là trong bài viết trên, chúng mình đã giới thiệu đến bạn các cách giãn dòng trong Word phổ biến nhất tính đến thời điểm hiện tại. Hy vọng rằng bạn có thể áp dụng chúng một cách linh hoạt trong quá trình làm việc để đạt hiệu quả tối ưu. Cuối cùng, nếu thích bài viết, đừng quên bấm theo dõi trang ngay để liên tục cập nhật thêm nhiều thủ thuật MS Office thú vị khác bạn nhé!

 

Microsoft Office -