Phông chữ ô VBA
Trong VBA, bạn có thể thay đổi các thuộc tính phông chữ bằng cách sử dụng Thuộc tính Phông chữ VBA của Đối tượng Phạm vi. Nhập mã sau vào VBA Editor và bạn sẽ thấy danh sách tất cả các tùy chọn có sẵn:
1 | Phạm vi ("A1) .Font. |
Chúng tôi sẽ thảo luận về một số thuộc tính phổ biến nhất bên dưới.
Thay đổi màu phông chữ
Có một số cách để đặt màu phông chữ.
vbColor
Cách dễ nhất để đặt màu là với vbColors:
1 | Phạm vi ("a1"). Font.Color = vbRed |
Tuy nhiên, bạn rất hạn chế về màu sắc có sẵn. Đây là những tùy chọn duy nhất có sẵn:
Màu - RGB
Bạn cũng có thể đặt màu dựa trên RGB (Đỏ xanh lục). Tại đây, bạn nhập các giá trị màu từ 0-255 cho Đỏ, Xanh lục và Xanh lam. Sử dụng ba màu đó, bạn có thể tạo ra bất kỳ màu nào:
1 | Phạm vi ("a1"). Font.Color = RGB (255,255,0) |
ColorIndex
VBA / Excel cũng có thuộc tính ColorIndex. Điều này làm cho các màu được tạo sẵn có sẵn cho bạn. Tuy nhiên, chúng được lưu trữ dưới dạng số Chỉ mục, điều này khiến khó biết màu gì là màu gì:
1 | Phạm vi ("a1"). Font.ColorIndex =… |
Chúng tôi đã viết một bài báo về mã VBA Color, bao gồm danh sách các mã VBA ColorIndex. Ở đó bạn có thể tìm hiểu thêm về màu sắc.
Cỡ chữ
Thao tác này sẽ đặt kích thước phông chữ thành 12:
1 | Phạm vi ("a1"). Font.Size = 12 |
hoặc đến 16:
1 | Phạm vi ("a1"). Font.Size = 16 |
Kiểu chữ in đậm
Thật dễ dàng để đặt phông chữ ô thành Bold:
1 | Phạm vi ("A1"). Font.Bold = True |
hoặc để xóa định dạng In đậm:
1 | Phạm vi ("A1"). Font.Bold = False |
Tên phông chữ
Để thay đổi tên phông chữ, hãy sử dụng Tên bất động sản:
1 | Phạm vi ("A1"). Font.Name = "Calibri" |
1 | Phạm vi ("A1"). Font.Name = "Arial" |
1 | Phạm vi ("A1"). Font.Name = "Times New Roman" |
Kiểu ô
Excel cung cấp khả năng tạo “Kiểu” Ô. Phong cách có thể được tìm thấy trong Ruy-băng Trang chủ> Kiểu:
Kiểu cho phép bạn lưu Định dạng ô mong muốn của mình. Sau đó, gán kiểu đó cho một ô mới và tất cả các định dạng ô sẽ được áp dụng ngay lập tức. Bao gồm kích thước phông chữ, màu ô, trạng thái bảo vệ ô và bất kỳ thứ gì khác có sẵn từ Trình đơn Định dạng Ô:
Cá nhân tôi, đối với nhiều mô hình mà tôi làm việc, tôi thường tạo kiểu ô “Đầu vào”:
1 | Phạm vi ("a1"). Style = "Đầu vào" |
Bằng cách sử dụng các kiểu, bạn cũng có thể dễ dàng xác định các kiểu ô trên trang tính của mình. Ví dụ bên dưới sẽ lặp qua tất cả các ô trong trang tính và thay đổi bất kỳ ô nào có Style = “Input” thành “InputLocked”:
1234567 | Làm mờ ô dưới dạng phạm viĐối với mỗi ô trong ActiveSheet.CellsNếu Cell.Style = "Đầu vào" thìCell.Style = "InputLocked"Kết thúc nếuÔ tiếp theo |