Ô IF là ngày thêm màu xanh

Tôi đang tìm kiếm một tế bào M4 cư trú khi tôi thay đổi J4, K4 hoặc là L4 để lấp đầy màu xanh lá cây.

Ví dụ: Nếu tôi đặt ngày 12-14 trong K4 và thay đổi màu nền thành màu xanh lá cây, tôi muốn M4 để cư trú với ngày 12-14.

microsoft-excel

— Mount Indie
nguồn

Xin chào @Mount Indie, chào mừng bạn. Tôi tin rằng những gì bạn đang tìm kiếm được gọi là định dạng có điều kiện, bạn đã xem xét điều đó chưa? support.office.com/en-us/article/ Bạn có thể muốn chụp lại ảnh chụp màn hình và bao gồm các nhãn hàng / cột

— wysiwyg

@wysiwyg Định dạng có điều kiện làm ngược lại với những gì Mount Indie muốn làm.

— Worthwelle

Nếu bạn đang thay đổi màu xanh lục theo cách thủ công để chỉ ra một cái gì đó và KHÔNG thay đổi nó thành màu xanh lá cây dựa trên một giá trị trong bảng tính, Tự động điền ngày liên hệ sẽ yêu cầu VBA. Nếu có điều gì đó về giá trị của ô ở một nơi khác trong trang tính khiến ô có màu xanh hơn mức có thể được thực hiện thông qua định dạng có điều kiện và kiểm tra tiêu chí tương tự được sử dụng cho định dạng có điều kiện có thể được sử dụng để tự động điền vào ô khác của bạn .

— Forward Ed

Công thức không thể phát hiện màu của các ô, nhưng VBA có thể

— Forward Ed

Bạn có thể thêm một cột trợ giúp bên cạnh mỗi ngày gọi của bạn. Trong cột này, bạn có thể thêm một chữ cái để chỉ sự thành công của cuộc gọi. Sau đó, bạn có thể sử dụng định dạng điều kiện để tô màu ngày dựa trên giá trị trong cột liền kề. Sau đó, bạn cũng có thể tự động điền vào ô bạn muốn dựa trên giá trị trong cột của trình trợ giúp là kiểm tra điều kiện.

— Forward Ed

Để giải quyết vấn đề của bạn, tôi muốn đề xuất một vài macro.

Macro 1:

Private Sub Worksheet_Change(ByVal Target As Range)

 Set w = ActiveSheet.Range("J4:L4")

 For Each C In w

 If C.Value <> "" And Not IsDate(C) Then
 C.ClearContents

 MsgBox "Only a Date is permitted in this cell."
 End If

 If C.Value = "" And Not IsDate(C) Then
 C.Interior.ColorIndex = 0
 Else
 C.Interior.ColorIndex = 4
 End If

 Next C

End Sub

Macro 2:

Sub CopyLastCell()
Range("J4").End(xlToRight).Copy
Range("M4").PasteSpecial

Application.CutCopyMode = False
End Sub

Cách thức hoạt động của Macro:

Tại báo chí hoạt động ALT+F11 mở VBA Editor.
Sao chép và; Dán cả Macro là Module tiêu chuẩn.
Các Macro 1 sẽ chỉ cho phép nhập DATE trong các tế bào J4:L4 và tô sáng ô / ô trong Màu xanh lục, nếu tìm thấy DATE giá trị.
CHẠY các Macro 2 khi nào bạn muốn Sao chép giá trị của ô cuối cùng từ J4:L4 đến di động M4.

N.B.

Tôi đã sử dụng Phương pháp tế bào LAST đến Sao chép đến M4 bởi vì rất có thể bạn có thể nhập DATE trong tất cả các ô hoặc trong một vài ô.
Phạm vi dữ liệu J4:L4, ô đích M4 & amp; Color Index các giá trị có thể chỉnh sửa.

— Rajesh S
nguồn

Rất vui được giúp bạn @Mount Indie tiếp tục hỏi

— Rajesh S