hi
I have this code but I no know what's the problem . I added condition if the datevalue in column B =datevalue in column A +10 or more than datevalue in column A +10 then should move the value from column C to column D
any ideas ,please ?
Code
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Columns(2)) Is Nothing Or Target.CountLarge > 1 Then Exit Sub
Application.EnableEvents = False
With Target
If .Value = DateValue(.Offset(0, -1).Value) + 10 Or .Value = DateValue(.Offset(0, -1).Value) > 10 Then
.Offset(0, 2) = .Offset(0, 1).Value
.Offset(0, 1).ClearContents
End If
End With
Application.EnableEvents = True
End Sub
Display More
based on condition
it works as in row 6 the 17,000 was in column C but when add 10 to date in column A as show in column D
but based on this doesn't move to column D as in row 3
any ideas ,please ?