Access-Cách định dạng tô màu cho các dòng trong Report theo điều kiện

Liên hệ QC

cadafi

Hành động từ trái tim
Thành viên BQT
Administrator
Tham gia
27/5/07
Bài viết
4,297
Được thích
11,386
Donate (Paypal)
Donate
Giới tính
Nam
Nghề nghiệp
Business Man
Xin các anh chị và các bạn hướng dẫn giúp:

Làm sao tô màu cho các dòng record trong Report của file Access theo điều kiện (Giống như Conditional Format trong Excel)??

Ví dụ:
- Tô màu các dòng chẵn.
- Tô màu các dòng thứ 5, 10, 15, 20,..... của report.

Xin cảm ơn các anh chị và các bạn.
 
Tô màu trong report

Mình chỉ biết cách tô màu sen kẻ thôi, còn theo đ k như bạn thì chưa nghĩ ra

Đoạn code sau là tô màu xen kẻ:


Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
Const cYellow As Long = 10092543
Const cwhite As Long = 16777215
Dim ctl As Control
Dim sec As Section
Set sec = Me.Section("Detail")
If sec.BackColor = cwhite Then
sec.BackColor = cYellow
Else
sec.BackColor = cwhite
End If
For Each ctl In sec.Controls
If ctl.BackColor = cYellow Then
ctl.BackColor = cwhite
Else
ctl.BackColor = cYellow
End If
Next
End Sub
 
Lần chỉnh sửa cuối:
Đoạn code này có phải tô màu xen kẽ nhau ( cứ 1 dòng để trăng rồi đến 1 dòng tô màu ) phải không? Như vậy cũng được rồi. Tôi sẽ xem xét cụ thể. Cám ơn bạn nhiều. Có gì khó khăn nhờ bạn giúp đỡ
 
tô màu xen kẽ

Xin các anh chị và các bạn hướng dẫn giúp:

Làm sao tô màu cho các dòng record trong Report của file Access theo điều kiện (Giống như Conditional Format trong Excel)??

Ví dụ:
- Tô màu các dòng chẵn.
- Tô màu các dòng thứ 5, 10, 15, 20,..... của report.

Xin cảm ơn các anh chị và các bạn.


Cái này khá đơn giản mà, bác tạo thêm cột stt, quét khối các dòng trong phần Detail, chọn thẻ Design/ Conditional
Sao đó chọn Expression is và nhập vào [stt] mod 2 = 0 sao đó chọn màu nền và màu chữ

đối với trường hợp này là [stt] mod 5 = 0
 
Còn đối voi truong hop trong form thì sao các bạn ?
 
Web KT
Back
Top Bottom