Wiki

Tự động tô màu hàng, cột khi click chuột vào ô trong Excel

Trong quá trình làm việc với file Excel, việc thiết lập bảng tính theo giá trị so sánh, so sánh ngang hay dọc là một phần và cũng là yêu cầu khá cơ bản của ứng dụng.

Và để giúp bạn tô màu các giá trị trong hàng, hoặc cột cần so sánh trên file Excel thuận tiện hơn, trong bài viết hôm nay mình sẽ chia sẻ với các bạn một thủ thuật nhỏ trong việc tô màu giá trị. con trỏ chuột trên trang tính theo hàng và cột hoặc cả trục dọc và trục ngang với mã VBA một cách đơn giản. Hỗ trợ bạn kiểm soát và kiểm tra dữ liệu trên bảng tính dễ dàng hơn…

Đọc thêm:

Được rồi, với những gì đã nói, bạn có thể đã hiểu những gì tôi muốn đề cập trong hướng dẫn này, phải không? Sau đó, chúng ta hãy bắt đầu!

#đầu tiên. Cách tô màu Excel trong các hàng khi bấm vào các ô trong Excel

+ Bước 1: Đầu tiên, bạn mở tệp Excel cần xử lý.

Tại đây, bạn mở tab Developer trên thanh Ribbon => và chọn Visual Basic hoặc nhấn tổ hợp phím Alt + F11 để mở trình soạn thảo mã VBA.

tu-dong-to-mau-o-khi-de-chuot-in-excel (1)

+ Bước 2: Ở cửa sổ Microsoft Visual Basic for Applications, bạn nhấp vào Sheet hiện đang ở Project VBAProject để mở hộp thoại Sheet (Code).

=> Sau đó bạn Copy đoạn mã sau và Dán vào trước khi nhấn Alt + Q để đóng cửa sổ này.

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Khi có lỗi Tiếp tục tiếp theo
Cells.Interior.ColorIndex = 0
ActiveCell.EntireRow.Interior.ColorIndex = 8
Application.CutCopyMode = True
Kết thúc Sub

tu-dong-to-mau-o-khi-de-chuot-in-excel (2)

+ Bước 3: Bây giờ bạn có thể kích con trỏ chuột tại giao diện tệp Excel để xem kết quả

tu-dong-to-mau-o-khi-de-chuot-in-excel (3)

# 2. Cách tô màu Excel theo cột khi bấm vào một ô trong Excel

Tương tự như cách tô màu cho các hàng trong tệp Excel. Để tô màu và tô sáng các giá trị cột khi con trỏ chuột đang bật, bạn cần:

+ Bước 1: Nhấn tổ hợp phím Alt + F11 để mở trình soạn thảo mã VBA.

+ Bước 2: Sau đó nhấp đúp vào Sheet hiện tại ở cửa sổ Project VBAProject => và Dán đoạn mã dưới đây vào hộp thoại Sheet (Code).

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Khi có lỗi Tiếp tục tiếp theo
Cells.Interior.ColorIndex = 0
ActiveCell.EntireRow.Interior.ColorIndex = 8
ActiveCell.EntireColumn.Interior.ColorIndex = 8
Application.CutCopyMode = True
Kết thúc Sub

+ Bước 3: Sau đó nhấp vào tệp Excel để kiểm tra nó

tu-dong-to-mau-o-khi-de-chuot-in-excel (4)

# 3. Cách tô màu các hàng và cột trong Excel (khi bấm vào một ô trong Excel)

Ngoài hai cách tô màu giá trị hàng và cột có điều kiện ở trên. Nếu bạn cần so sánh dữ liệu trong cả hàng và cột, bạn có thể sử dụng mã sau:

Private Sub Worksheet_SelectionChange (ByVal Target As Range)
Khi có lỗi Tiếp tục tiếp theo
Cells.Interior.ColorIndex = 0
ActiveCell.EntireRow.Interior.ColorIndex = 8
ActiveCell.EntireColumn.Interior.ColorIndex = 8
Application.CutCopyMode = True
Kết thúc Sub

Hoặc bạn sử dụng mã sau:

Sub Worksheet_SelectionChange (ByVal Target As Excel.Range)
‘Cập nhật 20140318’
XRow tĩnh
Cột xC tĩnh
Nếu xColumn “” Thì
Với các cột (xColumn) .Interior
.ColorIndex = xlNone
Kết thúc với
Với hàng (xRow) .Interior
.ColorIndex = xlNone
Kết thúc với
EndIf
pRow = Lựa chọn.Row
pColumn = Lựa chọn.Column
xRow = pRow
xColumn = pColumn
Với các cột (pColumn) .Interior
.ColorIndex = 6
.Pattern = xlSolid
Kết thúc với
Với hàng (pRow) .Interior
.ColorIndex = 6
.Pattern = xlSolid
Kết thúc với
Kết thúc Sub

Dán vào hộp thoại Sheet (Code). Tại hộp thoại Microsoft Visual Basic for Applications.

tu-dong-to-mau-o-khi-de-chuot-in-excel (5)

Sau đó nhấp vào bất kỳ ô nào trong tệp Excel để xem kết quả.

tu-dong-to-mau-o-khi-de-chuot-in-excel (6)

Phần kết

Được rồi, vậy là xong. Mình vừa hướng dẫn chi tiết cho các bạn những thủ thuật nhỏ trong việc tự động hóa Tô màu các hàng và cột khi nhấp vào các ô trong Excel được thôi.

Tôi nghĩ thủ thuật này sẽ rất hữu ích cho bạn trong việc so sánh, đối chiếu hoặc xem xét thông tin theo hàng hoặc cột một cách thuận tiện và dễ dàng hơn trước những danh sách bảng tính dài và phức tạp.

Tại thời điểm này, bài viết về cách tự động tô màu trong hàng và cột khi nhấp vào một ô trên tệp Excel của tôi cũng sẽ bị tạm dừng. Hi vọng thủ thuật này sẽ hữu ích với bạn.

Chúc may mắn !

CTV: Lương Trung – phanmemdownload.com

Ghi chú: Bài viết này có hữu ích cho bạn không? Đừng quên đánh giá bài viết, thích và chia sẻ nó với bạn bè và gia đình của bạn!

Related Articles

Trả lời

Email của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *

Check Also
Close
Back to top button