Trong hình, ba ví dụ được hiển thị chỉ định dạng ô hiện hoạt;
Đây là các sự kiện Worksheet_SelectionChange. Để cài đặt hành vi này cho một trang tính, hãy nhấp chuột phải vào tab trang tính đó, chọn Xem mã và dán một trong các quy trình sau [nhưng không nhiều hơn một quy trình tại một thời điểm trên mỗi trang tính] vào vùng màu trắng lớn là mô-đun trang tính. Nhấn Alt+Q để quay lại trang tính, sau đó chọn một vài ô để xem hiệu ứng của mã
Để chỉ định dạng ô hiện hoạt
Private Sub Worksheet_SelectionChange[ByVal Target As Range] Application.ScreenUpdating = False Cells.Interior.ColorIndex = 0 Target.Interior.Color = vbCyan Application.ScreenUpdating = True End Sub
Để định dạng toàn bộ hàng và cột của ô hiện hoạt
Private Sub Worksheet_SelectionChange[ByVal Target As Range] If Target.Cells.Count > 1 Then Exit Sub Application.ScreenUpdating = False Cells.Interior.ColorIndex = 0 With Target .EntireColumn.Interior.Color = vbCyan .EntireRow.Interior.Color = vbCyan End With Application.ScreenUpdating = True End Sub
Để định dạng hàng và cột trong vùng hiện tại của ô hiện hoạt
Private Sub Worksheet_SelectionChange[ByVal Target As Range] Cells.Interior.ColorIndex = 0 If IsEmpty[Target] Or Target.Cells.Count > 1 Then Exit Sub Application.ScreenUpdating = False With ActiveCell Range[Cells[.Row, .CurrentRegion.Column], _ Cells[.Row, .CurrentRegion.Columns.Count + .CurrentRegion.Column - 1]].Interior.Color = vbCyan Range[Cells[.CurrentRegion.Row, .Column], _ Cells[.CurrentRegion.Rows.Count + .CurrentRegion.Row - 1, .Column]].Interior.Color = vbCyan End With Application.ScreenUpdating = True End Sub
Bất cứ khi nào bạn chọn một dải ô để nhập dữ liệu, ô hiện hoạt sẽ có màu trắng và tất cả các ô khác trong dải có màu tương phản. Khi bạn nhập dữ liệu rồi nhấn phím Enter, ô đó sẽ có màu tương phản và ô tiếp theo sẽ trở thành ô hiện hoạt và có màu trắng. Bạn có thể thắc mắc làm thế nào để thay đổi màu tương phản để làm cho phạm vi đã chọn nổi bật hơn
Các màu được Excel sử dụng khi bạn chọn các mục không được kiểm soát bởi Excel mà bởi Windows. Bạn có thể thay đổi màu lựa chọn, nhưng bạn nên hiểu rằng khi bạn làm như vậy, nó có thể ảnh hưởng đến các chương trình khác ngoài Excel. Các bước chính xác bạn làm theo tùy thuộc vào phiên bản Windows của bạn. Nếu bạn đang sử dụng Windows XP, hãy làm theo các bước sau
- Thoát khỏi Excel
- Nhấp chuột phải vào bất kỳ đâu trong màn hình nền Windows của bạn. [Đảm bảo rằng bạn nhấp chuột phải vào chính màn hình nền, không phải trên bất kỳ đối tượng nào trên màn hình nền. ] Windows trình bày một menu Ngữ cảnh
- Chọn Thuộc tính từ menu Ngữ cảnh. Windows hiển thị hộp thoại Display Properties
- Đảm bảo tab Giao diện được chọn
- Nhấp vào nút Nâng cao. Windows hiển thị hộp thoại Giao diện nâng cao. [Xem Hình 1. ]
- Sử dụng danh sách thả xuống Mục, chọn tùy chọn Mục đã chọn
- Sử dụng danh sách thả xuống Màu 1, chọn màu bạn muốn Windows sử dụng khi bạn chọn các mục
- Bấm OK để đóng hộp thoại Giao diện nâng cao
- Bấm OK để đóng hộp thoại Thuộc tính hiển thị
Hình 1. Hộp thoại Giao diện Nâng cao
Nếu bạn đang sử dụng Vista, hãy làm theo các bước sau
- Thoát khỏi Excel
- Nhấp chuột phải vào bất kỳ đâu trong màn hình nền Windows của bạn. [Đảm bảo rằng bạn nhấp chuột phải vào chính màn hình nền, không phải trên bất kỳ đối tượng nào trên màn hình nền. ] Windows trình bày một menu Ngữ cảnh
- Chọn Cá nhân hóa từ menu Ngữ cảnh. Windows hiển thị hộp thoại Cá nhân hóa
- Nhấp vào Màu cửa sổ và Giao diện
- Nhấp vào liên kết Mở thuộc tính giao diện cổ điển để có thêm tùy chọn màu. Windows hiển thị hộp thoại Cài đặt giao diện
- Nhấp vào nút Nâng cao. Windows hiển thị hộp thoại Giao diện nâng cao
- Sử dụng danh sách thả xuống Mục, chọn tùy chọn Mục đã chọn
- Sử dụng danh sách thả xuống Màu 1, chọn màu bạn muốn Windows sử dụng khi bạn chọn các mục
- Bấm OK để đóng hộp thoại Giao diện nâng cao
- Bấm OK để đóng hộp thoại Cài đặt giao diện
- Đóng cửa sổ Control Panel
Trên hệ thống của Jim, ô được chọn trong trang tính được viền màu xanh lục. Với thị lực mờ đi, Jim khó có thể nhìn thấy điều này. Anh ấy tự hỏi liệu có thể thay đổi đường viền của ô đã chọn thành màu đỏ không
Không có cách nào để đặt màu đường viền trong Excel. Tuy nhiên, chương trình cho phép bạn đặt màu của lưới trên màn hình được sử dụng để phân định các ô. Vì vậy, một cách tiếp cận có thể là thay đổi màu lưới, điều này sẽ cho phép đường viền ô hiện tại "nổi bật" tương phản với màu lưới. Chẳng hạn, bạn có thể muốn thay đổi màu lưới thành màu đỏ. Bạn có thể làm điều đó bằng cách làm theo các bước sau
- Hiển thị hộp thoại Tùy chọn Excel. [Trong Excel 2007, nhấp vào nút Office rồi nhấp vào Tùy chọn Excel. Trong Excel 2010 hoặc phiên bản mới hơn, hãy hiển thị tab Tệp của dải băng rồi bấm vào Tùy chọn. ]
- Nhấp vào Nâng cao ở phía bên trái của hộp thoại
- Cuộn qua các tùy chọn cho đến khi bạn thấy phần Tùy chọn Hiển thị cho Bảng tính này. [Xem Hình 1. ]
- Đảm bảo hộp kiểm Hiển thị Đường lưới được chọn
- Sử dụng danh sách thả xuống Màu đường lưới, chọn màu bạn muốn sử dụng. [Trong trường hợp này, chọn màu đỏ. ]
- Nhấp vào OK
Hình 1. Các tùy chọn Nâng cao của hộp thoại Tùy chọn Excel
Nếu cách tiếp cận đó không phù hợp với nhu cầu của bạn, thì bạn có thể thử thiết lập macro để tự động thay đổi màu nền của bất kỳ ô nào được chọn. [Điều này không thay đổi đường viền lựa chọn—hãy nhớ rằng không thể thay đổi trong Excel. ] Đây là một macro có thể được sử dụng
Dim cPrev As Range Dim nPrev As Long Private Sub Worksheet_SelectionChange[ByVal Target As Range] If cPrev Is Nothing Then Set cPrev = ActiveCell nPrev = xlNone End If cPrev.Interior.Color = nPrev ' Reset previously active cell Set cPrev = ActiveCell ' Remember nPrev = ActiveCell.Interior.Color If nPrev = vbWhite Then nPrev = xlNone ' Color vbWhite erases borders ActiveCell.Interior.Color = vbYellow ' Set highlight End Sub
Macro này là một trình xử lý sự kiện và nó cần được đặt trong cửa sổ mã của trang tính. [Bấm chuột phải vào trang tính bạn muốn tác động, sau đó chọn Xem mã từ menu Ngữ cảnh kết quả. ] Trình xử lý sự kiện chạy mỗi khi bạn chọn một ô khác
Bạn cũng có thể xem các tùy chọn trợ năng của Windows để sửa đổi cách hiển thị thông tin trên màn hình hoặc bạn có thể dùng thử phần mềm của bên thứ ba như ZoomText