Danh sách mã chỉ số màu VBA
Khi sử dụng VBA để mã Colorindex (hoặc màu nền) của một ô, điều hữu ích là biết số nguyên nào sẽ bằng màu nào. Dưới đây là hình ảnh tham khảo hiển thị màu và liệt kê Colorindex tương ứng của nó. aka Bảng màu VBA
Đây là mã để tạo một mã cho chính bạn hoặc chỉ cần đánh dấu trang này:
| 123456789101112131415 | Sub ColorRef ()Dim x As IntegerĐối với x = 1 đến 56Nếu x <ThìÔ (x, 1) .Interior.ColorIndex = xÔ (x, 2) = xKhácÔ (x - 28, 3) .Interior.ColorIndex = xÔ (x - 28, 4) = xKết thúc nếuTiếp theo xKết thúc Sub |
Ví dụ về VBA ColorIndex
Đặt màu nền ô
| 1 | Phạm vi ("A1"). Interior.ColorIndex = 6 |
Đặt màu phông chữ cho ô
| 1 | Phạm vi ("A1"). Font.ColorIndex = 5 |
Đặt màu đường viền ô
| 1 | Phạm vi ("A1"). Borders.ColorIndex = 5 |
Lấy màu nền ô
| 123 | Dim col dưới dạng số nguyêncol = Range ("A1"). Interior.ColorIndex |
Đặt màu nền của ô thành màu của ô khác
| 1 | Phạm vi ("A1"). Nội thất.ColorIndex = Phạm vi ("B1"). Nội thất.ColorIndex |
Thuộc tính màu VBA
Thay vì sử dụng thuộc tính ColorIndex của Excel / VBA, bạn có thể sử dụng thuộc tính Màu. Thuộc tính Màu có hai kiểu đầu vào:
- vbColor
- Màu sắc RGB
Chúng tôi sẽ thảo luận về những điều này dưới đây:
Màu VB
VB Color là cách dễ nhất để đặt màu trong VBA. Tuy nhiên, nó cũng kém linh hoạt nhất. Để đặt mã màu bằng vbColor, hãy sử dụng bảng dưới đây:
Tuy nhiên, như bạn có thể thấy từ bảng, các tùy chọn của bạn rất hạn chế.
Đặt màu nền ô
| 1 | Phạm vi ("A1"). Interior.Color = vbYellow |
Đặt màu phông chữ cho ô
| 1 | Phạm vi ("A1"). Font.Color = vbBlue |
Đặt màu đường viền ô
| 1 | Phạm vi ("A1"). Borders.Color = vbRed |
Đặt màu nền của ô thành màu của ô khác
| 1 | Phạm vi ("A1"). Interior.Color = Phạm vi ("B1"). Interior.Color |
Màu sắc RGB
RGB là viết tắt của Red Green Blue. Đây là ba màu cơ bản có thể được kết hợp để tạo ra bất kỳ màu nào khác. Khi nhập màu dưới dạng RGB, hãy nhập giá trị từ 0 đến 255 cho mỗi mã màu.
Đây là một ví dụ:
| 1 | Phạm vi ("A1"). Nội thất.Color = RGB (255,255,0) |
Ở trên, chúng tôi đã đặt Red = 255 (giá trị lớn nhất), Green = 255 (giá trị lớn nhất) và Blue = 0 (giá trị nhỏ nhất). Điều này đặt màu nền của ô thành Màu vàng.
Thay vào đó, chúng ta có thể đặt màu phông chữ của ô thành màu tím:
| 1 | Phạm vi ("A1"). Nội thất.Color = RGB (128,0,128) |
Có rất nhiều công cụ trực tuyến để tìm mã RGB cho màu mong muốn của bạn (đây là công cụ).
Danh sách mã ColorIndex & Màu RGB trong Access VBA
Access sử dụng biểu mẫu để hiển thị dữ liệu. Bạn có thể sử dụng Mã ColorIndex để thay đổi theo chương trình màu nền và màu nền trước của các đối tượng trong biểu mẫu Access của mình.
| 12345 | Sub riêng tư cmdSave_Click ()'thay đổi màu nền của nút lưu khi bản ghi được lưu.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenKết thúc Sub |
