Làm cách nào để đánh dấu tất cả các phạm vi được đặt tên trong Excel?

Đối với một số mục đích, trong Excel, chúng tôi luôn có thể tạo một số tên phạm vi cho một phạm vi ô. Đôi khi, chúng tôi muốn biết vị trí của các phạm vi được đặt tên trong toàn bộ sổ làm việc và đánh dấu chúng. Cách đơn giản nhất đối với chúng tôi là nhấp vào tên phạm vi từ Hộp tên để chọn phạm vi và tô màu cho nó. Tuy nhiên, nếu có nhiều phạm vi được đặt tên trong sổ làm việc, phương pháp này sẽ tốn thời gian. Làm cách nào chúng ta có thể đánh dấu tất cả các phạm vi được đặt tên trong Excel cùng một lúc?

Đánh dấu tất cả các phạm vi đã đặt tên bằng mã VBA

Đánh dấu tất cả các phạm vi đã đặt tên bằng mã VBA

Đây là mã để đánh dấu tất cả các phạm vi được đặt tên trong sổ làm việc, bạn có thể làm như sau:

1. Giữ ALT + F11 chìa khóa và nó mở Cửa sổ Microsoft Visual Basic for Applications.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Cửa sổ mô-đun.

Mã VBA: Đánh dấu tất cả các phạm vi được đặt tên trong Excel

Sub HighlightRange()
'Update 20140317
Dim xName As Name
Dim Rng As Range
On Error Resume Next
For Each xName In Application.ActiveWorkbook.Names
    Set Rng = xName.RefersToRange
    Rng.Interior.ColorIndex = 6
Next
End Sub

3. Sau đó nhấn F5 để thực thi mã này và tất cả các phạm vi được đặt tên đã được đánh dấu bằng màu vàng trong toàn bộ sổ làm việc.

Ghi chú:

1. Nếu bạn muốn tô các dải ô đã đặt tên bằng các màu khác, bạn chỉ cần thay đổi Chỉ số màu = 6 như bạn muốn.

2. Sau khi áp dụng mã này, tất cả màu gốc trong các dải ô đã đặt tên sẽ bị hủy và được bao phủ bởi màu mới này.

Các bài liên quan:

Làm cách nào để đánh dấu tất cả các hàng tổng phụ cùng một lúc trong Excel?

Làm cách nào để đánh dấu tất cả các ô lỗi trong Excel?

Làm cách nào để đánh dấu các ô có liên kết ngoài trong Excel?