Tự đọng định dạng mà điều kiện quá khó thì làm sao?

[echo07]

Công việc của em hay phải Hight light mấy ô mà điều kiện là nếu có dữ liệu mới ở trong đó, Sau một tuần thì làm lại. Vậy ai cao tay chỉ giùm em với.

 

[echo07]

Gửi các pac File để trợ giúp em.

 

[kelvin]

Tôi nghĩ vấn đề giải quyết được:hight light thì colorIndex, chỉ khi thay đổi data 2 cột thì Wb.change, Intersect.Hy vọng tối nay <= 5 ve sẽ có code cho bạn nha!!!!

 

[Mr Okebab]

Công việc của em hay phải Hight light mấy ô mà điều kiện là nếu có dữ liệu mới ở trong đó, Sau một tuần thì làm lại. Vậy ai cao tay chỉ giùm em với.

Vấn đề highlight không khó khăn gì cả. Tuy nhiên có mấy vấn đề chưa rõ về thay đổi dữ liệu cũ và mới : Như thế nào là cũ và như thế nào là mới

1. Dữ liệu cũ là dữ liệu đầu tiên : Các lần thay đổi sau đều là dữ liệu mới. VD đầu tiên là 10 thì các lần sau đều là dữ liệu mới.
2. Dữ liệu cũ là dữ liệu lần trước : VD hiện tại đang là 10, thay đổi lần 1 thành 20, khi đó Cũ là :10, mới là 20. Thay đổi lần 2 :từ 20 thành 30. Khi đó dữ liệu cũ là 20, mới là 30

Bạn phân biệt giùm nhé.

 

[kelvin]

không biét như sau có như ý bạn echo07 khg?
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:c10")) Is Nothing Then
If IsNumeric(Target) Then

On Error Resume Next
Application.EnableEvents = False
With Target.Interior
.ColorIndex = 6
.Pattern = xlSolid
End With
Application.EnableEvents = True
On Error GoTo 0

End If
End If

End Sub

 

[kelvin]

Sau một tuần thì làm lại. ?

Có nghìa là đầu tiên ta phải ghi nhận lại colorIndexOrigine, CellsAddressOrigine
Dùng hàm Now đẻ ghi nhận 1 tuân trôi qua. sau 1 tuần thì trả về ColorIndex cũ ?

 

[echo07]

Ý em là bất kể ô nào mà em thay đôi dữ liệu là hắn phải Hightlight kể cả em vừa update xong mà thay đổi cũng thế. Em mù tịt về VBE. (nhưng dùng được Conditional Formating) Việc lặp lại thì k là vấn đề lớn lắm.